imxpcie.c revision 1.2.4.1 1 /* $NetBSD: imxpcie.c,v 1.2.4.1 2021/05/31 22:15:11 cjep Exp $ */
2
3 /*
4 * Copyright (c) 2019 Genetec Corporation. All rights reserved.
5 * Written by Hashimoto Kenichi for Genetec Corporation.
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 *
16 * THIS SOFTWARE IS PROVIDED BY GENETEC CORPORATION ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL GENETEC CORPORATION
20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 /*
30 * i.MX6 On-Chip PCI Express Controller
31 */
32
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: imxpcie.c,v 1.2.4.1 2021/05/31 22:15:11 cjep Exp $");
35
36 #include "opt_pci.h"
37 #include "opt_fdt.h"
38
39 #include "pci.h"
40 #include "locators.h"
41
42 #define _INTR_PRIVATE
43
44 #include <sys/bus.h>
45 #include <sys/device.h>
46 #include <sys/intr.h>
47 #include <sys/systm.h>
48 #include <sys/param.h>
49 #include <sys/kernel.h>
50 #include <sys/extent.h>
51 #include <sys/queue.h>
52 #include <sys/mutex.h>
53 #include <sys/kmem.h>
54
55 #include <machine/frame.h>
56 #include <arm/cpufunc.h>
57
58 #include <dev/pci/pcireg.h>
59 #include <dev/pci/pcivar.h>
60 #include <dev/pci/pciconf.h>
61 #include <dev/clk/clk_backend.h>
62
63 #include <arm/imx/imxpciereg.h>
64 #include <arm/imx/imxpcievar.h>
65 #include <arm/nxp/imx6_iomuxreg.h>
66
67 #define PCIE_CONF_LOCK(s) (s) = disable_interrupts(I32_bit)
68 #define PCIE_CONF_UNLOCK(s) restore_interrupts((s))
69
70 #define PCIE_READ(sc, reg) \
71 bus_space_read_4((sc)->sc_iot, (sc)->sc_ioh, reg)
72 #define PCIE_WRITE(sc, reg, val) \
73 bus_space_write_4((sc)->sc_iot, (sc)->sc_ioh, reg, val)
74
75 static void imxpcie_init(pci_chipset_tag_t, void *);
76 static void imxpcie_setup(struct imxpcie_softc * const);
77
78 static void imxpcie_attach_hook(device_t, device_t, struct pcibus_attach_args *);
79 static int imxpcie_bus_maxdevs(void *, int);
80 static pcitag_t imxpcie_make_tag(void *, int, int, int);
81 static void imxpcie_decompose_tag(void *, pcitag_t, int *, int *, int *);
82 static pcireg_t imxpcie_conf_read(void *, pcitag_t, int);
83 static void imxpcie_conf_write(void *, pcitag_t, int, pcireg_t);
84 #ifdef __HAVE_PCI_CONF_HOOK
85 static int imxpcie_conf_hook(void *, int, int, int, pcireg_t);
86 #endif
87 static void imxpcie_conf_interrupt(void *, int, int, int, int, int *);
88
89 static int imxpcie_intr_map(const struct pci_attach_args *, pci_intr_handle_t *);
90 static const char *imxpcie_intr_string(void *, pci_intr_handle_t, char *, size_t);
91 const struct evcnt *imxpcie_intr_evcnt(void *, pci_intr_handle_t);
92 static void * imxpcie_intr_establish(void *, pci_intr_handle_t, int,
93 int (*)(void *), void *, const char *);
94 static void imxpcie_intr_disestablish(void *, void *);
95
96 static int
97 imxpcie_linkup_status(struct imxpcie_softc *sc)
98 {
99 return PCIE_READ(sc, PCIE_PL_DEBUG1) & PCIE_PL_DEBUG1_XMLH_LINK_UP;
100 }
101
102 static int
103 imxpcie_valid_device(struct imxpcie_softc *sc, int bus, int dev)
104 {
105 if (bus != 0 && !imxpcie_linkup_status(sc))
106 return 0;
107 if (bus <= 1 && dev > 0)
108 return 0;
109
110 return 1;
111 }
112
113 static int
114 imxpcie_init_phy(struct imxpcie_softc *sc)
115 {
116 uint32_t v;
117
118 /* initialize IOMUX */
119 v = sc->sc_gpr_read(sc, IOMUX_GPR12);
120 v &= ~IOMUX_GPR12_APP_LTSSM_ENABLE;
121 sc->sc_gpr_write(sc, IOMUX_GPR12, v);
122
123 v &= ~IOMUX_GPR12_LOS_LEVEL;
124 v |= __SHIFTIN(9, IOMUX_GPR12_LOS_LEVEL);
125 sc->sc_gpr_write(sc, IOMUX_GPR12, v);
126
127 v = 0;
128 v |= __SHIFTIN(0x7f, IOMUX_GPR8_PCS_TX_SWING_LOW);
129 v |= __SHIFTIN(0x7f, IOMUX_GPR8_PCS_TX_SWING_FULL);
130 v |= __SHIFTIN(20, IOMUX_GPR8_PCS_TX_DEEMPH_GEN2_6DB);
131 v |= __SHIFTIN(20, IOMUX_GPR8_PCS_TX_DEEMPH_GEN2_3P5DB);
132 v |= __SHIFTIN(20, IOMUX_GPR8_PCS_TX_DEEMPH_GEN1);
133 sc->sc_gpr_write(sc, IOMUX_GPR8, v);
134
135 v = sc->sc_gpr_read(sc, IOMUX_GPR12);
136 v &= ~IOMUX_GPR12_DEVICE_TYPE;
137 v |= IOMUX_GPR12_DEVICE_TYPE_PCIE_RC;
138 sc->sc_gpr_write(sc, IOMUX_GPR12, v);
139
140 return 0;
141 }
142
143 static int
144 imxpcie_phy_wait_ack(struct imxpcie_softc *sc, int ack)
145 {
146 uint32_t v;
147 int timeout;
148
149 for (timeout = 10; timeout > 0; --timeout) {
150 v = PCIE_READ(sc, PCIE_PL_PHY_STATUS);
151 if (!!(v & PCIE_PL_PHY_STATUS_ACK) == !!ack)
152 return 0;
153 delay(1);
154 }
155
156 return -1;
157 }
158
159 static int
160 imxpcie_phy_addr(struct imxpcie_softc *sc, uint32_t addr)
161 {
162 uint32_t v;
163
164 v = __SHIFTIN(addr, PCIE_PL_PHY_CTRL_DATA);
165 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, v);
166
167 v |= PCIE_PL_PHY_CTRL_CAP_ADR;
168 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, v);
169
170 if (imxpcie_phy_wait_ack(sc, 1))
171 return -1;
172
173 v = __SHIFTIN(addr, PCIE_PL_PHY_CTRL_DATA);
174 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, v);
175
176 if (imxpcie_phy_wait_ack(sc, 0))
177 return -1;
178
179 return 0;
180 }
181
182 static int
183 imxpcie_phy_write(struct imxpcie_softc *sc, uint32_t addr, uint16_t data)
184 {
185 /* write address */
186 if (imxpcie_phy_addr(sc, addr) != 0)
187 return -1;
188
189 /* store data */
190 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, __SHIFTIN(data, PCIE_PL_PHY_CTRL_DATA));
191
192 /* assert CAP_DAT and wait ack */
193 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, __SHIFTIN(data, PCIE_PL_PHY_CTRL_DATA) | PCIE_PL_PHY_CTRL_CAP_DAT);
194 if (imxpcie_phy_wait_ack(sc, 1))
195 return -1;
196
197 /* deassert CAP_DAT and wait ack */
198 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, __SHIFTIN(data, PCIE_PL_PHY_CTRL_DATA));
199 if (imxpcie_phy_wait_ack(sc, 0))
200 return -1;
201
202 /* assert WR and wait ack */
203 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, PCIE_PL_PHY_CTRL_WR);
204 if (imxpcie_phy_wait_ack(sc, 1))
205 return -1;
206
207 /* deassert WR and wait ack */
208 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, __SHIFTIN(data, PCIE_PL_PHY_CTRL_DATA));
209 if (imxpcie_phy_wait_ack(sc, 0))
210 return -1;
211
212 /* done */
213 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, 0);
214
215 return 0;
216 }
217
218 static int
219 imxpcie_phy_read(struct imxpcie_softc *sc, uint32_t addr)
220 {
221 uint32_t v;
222
223 /* write address */
224 if (imxpcie_phy_addr(sc, addr) != 0)
225 return -1;
226
227 /* assert RD */
228 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, PCIE_PL_PHY_CTRL_RD);
229 if (imxpcie_phy_wait_ack(sc, 1))
230 return -1;
231
232 /* read data */
233 v = __SHIFTOUT(PCIE_READ(sc, PCIE_PL_PHY_STATUS),
234 PCIE_PL_PHY_STATUS_DATA);
235
236 /* deassert RD */
237 PCIE_WRITE(sc, PCIE_PL_PHY_CTRL, 0);
238 if (imxpcie_phy_wait_ack(sc, 0))
239 return -1;
240
241 return v;
242 }
243
244 static int
245 imxpcie_assert_core_reset(struct imxpcie_softc *sc)
246 {
247 uint32_t gpr1 = sc->sc_gpr_read(sc, IOMUX_GPR1);
248
249 if (sc->sc_have_sw_reset) {
250 gpr1 |= IOMUX_GPR1_PCIE_SW_RST;
251 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
252 } else {
253 uint32_t gpr12 = sc->sc_gpr_read(sc, IOMUX_GPR12);
254
255 /* already enabled by bootloader */
256 if ((gpr1 & IOMUX_GPR1_REF_SSP_EN) &&
257 (gpr12 & IOMUX_GPR12_APP_LTSSM_ENABLE)) {
258 uint32_t v = PCIE_READ(sc, PCIE_PL_PFLR);
259 v &= ~PCIE_PL_PFLR_LINK_STATE;
260 v |= PCIE_PL_PFLR_FORCE_LINK;
261 PCIE_WRITE(sc, PCIE_PL_PFLR, v);
262
263 gpr12 &= ~IOMUX_GPR12_APP_LTSSM_ENABLE;
264 sc->sc_gpr_write(sc, IOMUX_GPR12, gpr12);
265 }
266 }
267
268 gpr1 |= IOMUX_GPR1_TEST_POWERDOWN;
269 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
270 gpr1 &= ~IOMUX_GPR1_REF_SSP_EN;
271 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
272
273 return 0;
274 }
275
276 static int
277 imxpcie_deassert_core_reset(struct imxpcie_softc *sc)
278 {
279 int error;
280
281 error = clk_enable(sc->sc_clk_pcie);
282 if (error) {
283 aprint_error_dev(sc->sc_dev, "couldn't enable pcie: %d\n", error);
284 return error;
285 }
286
287 if (sc->sc_ext_osc) {
288 error = clk_enable(sc->sc_clk_pcie_ext);
289 if (error) {
290 aprint_error_dev(sc->sc_dev, "couldn't enable ext: %d\n", error);
291 return error;
292 }
293 } else {
294 error = clk_enable(sc->sc_clk_pcie_bus);
295 if (error) {
296 aprint_error_dev(sc->sc_dev, "couldn't enable pcie_bus: %d\n",
297 error);
298 return error;
299 }
300 }
301
302 error = clk_enable(sc->sc_clk_pcie_phy);
303 if (error) {
304 aprint_error_dev(sc->sc_dev, "couldn't enable pcie_ref: %d\n", error);
305 return error;
306 }
307
308 uint32_t gpr1 = sc->sc_gpr_read(sc, IOMUX_GPR1);
309
310 delay(50 * 1000);
311
312 gpr1 &= ~IOMUX_GPR1_TEST_POWERDOWN;
313 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
314 delay(10);
315 gpr1 |= IOMUX_GPR1_REF_SSP_EN;
316 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
317
318 delay(50 * 1000);
319
320 /* Reset */
321 if (sc->sc_reset != NULL)
322 sc->sc_reset(sc);
323
324 if (sc->sc_have_sw_reset) {
325 gpr1 &= ~IOMUX_GPR1_PCIE_SW_RST;
326 sc->sc_gpr_write(sc, IOMUX_GPR1, gpr1);
327 delay(200);
328 }
329
330 uint64_t rate;
331 if (sc->sc_ext_osc)
332 rate = clk_get_rate(sc->sc_clk_pcie_ext);
333 else
334 rate = clk_get_rate(sc->sc_clk_pcie_phy);
335 aprint_normal_dev(sc->sc_dev, "PCIe ref clk %d MHz\n", (int)(rate / 1000 / 1000));
336
337 int mult;
338 int div;
339 if (rate == 100000000) {
340 mult = 25;
341 div = 0;
342 } else if (rate == 125000000) {
343 mult = 40;
344 div = 1;
345 } else if (rate == 200000000) {
346 mult = 25;
347 div = 1;
348 } else {
349 return -1;
350 }
351
352 uint32_t val;
353 val = imxpcie_phy_read(sc, PCIE_PHY_MPLL_OVRD_IN_LO);
354 val &= ~MPLL_MULTIPLIER;
355 val |= __SHIFTIN(mult, MPLL_MULTIPLIER);
356 val |= MPLL_MULTIPLIER_OVRD;
357 imxpcie_phy_write(sc, PCIE_PHY_MPLL_OVRD_IN_LO, val);
358
359 val = imxpcie_phy_read(sc, PCIE_PHY_ATEOVRD);
360 val &= ~REF_CLKDIV2;
361 val |= __SHIFTIN(div, REF_CLKDIV2);
362 val |= ATEOVRD_EN;
363 imxpcie_phy_write(sc, PCIE_PHY_ATEOVRD, val);
364
365 return 0;
366 }
367
368 static int
369 imxpcie_wait_for_link(struct imxpcie_softc *sc)
370 {
371 #define LINKUP_RETRY 20000
372 for (int retry = LINKUP_RETRY; retry > 0; --retry) {
373 if (!imxpcie_linkup_status(sc)) {
374 delay(10);
375 continue;
376 }
377
378 uint32_t valid = imxpcie_phy_read(sc, PCIE_PHY_RX_ASIC_OUT) &
379 PCIE_PHY_RX_ASIC_OUT_VALID;
380 uint32_t ltssm = __SHIFTOUT(PCIE_READ(sc, PCIE_PL_DEBUG0),
381 PCIE_PL_DEBUG0_XMLH_LTSSM_STATE);
382
383 if ((ltssm == 0x0d) && !valid) {
384 aprint_normal_dev(sc->sc_dev, "resetting PCIe phy\n");
385
386 uint32_t v = imxpcie_phy_read(sc, PCIE_PHY_RX_OVRD_IN_LO);
387 v |= PCIE_PHY_RX_OVRD_IN_LO_RX_PLL_EN_OVRD;
388 v |= PCIE_PHY_RX_OVRD_IN_LO_RX_DATA_EN_OVRD;
389 imxpcie_phy_write(sc, PCIE_PHY_RX_OVRD_IN_LO, v);
390
391 delay(3000);
392
393 v = imxpcie_phy_read(sc, PCIE_PHY_RX_OVRD_IN_LO);
394 v &= ~PCIE_PHY_RX_OVRD_IN_LO_RX_PLL_EN_OVRD;
395 v &= ~PCIE_PHY_RX_OVRD_IN_LO_RX_DATA_EN_OVRD;
396 imxpcie_phy_write(sc, PCIE_PHY_RX_OVRD_IN_LO, v);
397 }
398
399 return 0;
400 }
401
402 aprint_error_dev(sc->sc_dev, "Link Up failed.\n");
403
404 return -1;
405 }
406
407 static int
408 imxpcie_wait_for_changespeed(struct imxpcie_softc *sc)
409 {
410 #define CHANGESPEED_RETRY 200
411 for (int retry = CHANGESPEED_RETRY; retry > 0; --retry) {
412 uint32_t v = PCIE_READ(sc, PCIE_PL_G2CR);
413 if (!(v & PCIE_PL_G2CR_DIRECTED_SPEED_CHANGE))
414 return 0;
415 delay(100);
416 }
417
418 aprint_error_dev(sc->sc_dev, "Speed change timeout.\n");
419
420 return -1;
421 }
422
423 static void
424 imxpcie_linkup(struct imxpcie_softc *sc)
425 {
426 uint32_t v;
427 int ret;
428
429 imxpcie_assert_core_reset(sc);
430 imxpcie_init_phy(sc);
431 imxpcie_deassert_core_reset(sc);
432
433 imxpcie_setup(sc);
434
435 /* GEN1 Operation */
436 v = PCIE_READ(sc, PCIE_RC_LCR);
437 v &= ~PCIE_RC_LCR_MAX_LINK_SPEEDS;
438 v |= PCIE_RC_LCR_MAX_LINK_SPEEDS_GEN1;
439 PCIE_WRITE(sc, PCIE_RC_LCR, v);
440
441 /* Link Up */
442 v = sc->sc_gpr_read(sc, IOMUX_GPR12);
443 v |= IOMUX_GPR12_APP_LTSSM_ENABLE;
444 sc->sc_gpr_write(sc, IOMUX_GPR12, v);
445
446 ret = imxpcie_wait_for_link(sc);
447 if (ret)
448 goto error;
449
450 /* Allow Gen2 mode */
451 v = PCIE_READ(sc, PCIE_RC_LCR);
452 v &= ~PCIE_RC_LCR_MAX_LINK_SPEEDS;
453 v |= PCIE_RC_LCR_MAX_LINK_SPEEDS_GEN2;
454 PCIE_WRITE(sc, PCIE_RC_LCR, v);
455
456 /* Change speed */
457 v = PCIE_READ(sc, PCIE_PL_G2CR);
458 v |= PCIE_PL_G2CR_DIRECTED_SPEED_CHANGE;
459 PCIE_WRITE(sc, PCIE_PL_G2CR, v);
460
461 ret = imxpcie_wait_for_changespeed(sc);
462 if (ret)
463 goto error;
464
465 ret = imxpcie_wait_for_link(sc);
466 if (ret)
467 goto error;
468
469 v = PCIE_READ(sc, PCIE_RC_LCSR);
470 aprint_normal_dev(sc->sc_dev, "LinkUp, Gen %d\n",
471 (int)__SHIFTOUT(v, PCIE_RC_LCSR_LINK_SPEED));
472
473 return;
474
475 error:
476 aprint_error_dev(sc->sc_dev, "PCIE_PL_DEBUG0,1 = %08x, %08x\n",
477 PCIE_READ(sc, PCIE_PL_DEBUG0), PCIE_READ(sc, PCIE_PL_DEBUG1));
478
479 return;
480 }
481
482 void
483 imxpcie_attach_common(struct imxpcie_softc * const sc)
484 {
485 struct pcibus_attach_args pba;
486
487 if (bus_space_map(sc->sc_iot, sc->sc_root_addr, sc->sc_root_size, 0,
488 &sc->sc_root_ioh)) {
489 aprint_error_dev(sc->sc_dev, "Cannot map root config\n");
490 return;
491 }
492
493 imxpcie_linkup(sc);
494
495 TAILQ_INIT(&sc->sc_intrs);
496 mutex_init(&sc->sc_lock, MUTEX_DEFAULT, IPL_VM);
497
498 imxpcie_init(&sc->sc_pc, sc);
499
500 if (sc->sc_pci_netbsd_configure != NULL)
501 sc->sc_pci_netbsd_configure(sc);
502
503 memset(&pba, 0, sizeof(pba));
504 pba.pba_flags = PCI_FLAGS_MEM_OKAY |
505 PCI_FLAGS_IO_OKAY;
506 pba.pba_iot = sc->sc_iot;
507 pba.pba_memt = sc->sc_iot;
508 pba.pba_dmat = sc->sc_dmat;
509 pba.pba_pc = &sc->sc_pc;
510 pba.pba_bus = 0;
511
512 config_found(sc->sc_dev, &pba, pcibusprint,
513 CFARG_DEVHANDLE, device_handle(sc->sc_dev),
514 CFARG_EOL);
515 }
516
517 int
518 imxpcie_intr(void *priv)
519 {
520 struct imxpcie_softc *sc = priv;
521 struct imxpcie_ih *pcie_ih;
522
523 for (int i = 0; i < 8; i++) {
524 uint32_t v = PCIE_READ(sc, PCIE_PL_MSICIN_STATUS + i * 0xC);
525 int bit;
526 while ((bit = ffs(v) - 1) >= 0) {
527 PCIE_WRITE(sc, PCIE_PL_MSICIN_STATUS + i * 0xC,
528 __BIT(bit));
529 v &= ~__BIT(bit);
530 }
531 }
532
533 mutex_enter(&sc->sc_lock);
534 int rv = 0;
535 const u_int lastgen = sc->sc_intrgen;
536 TAILQ_FOREACH(pcie_ih, &sc->sc_intrs, ih_entry) {
537 int (*callback)(void *) = pcie_ih->ih_handler;
538 void *arg = pcie_ih->ih_arg;
539 mutex_exit(&sc->sc_lock);
540 rv += callback(arg);
541 mutex_enter(&sc->sc_lock);
542 if (lastgen != sc->sc_intrgen)
543 break;
544 }
545 mutex_exit(&sc->sc_lock);
546
547 return rv;
548 }
549
550 static void
551 imxpcie_setup(struct imxpcie_softc * const sc)
552 {
553 uint32_t v;
554
555 /* Setup RC */
556 v = PCIE_READ(sc, PCIE_PL_PLCR);
557 v &= ~PCIE_PL_PLCR_LINK_MODE_ENABLE;
558 v |= __SHIFTIN(1, PCIE_PL_PLCR_LINK_MODE_ENABLE);
559 PCIE_WRITE(sc, PCIE_PL_PLCR, v);
560
561 v = PCIE_READ(sc, PCIE_PL_G2CR);
562 v &= ~PCIE_PL_G2CR_PREDETERMINED_NUMBER_OF_LANES;
563 v |= __SHIFTIN(1, PCIE_PL_G2CR_PREDETERMINED_NUMBER_OF_LANES);
564 PCIE_WRITE(sc, PCIE_PL_G2CR, v);
565
566 /* BARs */
567 PCIE_WRITE(sc, PCI_BAR0, 0x00000004);
568 PCIE_WRITE(sc, PCI_BAR1, 0x00000000);
569
570 /* Interurupt pins */
571 v = PCIE_READ(sc, PCI_INTERRUPT_REG);
572 v &= ~(PCI_INTERRUPT_PIN_MASK << PCI_INTERRUPT_PIN_SHIFT);
573 v |= PCI_INTERRUPT_PIN_A << PCI_INTERRUPT_PIN_SHIFT;
574 PCIE_WRITE(sc, PCI_INTERRUPT_REG, v);
575
576 /* Bus number */
577 v = PCIE_READ(sc, PCI_BRIDGE_BUS_REG);
578 v &= ~(PCI_BRIDGE_BUS_SUBORDINATE | PCI_BRIDGE_BUS_SECONDARY |
579 PCI_BRIDGE_BUS_PRIMARY);
580 v |= PCI_BRIDGE_BUS_NUM_SUBORDINATE(1);
581 v |= PCI_BRIDGE_BUS_NUM_SECONDARY(1);
582 v |= PCI_BRIDGE_BUS_NUM_PRIMARY(0);
583 PCIE_WRITE(sc, PCI_BRIDGE_BUS_REG, v);
584
585 /* Command register */
586 v = PCIE_READ(sc, PCI_COMMAND_STATUS_REG);
587 v |= PCI_COMMAND_IO_ENABLE |
588 PCI_COMMAND_MEM_ENABLE |
589 PCI_COMMAND_MASTER_ENABLE |
590 PCI_COMMAND_SERR_ENABLE;
591 PCIE_WRITE(sc, PCI_COMMAND_STATUS_REG, v);
592
593 PCIE_WRITE(sc, PCI_CLASS_REG,
594 PCI_CLASS_CODE(PCI_CLASS_BRIDGE,
595 PCI_SUBCLASS_BRIDGE_PCI,
596 PCI_INTERFACE_BRIDGE_PCI_PCI));
597
598 PCIE_WRITE(sc, PCIE_PL_IATUVR, 0);
599
600 PCIE_WRITE(sc, PCIE_PL_IATURLBA, sc->sc_root_addr);
601 PCIE_WRITE(sc, PCIE_PL_IATURUBA, 0);
602 PCIE_WRITE(sc, PCIE_PL_IATURLA, sc->sc_root_addr + sc->sc_root_size);
603
604 PCIE_WRITE(sc, PCIE_PL_IATURLTA, 0);
605 PCIE_WRITE(sc, PCIE_PL_IATURUTA, 0);
606 PCIE_WRITE(sc, PCIE_PL_IATURC1, PCIE_PL_IATURC1_TYPE_CFG0);
607 PCIE_WRITE(sc, PCIE_PL_IATURC2, PCIE_PL_IATURC2_REGION_ENABLE);
608 }
609
610 void
611 imxpcie_init(pci_chipset_tag_t pc, void *priv)
612 {
613 pc->pc_conf_v = priv;
614 pc->pc_attach_hook = imxpcie_attach_hook;
615 pc->pc_bus_maxdevs = imxpcie_bus_maxdevs;
616 pc->pc_make_tag = imxpcie_make_tag;
617 pc->pc_decompose_tag = imxpcie_decompose_tag;
618 pc->pc_conf_read = imxpcie_conf_read;
619 pc->pc_conf_write = imxpcie_conf_write;
620 #ifdef __HAVE_PCI_CONF_HOOK
621 pc->pc_conf_hook = imxpcie_conf_hook;
622 #endif
623 pc->pc_conf_interrupt = imxpcie_conf_interrupt;
624
625 pc->pc_intr_v = priv;
626 pc->pc_intr_map = imxpcie_intr_map;
627 pc->pc_intr_string = imxpcie_intr_string;
628 pc->pc_intr_evcnt = imxpcie_intr_evcnt;
629 pc->pc_intr_establish = imxpcie_intr_establish;
630 pc->pc_intr_disestablish = imxpcie_intr_disestablish;
631 }
632
633 static void
634 imxpcie_attach_hook(device_t parent, device_t self,
635 struct pcibus_attach_args *pba)
636 {
637 /* nothing to do */
638 }
639
640 static int
641 imxpcie_bus_maxdevs(void *v, int busno)
642 {
643 return 32;
644 }
645
646 static pcitag_t
647 imxpcie_make_tag(void *v, int b, int d, int f)
648 {
649 return (b << 16) | (d << 11) | (f << 8);
650 }
651
652 static void
653 imxpcie_decompose_tag(void *v, pcitag_t tag, int *bp, int *dp, int *fp)
654 {
655 if (bp)
656 *bp = (tag >> 16) & 0xff;
657 if (dp)
658 *dp = (tag >> 11) & 0x1f;
659 if (fp)
660 *fp = (tag >> 8) & 0x7;
661 }
662
663 /*
664 * work around.
665 * If there is no PCIe devices, DABT will be generated by read/write access to
666 * config area, so replace original DABT handler with simple jump-back one.
667 */
668 extern u_int data_abort_handler_address;
669 static bool data_abort_flag;
670 static void
671 imxpcie_data_abort_handler(trapframe_t *tf)
672 {
673 data_abort_flag = true;
674 tf->tf_pc += 0x4;
675 return;
676 }
677
678 static pcireg_t
679 imxpcie_conf_read(void *v, pcitag_t tag, int offset)
680 {
681 struct imxpcie_softc *sc = v;
682 bus_space_handle_t bsh;
683 int b, d, f;
684 pcireg_t ret = -1;
685 int s;
686
687 imxpcie_decompose_tag(v, tag, &b, &d, &f);
688
689 if ((unsigned int)offset >= PCI_EXTCONF_SIZE)
690 return ret;
691 if (!imxpcie_valid_device(sc, b, d))
692 return ret;
693
694 PCIE_WRITE(sc, PCIE_PL_IATUVR, 0);
695 if (b < 2)
696 PCIE_WRITE(sc, PCIE_PL_IATURC1, PCIE_PL_IATURC1_TYPE_CFG0);
697 else
698 PCIE_WRITE(sc, PCIE_PL_IATURC1, PCIE_PL_IATURC1_TYPE_CFG1);
699
700 if (b == 0) {
701 bsh = sc->sc_ioh;
702 } else {
703 PCIE_WRITE(sc, PCIE_PL_IATURLTA, tag << 8);
704 bsh = sc->sc_root_ioh;
705 }
706 PCIE_READ(sc, PCIE_PL_IATURC2);
707
708 PCIE_CONF_LOCK(s);
709
710 u_int saved = data_abort_handler_address;
711 data_abort_handler_address = (u_int)imxpcie_data_abort_handler;
712 data_abort_flag = false;
713
714 ret = bus_space_read_4(sc->sc_iot, bsh, offset & ~0x3);
715
716 data_abort_handler_address = saved;
717
718 PCIE_CONF_UNLOCK(s);
719
720 if (data_abort_flag)
721 ret = -1;
722
723 return ret;
724 }
725
726 static void
727 imxpcie_conf_write(void *v, pcitag_t tag, int offset, pcireg_t val)
728 {
729 struct imxpcie_softc *sc = v;
730 bus_space_handle_t bsh;
731 int b, d, f;
732 int s;
733
734 imxpcie_decompose_tag(v, tag, &b, &d, &f);
735
736 if ((unsigned int)offset >= PCI_EXTCONF_SIZE)
737 return;
738 if (!imxpcie_valid_device(sc, b, d))
739 return;
740
741 PCIE_WRITE(sc, PCIE_PL_IATUVR, 0);
742 if (b < 2)
743 PCIE_WRITE(sc, PCIE_PL_IATURC1, PCIE_PL_IATURC1_TYPE_CFG0);
744 else
745 PCIE_WRITE(sc, PCIE_PL_IATURC1, PCIE_PL_IATURC1_TYPE_CFG1);
746
747 if (b == 0) {
748 bsh = sc->sc_ioh;
749 } else {
750 PCIE_WRITE(sc, PCIE_PL_IATURLTA, tag << 8);
751 bsh = sc->sc_root_ioh;
752 }
753 PCIE_READ(sc, PCIE_PL_IATURC2);
754
755 PCIE_CONF_LOCK(s);
756
757 u_int saved = data_abort_handler_address;
758 data_abort_handler_address = (u_int)imxpcie_data_abort_handler;
759
760 bus_space_write_4(sc->sc_iot, bsh, offset & ~0x3, val);
761
762 data_abort_handler_address = saved;
763
764 PCIE_CONF_UNLOCK(s);
765
766 return;
767 }
768
769 #ifdef __HAVE_PCI_CONF_HOOK
770 static int
771 imxpcie_conf_hook(void *v, int b, int d, int f, pcireg_t id)
772 {
773 return PCI_CONF_DEFAULT;
774 }
775 #endif
776
777 static void
778 imxpcie_conf_interrupt(void *v, int bus, int dev, int ipin, int swiz,
779 int *ilinep)
780 {
781 /* nothing to do */
782 }
783
784 static int
785 imxpcie_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ih)
786 {
787 if (pa->pa_intrpin == 0)
788 return EINVAL;
789 *ih = pa->pa_intrpin;
790 return 0;
791 }
792
793 static const char *
794 imxpcie_intr_string(void *v, pci_intr_handle_t ih, char *buf, size_t len)
795 {
796 if (ih == PCI_INTERRUPT_PIN_NONE)
797 return NULL;
798
799 snprintf(buf, len, "pci");
800
801 return buf;
802 }
803
804 const struct evcnt *
805 imxpcie_intr_evcnt(void *v, pci_intr_handle_t ih)
806 {
807 return NULL;
808 }
809
810 static void *
811 imxpcie_intr_establish(void *v, pci_intr_handle_t ih, int ipl,
812 int (*callback)(void *), void *arg, const char *xname)
813 {
814 struct imxpcie_softc *sc = v;
815 struct imxpcie_ih *pcie_ih;
816
817 if (ih == 0)
818 return NULL;
819
820 pcie_ih = kmem_alloc(sizeof(*pcie_ih), KM_SLEEP);
821 pcie_ih->ih_handler = callback;
822 pcie_ih->ih_arg = arg;
823 pcie_ih->ih_ipl = ipl;
824
825 mutex_enter(&sc->sc_lock);
826 TAILQ_INSERT_TAIL(&sc->sc_intrs, pcie_ih, ih_entry);
827 sc->sc_intrgen++;
828 mutex_exit(&sc->sc_lock);
829
830 return pcie_ih;
831 }
832
833 static void
834 imxpcie_intr_disestablish(void *v, void *vih)
835 {
836 struct imxpcie_softc *sc = v;
837 struct imxpcie_ih *pcie_ih = vih;
838
839 mutex_enter(&sc->sc_lock);
840 TAILQ_REMOVE(&sc->sc_intrs, pcie_ih, ih_entry);
841 sc->sc_intrgen++;
842 mutex_exit(&sc->sc_lock);
843
844 kmem_free(pcie_ih, sizeof(*pcie_ih));
845 }
846