2 * SPDX-License-Identifier: BSD-3-Clause
4 * Copyright (c) 2008 MARVELL INTERNATIONAL LTD.
5 * Copyright (c) 2010 The FreeBSD Foundation
6 * Copyright (c) 2010-2015 Semihalf
9 * Developed by Semihalf.
11 * Portions of this software were developed by Semihalf
12 * under sponsorship from the FreeBSD Foundation.
14 * Redistribution and use in source and binary forms, with or without
15 * modification, are permitted provided that the following conditions
17 * 1. Redistributions of source code must retain the above copyright
18 * notice, this list of conditions and the following disclaimer.
19 * 2. Redistributions in binary form must reproduce the above copyright
20 * notice, this list of conditions and the following disclaimer in the
21 * documentation and/or other materials provided with the distribution.
22 * 3. Neither the name of MARVELL nor the names of contributors
23 * may be used to endorse or promote products derived from this software
24 * without specific prior written permission.
26 * THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
40 * Marvell integrated PCI/PCI-Express controller driver.
43 #include <sys/cdefs.h>
44 __FBSDID("$FreeBSD$");
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/kernel.h>
50 #include <sys/malloc.h>
51 #include <sys/module.h>
52 #include <sys/mutex.h>
53 #include <sys/queue.h>
56 #include <sys/endian.h>
57 #include <sys/devmap.h>
59 #include <machine/fdt.h>
60 #include <machine/intr.h>
65 #include <dev/fdt/fdt_common.h>
66 #include <dev/ofw/ofw_bus.h>
67 #include <dev/ofw/ofw_bus_subr.h>
68 #include <dev/ofw/ofw_pci.h>
69 #include <dev/pci/pcivar.h>
70 #include <dev/pci/pcireg.h>
71 #include <dev/pci/pcib_private.h>
73 #include "ofw_bus_if.h"
76 #include <machine/resource.h>
77 #include <machine/bus.h>
79 #include <arm/mv/mvreg.h>
80 #include <arm/mv/mvvar.h>
81 #include <arm/mv/mvwin.h>
84 #define debugf(fmt, args...) do { printf(fmt,##args); } while (0)
86 #define debugf(fmt, args...)
90 * Code and data related to fdt-based PCI configuration.
92 * This stuff used to be in dev/fdt/fdt_pci.c and fdt_common.h, but it was
93 * always Marvell-specific so that was deleted and the code now lives here.
102 #define FDT_RANGES_CELLS ((3 + 3 + 2) * 2)
103 #define PCI_SPACE_LEN 0x00400000
106 mv_pci_range_dump(struct mv_pci_range *range)
110 printf(" base_pci = 0x%08lx\n", range->base_pci);
111 printf(" base_par = 0x%08lx\n", range->base_parent);
112 printf(" len = 0x%08lx\n", range->len);
117 mv_pci_ranges_decode(phandle_t node, struct mv_pci_range *io_space,
118 struct mv_pci_range *mem_space)
120 pcell_t ranges[FDT_RANGES_CELLS];
121 struct mv_pci_range *pci_space;
122 pcell_t addr_cells, size_cells, par_addr_cells;
124 pcell_t cell0, cell1, cell2;
125 int tuple_size, tuples, i, rv, offset_cells, len;
126 int portid, is_io_space;
129 * Retrieve 'ranges' property.
131 if ((fdt_addrsize_cells(node, &addr_cells, &size_cells)) != 0)
133 if (addr_cells != 3 || size_cells != 2)
136 par_addr_cells = fdt_parent_addr_cells(node);
137 if (par_addr_cells > 3)
140 len = OF_getproplen(node, "ranges");
141 if (len > sizeof(ranges))
144 if (OF_getprop(node, "ranges", ranges, sizeof(ranges)) <= 0)
147 tuple_size = sizeof(pcell_t) * (addr_cells + par_addr_cells +
149 tuples = len / tuple_size;
152 * Initialize the ranges so that we don't have to worry about
153 * having them all defined in the FDT. In particular, it is
154 * perfectly fine not to want I/O space on PCI buses.
156 bzero(io_space, sizeof(*io_space));
157 bzero(mem_space, sizeof(*mem_space));
159 rangesptr = &ranges[0];
161 for (i = 0; i < tuples; i++) {
162 cell0 = fdt_data_get((void *)rangesptr, 1);
164 cell1 = fdt_data_get((void *)rangesptr, 1);
166 cell2 = fdt_data_get((void *)rangesptr, 1);
168 portid = fdt_data_get((void *)(rangesptr+1), 1);
170 if (cell0 & 0x02000000) {
171 pci_space = mem_space;
173 } else if (cell0 & 0x01000000) {
174 pci_space = io_space;
181 if (par_addr_cells == 3) {
183 * This is a PCI subnode 'ranges'. Skip cell0 and
184 * cell1 of this entry and only use cell2.
187 rangesptr += offset_cells;
190 if ((par_addr_cells - offset_cells) > 2) {
194 pci_space->base_parent = fdt_data_get((void *)rangesptr,
195 par_addr_cells - offset_cells);
196 rangesptr += par_addr_cells - offset_cells;
198 if (size_cells > 2) {
202 pci_space->len = fdt_data_get((void *)rangesptr, size_cells);
203 rangesptr += size_cells;
205 pci_space->base_pci = cell2;
207 if (pci_space->len == 0) {
208 pci_space->len = PCI_SPACE_LEN;
209 pci_space->base_parent = fdt_immr_va +
210 PCI_SPACE_LEN * ( 2 * portid + is_io_space);
219 mv_pci_ranges(phandle_t node, struct mv_pci_range *io_space,
220 struct mv_pci_range *mem_space)
224 debugf("Processing PCI node: %x\n", node);
225 if ((err = mv_pci_ranges_decode(node, io_space, mem_space)) != 0) {
226 debugf("could not decode parent PCI node 'ranges'\n");
230 debugf("Post fixup dump:\n");
231 mv_pci_range_dump(io_space);
232 mv_pci_range_dump(mem_space);
237 mv_pci_devmap(phandle_t node, struct devmap_entry *devmap, vm_offset_t io_va,
240 struct mv_pci_range io_space, mem_space;
243 if ((error = mv_pci_ranges_decode(node, &io_space, &mem_space)) != 0)
246 devmap->pd_va = (io_va ? io_va : io_space.base_parent);
247 devmap->pd_pa = io_space.base_parent;
248 devmap->pd_size = io_space.len;
251 devmap->pd_va = (mem_va ? mem_va : mem_space.base_parent);
252 devmap->pd_pa = mem_space.base_parent;
253 devmap->pd_size = mem_space.len;
258 * Code and data related to the Marvell pcib driver.
261 #define PCI_CFG_ENA (1U << 31)
262 #define PCI_CFG_BUS(bus) (((bus) & 0xff) << 16)
263 #define PCI_CFG_DEV(dev) (((dev) & 0x1f) << 11)
264 #define PCI_CFG_FUN(fun) (((fun) & 0x7) << 8)
265 #define PCI_CFG_PCIE_REG(reg) ((reg) & 0xfc)
267 #define PCI_REG_CFG_ADDR 0x0C78
268 #define PCI_REG_CFG_DATA 0x0C7C
270 #define PCIE_REG_CFG_ADDR 0x18F8
271 #define PCIE_REG_CFG_DATA 0x18FC
272 #define PCIE_REG_CONTROL 0x1A00
273 #define PCIE_CTRL_LINK1X 0x00000001
274 #define PCIE_REG_STATUS 0x1A04
275 #define PCIE_REG_IRQ_MASK 0x1910
277 #define PCIE_CONTROL_ROOT_CMPLX (1 << 1)
278 #define PCIE_CONTROL_HOT_RESET (1 << 24)
280 #define PCIE_LINK_TIMEOUT 1000000
282 #define PCIE_STATUS_LINK_DOWN 1
283 #define PCIE_STATUS_DEV_OFFS 16
285 /* Minimum PCI Memory and I/O allocations taken from PCI spec (in bytes) */
286 #define PCI_MIN_IO_ALLOC 4
287 #define PCI_MIN_MEM_ALLOC 16
289 #define BITS_PER_UINT32 (NBBY * sizeof(uint32_t))
291 struct mv_pcib_softc {
294 struct rman sc_mem_rman;
295 bus_addr_t sc_mem_base;
296 bus_addr_t sc_mem_size;
297 uint32_t sc_mem_map[MV_PCI_MEM_SLICE_SIZE /
298 (PCI_MIN_MEM_ALLOC * BITS_PER_UINT32)];
302 struct rman sc_io_rman;
303 bus_addr_t sc_io_base;
304 bus_addr_t sc_io_size;
305 uint32_t sc_io_map[MV_PCI_IO_SLICE_SIZE /
306 (PCI_MIN_IO_ALLOC * BITS_PER_UINT32)];
309 struct resource *sc_res;
310 bus_space_handle_t sc_bsh;
311 bus_space_tag_t sc_bst;
314 struct mtx sc_msi_mtx;
315 uint32_t sc_msi_bitmap;
317 int sc_busnr; /* Host bridge bus number */
318 int sc_devnr; /* Host bridge device number */
320 int sc_mode; /* Endpoint / Root Complex */
322 int sc_msi_supported;
323 int sc_skip_enable_procedure;
324 int sc_enable_find_root_slot;
325 struct ofw_bus_iinfo sc_pci_iinfo;
327 int ap_segment; /* PCI domain */
330 /* Local forward prototypes */
331 static int mv_pcib_decode_win(phandle_t, struct mv_pcib_softc *);
332 static void mv_pcib_hw_cfginit(void);
333 static uint32_t mv_pcib_hw_cfgread(struct mv_pcib_softc *, u_int, u_int,
335 static void mv_pcib_hw_cfgwrite(struct mv_pcib_softc *, u_int, u_int,
336 u_int, u_int, uint32_t, int);
337 static int mv_pcib_init(struct mv_pcib_softc *, int, int);
338 static int mv_pcib_init_all_bars(struct mv_pcib_softc *, int, int, int, int);
339 static void mv_pcib_init_bridge(struct mv_pcib_softc *, int, int, int);
340 static inline void pcib_write_irq_mask(struct mv_pcib_softc *, uint32_t);
341 static void mv_pcib_enable(struct mv_pcib_softc *, uint32_t);
342 static int mv_pcib_mem_init(struct mv_pcib_softc *);
344 /* Forward prototypes */
345 static int mv_pcib_probe(device_t);
346 static int mv_pcib_attach(device_t);
348 static struct resource *mv_pcib_alloc_resource(device_t, device_t, int, int *,
349 rman_res_t, rman_res_t, rman_res_t, u_int);
350 static int mv_pcib_release_resource(device_t, device_t, int, int,
352 static int mv_pcib_read_ivar(device_t, device_t, int, uintptr_t *);
353 static int mv_pcib_write_ivar(device_t, device_t, int, uintptr_t);
355 static int mv_pcib_maxslots(device_t);
356 static uint32_t mv_pcib_read_config(device_t, u_int, u_int, u_int, u_int, int);
357 static void mv_pcib_write_config(device_t, u_int, u_int, u_int, u_int,
359 static int mv_pcib_route_interrupt(device_t, device_t, int);
361 static int mv_pcib_alloc_msi(device_t, device_t, int, int, int *);
362 static int mv_pcib_map_msi(device_t, device_t, int, uint64_t *, uint32_t *);
363 static int mv_pcib_release_msi(device_t, device_t, int, int *);
366 * Bus interface definitions.
368 static device_method_t mv_pcib_methods[] = {
369 /* Device interface */
370 DEVMETHOD(device_probe, mv_pcib_probe),
371 DEVMETHOD(device_attach, mv_pcib_attach),
374 DEVMETHOD(bus_read_ivar, mv_pcib_read_ivar),
375 DEVMETHOD(bus_write_ivar, mv_pcib_write_ivar),
376 DEVMETHOD(bus_alloc_resource, mv_pcib_alloc_resource),
377 DEVMETHOD(bus_release_resource, mv_pcib_release_resource),
378 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource),
379 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource),
380 DEVMETHOD(bus_setup_intr, bus_generic_setup_intr),
381 DEVMETHOD(bus_teardown_intr, bus_generic_teardown_intr),
384 DEVMETHOD(pcib_maxslots, mv_pcib_maxslots),
385 DEVMETHOD(pcib_read_config, mv_pcib_read_config),
386 DEVMETHOD(pcib_write_config, mv_pcib_write_config),
387 DEVMETHOD(pcib_route_interrupt, mv_pcib_route_interrupt),
388 DEVMETHOD(pcib_request_feature, pcib_request_feature_allow),
390 DEVMETHOD(pcib_alloc_msi, mv_pcib_alloc_msi),
391 DEVMETHOD(pcib_release_msi, mv_pcib_release_msi),
392 DEVMETHOD(pcib_map_msi, mv_pcib_map_msi),
394 /* OFW bus interface */
395 DEVMETHOD(ofw_bus_get_compat, ofw_bus_gen_get_compat),
396 DEVMETHOD(ofw_bus_get_model, ofw_bus_gen_get_model),
397 DEVMETHOD(ofw_bus_get_name, ofw_bus_gen_get_name),
398 DEVMETHOD(ofw_bus_get_node, ofw_bus_gen_get_node),
399 DEVMETHOD(ofw_bus_get_type, ofw_bus_gen_get_type),
404 static driver_t mv_pcib_driver = {
407 sizeof(struct mv_pcib_softc),
410 devclass_t pcib_devclass;
412 DRIVER_MODULE(pcib, ofwbus, mv_pcib_driver, pcib_devclass, 0, 0);
413 DRIVER_MODULE(pcib, pcib_ctrl, mv_pcib_driver, pcib_devclass, 0, 0);
415 static struct mtx pcicfg_mtx;
418 mv_pcib_probe(device_t self)
422 node = ofw_bus_get_node(self);
423 if (!mv_fdt_is_type(node, "pci"))
426 if (!(ofw_bus_is_compatible(self, "mrvl,pcie") ||
427 ofw_bus_is_compatible(self, "mrvl,pci") ||
428 ofw_bus_node_is_compatible(
429 OF_parent(node), "marvell,armada-370-pcie")))
432 if (!ofw_bus_status_okay(self))
435 device_set_desc(self, "Marvell Integrated PCI/PCI-E Controller");
436 return (BUS_PROBE_DEFAULT);
440 mv_pcib_attach(device_t self)
442 struct mv_pcib_softc *sc;
443 phandle_t node, parnode;
445 int err, bus, devfn, port_id;
447 sc = device_get_softc(self);
450 node = ofw_bus_get_node(self);
451 parnode = OF_parent(node);
453 if (OF_getencprop(node, "marvell,pcie-port", &(port_id),
454 sizeof(port_id)) <= 0) {
455 /* If port ID does not exist in the FDT set value to 0 */
456 if (!OF_hasprop(node, "marvell,pcie-port"))
462 sc->ap_segment = port_id;
464 if (ofw_bus_node_is_compatible(node, "mrvl,pcie")) {
465 sc->sc_type = MV_TYPE_PCIE;
466 sc->sc_win_target = MV_WIN_PCIE_TARGET(port_id);
467 sc->sc_mem_win_attr = MV_WIN_PCIE_MEM_ATTR(port_id);
468 sc->sc_io_win_attr = MV_WIN_PCIE_IO_ATTR(port_id);
470 sc->sc_skip_enable_procedure = 1;
472 } else if (ofw_bus_node_is_compatible(parnode, "marvell,armada-370-pcie")) {
473 sc->sc_type = MV_TYPE_PCIE;
474 sc->sc_win_target = MV_WIN_PCIE_TARGET_ARMADA38X(port_id);
475 sc->sc_mem_win_attr = MV_WIN_PCIE_MEM_ATTR_ARMADA38X(port_id);
476 sc->sc_io_win_attr = MV_WIN_PCIE_IO_ATTR_ARMADA38X(port_id);
477 sc->sc_enable_find_root_slot = 1;
478 } else if (ofw_bus_node_is_compatible(node, "mrvl,pci")) {
479 sc->sc_type = MV_TYPE_PCI;
480 sc->sc_win_target = MV_WIN_PCI_TARGET;
481 sc->sc_mem_win_attr = MV_WIN_PCI_MEM_ATTR;
482 sc->sc_io_win_attr = MV_WIN_PCI_IO_ATTR;
487 * Retrieve our mem-mapped registers range.
490 sc->sc_res = bus_alloc_resource_any(self, SYS_RES_MEMORY, &sc->sc_rid,
492 if (sc->sc_res == NULL) {
493 device_printf(self, "could not map memory\n");
496 sc->sc_bst = rman_get_bustag(sc->sc_res);
497 sc->sc_bsh = rman_get_bushandle(sc->sc_res);
499 val = bus_space_read_4(sc->sc_bst, sc->sc_bsh, PCIE_REG_CONTROL);
500 sc->sc_mode = (val & PCIE_CONTROL_ROOT_CMPLX ? MV_MODE_ROOT :
504 * Get PCI interrupt info.
506 if (sc->sc_mode == MV_MODE_ROOT)
507 ofw_bus_setup_iinfo(node, &sc->sc_pci_iinfo, sizeof(pcell_t));
510 * Configure decode windows for PCI(E) access.
512 if (mv_pcib_decode_win(node, sc) != 0)
515 mv_pcib_hw_cfginit();
518 * Enable PCIE device.
520 mv_pcib_enable(sc, port_id);
525 err = mv_pcib_mem_init(sc);
530 * Preliminary bus enumeration to find first linked devices and set
531 * appropriate bus number from which should start the actual enumeration
533 for (bus = 0; bus < PCI_BUSMAX; bus++) {
534 for (devfn = 0; devfn < mv_pcib_maxslots(self); devfn++) {
535 reg0 = mv_pcib_read_config(self, bus, devfn, devfn & 0x7, 0x0, 4);
537 continue; /* no device */
539 sc->sc_busnr = bus; /* update bus number */
545 if (sc->sc_mode == MV_MODE_ROOT) {
546 err = mv_pcib_init(sc, sc->sc_busnr,
547 mv_pcib_maxslots(sc->sc_dev));
551 device_add_child(self, "pci", -1);
554 bus_space_write_4(sc->sc_bst, sc->sc_bsh,
555 PCIE_REG_STATUS, 1 << PCIE_STATUS_DEV_OFFS);
556 device_add_child(self, "pci_ep", -1);
559 mtx_init(&sc->sc_msi_mtx, "msi_mtx", NULL, MTX_DEF);
560 return (bus_generic_attach(self));
563 /* XXX SYS_RES_ should be released here */
564 rman_fini(&sc->sc_mem_rman);
565 rman_fini(&sc->sc_io_rman);
571 mv_pcib_enable(struct mv_pcib_softc *sc, uint32_t unit)
576 if (sc->sc_skip_enable_procedure)
577 goto pcib_enable_root_mode;
580 * Check if PCIE device is enabled.
582 if ((sc->sc_skip_enable_procedure == 0) &&
583 (read_cpu_ctrl(CPU_CONTROL) & CPU_CONTROL_PCIE_DISABLE(unit))) {
584 write_cpu_ctrl(CPU_CONTROL, read_cpu_ctrl(CPU_CONTROL) &
585 ~(CPU_CONTROL_PCIE_DISABLE(unit)));
587 timeout = PCIE_LINK_TIMEOUT;
588 val = bus_space_read_4(sc->sc_bst, sc->sc_bsh,
590 while (((val & PCIE_STATUS_LINK_DOWN) == 1) && (timeout > 0)) {
593 val = bus_space_read_4(sc->sc_bst, sc->sc_bsh,
598 pcib_enable_root_mode:
599 if (sc->sc_mode == MV_MODE_ROOT) {
603 val = bus_space_read_4(sc->sc_bst, sc->sc_bsh, PCIR_COMMAND);
604 val |= PCIM_CMD_SERRESPEN | PCIM_CMD_BUSMASTEREN |
605 PCIM_CMD_MEMEN | PCIM_CMD_PORTEN;
606 bus_space_write_4(sc->sc_bst, sc->sc_bsh, PCIR_COMMAND, val);
611 mv_pcib_mem_init(struct mv_pcib_softc *sc)
618 sc->sc_mem_rman.rm_type = RMAN_ARRAY;
619 err = rman_init(&sc->sc_mem_rman);
623 sc->sc_io_rman.rm_type = RMAN_ARRAY;
624 err = rman_init(&sc->sc_io_rman);
626 rman_fini(&sc->sc_mem_rman);
630 err = rman_manage_region(&sc->sc_mem_rman, sc->sc_mem_base,
631 sc->sc_mem_base + sc->sc_mem_size - 1);
635 err = rman_manage_region(&sc->sc_io_rman, sc->sc_io_base,
636 sc->sc_io_base + sc->sc_io_size - 1);
643 rman_fini(&sc->sc_mem_rman);
644 rman_fini(&sc->sc_io_rman);
649 static inline uint32_t
650 pcib_bit_get(uint32_t *map, uint32_t bit)
652 uint32_t n = bit / BITS_PER_UINT32;
654 bit = bit % BITS_PER_UINT32;
655 return (map[n] & (1 << bit));
659 pcib_bit_set(uint32_t *map, uint32_t bit)
661 uint32_t n = bit / BITS_PER_UINT32;
663 bit = bit % BITS_PER_UINT32;
664 map[n] |= (1 << bit);
667 static inline uint32_t
668 pcib_map_check(uint32_t *map, uint32_t start, uint32_t bits)
672 for (i = start; i < start + bits; i++)
673 if (pcib_bit_get(map, i))
680 pcib_map_set(uint32_t *map, uint32_t start, uint32_t bits)
684 for (i = start; i < start + bits; i++)
685 pcib_bit_set(map, i);
689 * The idea of this allocator is taken from ARM No-Cache memory
690 * management code (sys/arm/arm/vm_machdep.c).
693 pcib_alloc(struct mv_pcib_softc *sc, uint32_t smask)
695 uint32_t bits, bits_limit, i, *map, min_alloc, size;
700 base = sc->sc_io_base;
701 min_alloc = PCI_MIN_IO_ALLOC;
702 bits_limit = sc->sc_io_size / min_alloc;
706 base = sc->sc_mem_base;
707 min_alloc = PCI_MIN_MEM_ALLOC;
708 bits_limit = sc->sc_mem_size / min_alloc;
709 map = sc->sc_mem_map;
714 bits = size / min_alloc;
716 for (i = 0; i + bits <= bits_limit; i += bits)
717 if (pcib_map_check(map, i, bits)) {
718 pcib_map_set(map, i, bits);
719 addr = base + (i * min_alloc);
727 mv_pcib_init_bar(struct mv_pcib_softc *sc, int bus, int slot, int func,
733 reg = PCIR_BAR(barno);
736 * Need to init the BAR register with 0xffffffff before correct
739 mv_pcib_write_config(sc->sc_dev, bus, slot, func, reg, ~0, 4);
740 bar = mv_pcib_read_config(sc->sc_dev, bus, slot, func, reg, 4);
744 /* Calculate BAR size: 64 or 32 bit (in 32-bit units) */
745 width = ((bar & 7) == 4) ? 2 : 1;
747 addr = pcib_alloc(sc, bar);
752 printf("PCI %u:%u:%u: reg %x: smask=%08x: addr=%08x\n",
753 bus, slot, func, reg, bar, addr);
755 mv_pcib_write_config(sc->sc_dev, bus, slot, func, reg, addr, 4);
757 mv_pcib_write_config(sc->sc_dev, bus, slot, func, reg + 4,
764 mv_pcib_init_bridge(struct mv_pcib_softc *sc, int bus, int slot, int func)
766 bus_addr_t io_base, mem_base;
767 uint32_t io_limit, mem_limit;
770 io_base = sc->sc_io_base;
771 io_limit = io_base + sc->sc_io_size - 1;
772 mem_base = sc->sc_mem_base;
773 mem_limit = mem_base + sc->sc_mem_size - 1;
775 /* Configure I/O decode registers */
776 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_IOBASEL_1,
778 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_IOBASEH_1,
780 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_IOLIMITL_1,
782 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_IOLIMITH_1,
785 /* Configure memory decode registers */
786 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_MEMBASE_1,
788 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_MEMLIMIT_1,
791 /* Disable memory prefetch decode */
792 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_PMBASEL_1,
794 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_PMBASEH_1,
796 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_PMLIMITL_1,
798 mv_pcib_write_config(sc->sc_dev, bus, slot, func, PCIR_PMLIMITH_1,
801 secbus = mv_pcib_read_config(sc->sc_dev, bus, slot, func,
804 /* Configure buses behind the bridge */
805 mv_pcib_init(sc, secbus, PCI_SLOTMAX);
809 mv_pcib_init(struct mv_pcib_softc *sc, int bus, int maxslot)
811 int slot, func, maxfunc, error;
812 uint8_t hdrtype, command, class, subclass;
814 for (slot = 0; slot <= maxslot; slot++) {
816 for (func = 0; func <= maxfunc; func++) {
817 hdrtype = mv_pcib_read_config(sc->sc_dev, bus, slot,
818 func, PCIR_HDRTYPE, 1);
820 if ((hdrtype & PCIM_HDRTYPE) > PCI_MAXHDRTYPE)
823 if (func == 0 && (hdrtype & PCIM_MFDEV))
824 maxfunc = PCI_FUNCMAX;
826 command = mv_pcib_read_config(sc->sc_dev, bus, slot,
827 func, PCIR_COMMAND, 1);
828 command &= ~(PCIM_CMD_MEMEN | PCIM_CMD_PORTEN);
829 mv_pcib_write_config(sc->sc_dev, bus, slot, func,
830 PCIR_COMMAND, command, 1);
832 error = mv_pcib_init_all_bars(sc, bus, slot, func,
838 command |= PCIM_CMD_BUSMASTEREN | PCIM_CMD_MEMEN |
840 mv_pcib_write_config(sc->sc_dev, bus, slot, func,
841 PCIR_COMMAND, command, 1);
843 /* Handle PCI-PCI bridges */
844 class = mv_pcib_read_config(sc->sc_dev, bus, slot,
845 func, PCIR_CLASS, 1);
846 subclass = mv_pcib_read_config(sc->sc_dev, bus, slot,
847 func, PCIR_SUBCLASS, 1);
849 if (class != PCIC_BRIDGE ||
850 subclass != PCIS_BRIDGE_PCI)
853 mv_pcib_init_bridge(sc, bus, slot, func);
857 /* Enable all ABCD interrupts */
858 pcib_write_irq_mask(sc, (0xF << 24));
864 mv_pcib_init_all_bars(struct mv_pcib_softc *sc, int bus, int slot,
865 int func, int hdrtype)
869 maxbar = (hdrtype & PCIM_HDRTYPE) ? 0 : 6;
872 /* Program the base address registers */
873 while (bar < maxbar) {
874 i = mv_pcib_init_bar(sc, bus, slot, func, bar);
877 device_printf(sc->sc_dev,
878 "PCI IO/Memory space exhausted\n");
886 static struct resource *
887 mv_pcib_alloc_resource(device_t dev, device_t child, int type, int *rid,
888 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags)
890 struct mv_pcib_softc *sc = device_get_softc(dev);
891 struct rman *rm = NULL;
892 struct resource *res;
896 rm = &sc->sc_io_rman;
899 rm = &sc->sc_mem_rman;
903 return (pci_domain_alloc_bus(sc->ap_segment, child, rid, start,
907 return (BUS_ALLOC_RESOURCE(device_get_parent(dev), dev,
908 type, rid, start, end, count, flags));
911 if (RMAN_IS_DEFAULT_RANGE(start, end)) {
912 start = sc->sc_mem_base;
913 end = sc->sc_mem_base + sc->sc_mem_size - 1;
914 count = sc->sc_mem_size;
917 if ((start < sc->sc_mem_base) || (start + count - 1 != end) ||
918 (end > sc->sc_mem_base + sc->sc_mem_size - 1))
921 res = rman_reserve_resource(rm, start, end, count, flags, child);
925 rman_set_rid(res, *rid);
926 rman_set_bustag(res, fdtbus_bs_tag);
927 rman_set_bushandle(res, start);
929 if (flags & RF_ACTIVE)
930 if (bus_activate_resource(child, type, *rid, res)) {
931 rman_release_resource(res);
939 mv_pcib_release_resource(device_t dev, device_t child, int type, int rid,
940 struct resource *res)
943 struct mv_pcib_softc *sc = device_get_softc(dev);
945 if (type == PCI_RES_BUS)
946 return (pci_domain_release_bus(sc->ap_segment, child, rid, res));
948 if (type != SYS_RES_IOPORT && type != SYS_RES_MEMORY)
949 return (BUS_RELEASE_RESOURCE(device_get_parent(dev), child,
952 return (rman_release_resource(res));
956 mv_pcib_read_ivar(device_t dev, device_t child, int which, uintptr_t *result)
958 struct mv_pcib_softc *sc = device_get_softc(dev);
962 *result = sc->sc_busnr;
964 case PCIB_IVAR_DOMAIN:
965 *result = device_get_unit(dev);
973 mv_pcib_write_ivar(device_t dev, device_t child, int which, uintptr_t value)
975 struct mv_pcib_softc *sc = device_get_softc(dev);
979 sc->sc_busnr = value;
987 pcib_write_irq_mask(struct mv_pcib_softc *sc, uint32_t mask)
990 if (sc->sc_type != MV_TYPE_PCIE)
993 bus_space_write_4(sc->sc_bst, sc->sc_bsh, PCIE_REG_IRQ_MASK, mask);
997 mv_pcib_hw_cfginit(void)
999 static int opened = 0;
1004 mtx_init(&pcicfg_mtx, "pcicfg", NULL, MTX_SPIN);
1009 mv_pcib_hw_cfgread(struct mv_pcib_softc *sc, u_int bus, u_int slot,
1010 u_int func, u_int reg, int bytes)
1012 uint32_t addr, data, ca, cd;
1014 ca = (sc->sc_type != MV_TYPE_PCI) ?
1015 PCIE_REG_CFG_ADDR : PCI_REG_CFG_ADDR;
1016 cd = (sc->sc_type != MV_TYPE_PCI) ?
1017 PCIE_REG_CFG_DATA : PCI_REG_CFG_DATA;
1018 addr = PCI_CFG_ENA | PCI_CFG_BUS(bus) | PCI_CFG_DEV(slot) |
1019 PCI_CFG_FUN(func) | PCI_CFG_PCIE_REG(reg);
1021 mtx_lock_spin(&pcicfg_mtx);
1022 bus_space_write_4(sc->sc_bst, sc->sc_bsh, ca, addr);
1027 data = bus_space_read_1(sc->sc_bst, sc->sc_bsh,
1031 data = le16toh(bus_space_read_2(sc->sc_bst, sc->sc_bsh,
1035 data = le32toh(bus_space_read_4(sc->sc_bst, sc->sc_bsh,
1039 mtx_unlock_spin(&pcicfg_mtx);
1044 mv_pcib_hw_cfgwrite(struct mv_pcib_softc *sc, u_int bus, u_int slot,
1045 u_int func, u_int reg, uint32_t data, int bytes)
1047 uint32_t addr, ca, cd;
1049 ca = (sc->sc_type != MV_TYPE_PCI) ?
1050 PCIE_REG_CFG_ADDR : PCI_REG_CFG_ADDR;
1051 cd = (sc->sc_type != MV_TYPE_PCI) ?
1052 PCIE_REG_CFG_DATA : PCI_REG_CFG_DATA;
1053 addr = PCI_CFG_ENA | PCI_CFG_BUS(bus) | PCI_CFG_DEV(slot) |
1054 PCI_CFG_FUN(func) | PCI_CFG_PCIE_REG(reg);
1056 mtx_lock_spin(&pcicfg_mtx);
1057 bus_space_write_4(sc->sc_bst, sc->sc_bsh, ca, addr);
1061 bus_space_write_1(sc->sc_bst, sc->sc_bsh,
1062 cd + (reg & 3), data);
1065 bus_space_write_2(sc->sc_bst, sc->sc_bsh,
1066 cd + (reg & 2), htole16(data));
1069 bus_space_write_4(sc->sc_bst, sc->sc_bsh,
1073 mtx_unlock_spin(&pcicfg_mtx);
1077 mv_pcib_maxslots(device_t dev)
1079 struct mv_pcib_softc *sc = device_get_softc(dev);
1081 return ((sc->sc_type != MV_TYPE_PCI) ? 1 : PCI_SLOTMAX);
1085 mv_pcib_root_slot(device_t dev, u_int bus, u_int slot, u_int func)
1087 struct mv_pcib_softc *sc = device_get_softc(dev);
1088 uint32_t vendor, device;
1090 /* On platforms other than Armada38x, root link is always at slot 0 */
1091 if (!sc->sc_enable_find_root_slot)
1094 vendor = mv_pcib_hw_cfgread(sc, bus, slot, func, PCIR_VENDOR,
1095 PCIR_VENDOR_LENGTH);
1096 device = mv_pcib_hw_cfgread(sc, bus, slot, func, PCIR_DEVICE,
1097 PCIR_DEVICE_LENGTH) & MV_DEV_FAMILY_MASK;
1099 return (vendor == PCI_VENDORID_MRVL && device == MV_DEV_ARMADA38X);
1103 mv_pcib_read_config(device_t dev, u_int bus, u_int slot, u_int func,
1104 u_int reg, int bytes)
1106 struct mv_pcib_softc *sc = device_get_softc(dev);
1108 /* Return ~0 if link is inactive or trying to read from Root */
1109 if ((bus_space_read_4(sc->sc_bst, sc->sc_bsh, PCIE_REG_STATUS) &
1110 PCIE_STATUS_LINK_DOWN) || mv_pcib_root_slot(dev, bus, slot, func))
1113 return (mv_pcib_hw_cfgread(sc, bus, slot, func, reg, bytes));
1117 mv_pcib_write_config(device_t dev, u_int bus, u_int slot, u_int func,
1118 u_int reg, uint32_t val, int bytes)
1120 struct mv_pcib_softc *sc = device_get_softc(dev);
1122 /* Return if link is inactive or trying to write to Root */
1123 if ((bus_space_read_4(sc->sc_bst, sc->sc_bsh, PCIE_REG_STATUS) &
1124 PCIE_STATUS_LINK_DOWN) || mv_pcib_root_slot(dev, bus, slot, func))
1127 mv_pcib_hw_cfgwrite(sc, bus, slot, func, reg, val, bytes);
1131 mv_pcib_route_interrupt(device_t bus, device_t dev, int pin)
1133 struct mv_pcib_softc *sc;
1134 struct ofw_pci_register reg;
1135 uint32_t pintr, mintr[4];
1139 sc = device_get_softc(bus);
1142 /* Fabricate imap information in case this isn't an OFW device */
1143 bzero(®, sizeof(reg));
1144 reg.phys_hi = (pci_get_bus(dev) << OFW_PCI_PHYS_HI_BUSSHIFT) |
1145 (pci_get_slot(dev) << OFW_PCI_PHYS_HI_DEVICESHIFT) |
1146 (pci_get_function(dev) << OFW_PCI_PHYS_HI_FUNCTIONSHIFT);
1148 icells = ofw_bus_lookup_imap(ofw_bus_get_node(dev), &sc->sc_pci_iinfo,
1149 ®, sizeof(reg), &pintr, sizeof(pintr), mintr, sizeof(mintr),
1152 return (ofw_bus_map_intr(dev, iparent, icells, mintr));
1154 /* Maybe it's a real interrupt, not an intpin */
1158 device_printf(bus, "could not route pin %d for device %d.%d\n",
1159 pin, pci_get_slot(dev), pci_get_function(dev));
1160 return (PCI_INVALID_IRQ);
1164 mv_pcib_decode_win(phandle_t node, struct mv_pcib_softc *sc)
1166 struct mv_pci_range io_space, mem_space;
1172 if ((error = mv_pci_ranges(node, &io_space, &mem_space)) != 0) {
1173 device_printf(dev, "could not retrieve 'ranges' data\n");
1177 /* Configure CPU decoding windows */
1178 error = decode_win_cpu_set(sc->sc_win_target,
1179 sc->sc_io_win_attr, io_space.base_parent, io_space.len, ~0);
1181 device_printf(dev, "could not set up CPU decode "
1182 "window for PCI IO\n");
1185 error = decode_win_cpu_set(sc->sc_win_target,
1186 sc->sc_mem_win_attr, mem_space.base_parent, mem_space.len,
1187 mem_space.base_parent);
1189 device_printf(dev, "could not set up CPU decode "
1190 "windows for PCI MEM\n");
1194 sc->sc_io_base = io_space.base_parent;
1195 sc->sc_io_size = io_space.len;
1197 sc->sc_mem_base = mem_space.base_parent;
1198 sc->sc_mem_size = mem_space.len;
1204 mv_pcib_map_msi(device_t dev, device_t child, int irq, uint64_t *addr,
1207 struct mv_pcib_softc *sc;
1209 sc = device_get_softc(dev);
1210 if (!sc->sc_msi_supported)
1213 irq = irq - MSI_IRQ;
1215 /* validate parameters */
1216 if (isclr(&sc->sc_msi_bitmap, irq)) {
1217 device_printf(dev, "invalid MSI 0x%x\n", irq);
1222 mv_msi_data(irq, addr, data);
1225 debugf("%s: irq: %d addr: %jx data: %x\n",
1226 __func__, irq, *addr, *data);
1232 mv_pcib_alloc_msi(device_t dev, device_t child, int count,
1233 int maxcount __unused, int *irqs)
1235 struct mv_pcib_softc *sc;
1238 sc = device_get_softc(dev);
1239 if (!sc->sc_msi_supported)
1242 if (powerof2(count) == 0 || count > MSI_IRQ_NUM)
1245 mtx_lock(&sc->sc_msi_mtx);
1247 for (start = 0; (start + count) < MSI_IRQ_NUM; start++) {
1248 for (i = start; i < start + count; i++) {
1249 if (isset(&sc->sc_msi_bitmap, i))
1252 if (i == start + count)
1256 if ((start + count) == MSI_IRQ_NUM) {
1257 mtx_unlock(&sc->sc_msi_mtx);
1261 for (i = start; i < start + count; i++) {
1262 setbit(&sc->sc_msi_bitmap, i);
1263 *irqs++ = MSI_IRQ + i;
1265 debugf("%s: start: %x count: %x\n", __func__, start, count);
1267 mtx_unlock(&sc->sc_msi_mtx);
1272 mv_pcib_release_msi(device_t dev, device_t child, int count, int *irqs)
1274 struct mv_pcib_softc *sc;
1277 sc = device_get_softc(dev);
1278 if(!sc->sc_msi_supported)
1281 mtx_lock(&sc->sc_msi_mtx);
1283 for (i = 0; i < count; i++)
1284 clrbit(&sc->sc_msi_bitmap, irqs[i] - MSI_IRQ);
1286 mtx_unlock(&sc->sc_msi_mtx);