1 /* $NetBSD: design_gsrd2.c,v 1.9 2023/12/20 14:18:37 thorpej Exp $ */ 2 3 /* 4 * Copyright (c) 2006 Jachym Holecek 5 * All rights reserved. 6 * 7 * Written for DFC Design, s.r.o. 8 * 9 * Redistribution and use in source and binary forms, with or without 10 * modification, are permitted provided that the following conditions 11 * are met: 12 * 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include "opt_virtex.h" 33 34 #include <sys/cdefs.h> 35 __KERNEL_RCSID(0, "$NetBSD: design_gsrd2.c,v 1.9 2023/12/20 14:18:37 thorpej Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/device.h> 40 #include <sys/kernel.h> 41 #include <sys/extent.h> 42 #include <sys/cpu.h> 43 #include <sys/bus.h> 44 #include <sys/intr.h> 45 46 #include <machine/powerpc.h> 47 48 #include <powerpc/ibm4xx/cpu.h> 49 #include <powerpc/ibm4xx/tlb.h> 50 #include <powerpc/ibm4xx/dev/plbvar.h> 51 52 #include <evbppc/virtex/dev/xcvbusvar.h> 53 #include <evbppc/virtex/dev/cdmacreg.h> 54 #include <evbppc/virtex/dev/temacreg.h> 55 #include <evbppc/virtex/dev/tftreg.h> 56 57 #include <evbppc/virtex/virtex.h> 58 #include <evbppc/virtex/dcr.h> 59 60 61 #define DCR_TEMAC_BASE 0x0030 62 #define DCR_TFT0_BASE 0x0082 63 #define DCR_TFT1_BASE 0x0086 64 #define DCR_CDMAC_BASE 0x0140 65 66 #define OPB_BASE 0x80000000 /* below are offsets in opb */ 67 #define OPB_XLCOM_BASE 0x010000 68 #define OPB_GPIO_BASE 0x020000 69 #define OPB_PSTWO0_BASE 0x040000 70 #define OPB_PSTWO1_BASE 0x041000 71 #define CDMAC_NCHAN 2 /* cdmac {Tx,Rx} */ 72 #define CDMAC_INTR_LINE 0 73 74 #define TFT_FB_BASE 0x3c00000 75 #define TFT_FB_SIZE (2*1024*1024) 76 77 /* 78 * CDMAC per-channel interrupt handler. CDMAC has one interrupt signal 79 * per two channels on mpmc2, so we have to dispatch channels manually. 80 * 81 * Note: we hardwire priority to IPL_NET, temac(4) is the only device that 82 * needs to service DMA interrupts anyway. 83 */ 84 typedef struct cdmac_intrhand { 85 void (*cih_func)(void *); 86 void *cih_arg; 87 } *cdmac_intrhand_t; 88 89 /* Two instantiated channels, one logical interrupt per direction. */ 90 static struct cdmac_intrhand cdmacintr[CDMAC_NCHAN]; 91 static void *cdmac_ih; 92 93 94 /* 95 * DCR bus space leaf access routines. 96 */ 97 98 #ifndef DESIGN_DFC 99 static void 100 tft0_write_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr, 101 uint32_t val) 102 { 103 addr += h; 104 105 switch (addr) { 106 WCASE(DCR_TFT0_BASE, TFT_CTRL); 107 WCASE(DCR_TFT0_BASE, TFT_ADDR); 108 WDEAD(addr); 109 } 110 } 111 112 static uint32_t 113 tft0_read_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr) 114 { 115 uint32_t val; 116 117 addr += h; 118 119 switch (addr) { 120 RCASE(DCR_TFT0_BASE, TFT_CTRL); 121 RCASE(DCR_TFT0_BASE, TFT_ADDR); 122 RDEAD(addr); 123 } 124 125 return (val); 126 } 127 #endif /* !DESIGN_DFC */ 128 129 static void 130 tft1_write_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr, 131 uint32_t val) 132 { 133 addr += h; 134 135 switch (addr) { 136 WCASE(DCR_TFT1_BASE, TFT_CTRL); 137 WCASE(DCR_TFT0_BASE, TFT_ADDR); 138 WDEAD(addr); 139 } 140 } 141 142 static uint32_t 143 tft1_read_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr) 144 { 145 uint32_t val; 146 147 addr += h; 148 149 switch (addr) { 150 RCASE(DCR_TFT1_BASE, TFT_CTRL); 151 RCASE(DCR_TFT0_BASE, TFT_ADDR); 152 RDEAD(addr); 153 } 154 155 return (val); 156 } 157 158 #define DOCHAN(op, base, channel) \ 159 op(base, channel + CDMAC_NEXT); \ 160 op(base, channel + CDMAC_CURADDR); \ 161 op(base, channel + CDMAC_CURSIZE); \ 162 op(base, channel + CDMAC_CURDESC) 163 164 static void 165 cdmac_write_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr, 166 uint32_t val) 167 { 168 addr += h; 169 170 switch (addr) { 171 WCASE(DCR_CDMAC_BASE, CDMAC_STAT_BASE(0)); /* Tx engine */ 172 WCASE(DCR_CDMAC_BASE, CDMAC_STAT_BASE(1)); /* Rx engine */ 173 WCASE(DCR_CDMAC_BASE, CDMAC_INTR); 174 DOCHAN(WCASE, DCR_CDMAC_BASE, CDMAC_CTRL_BASE(0)); 175 DOCHAN(WCASE, DCR_CDMAC_BASE, CDMAC_CTRL_BASE(1)); 176 WDEAD(addr); 177 } 178 } 179 180 static uint32_t 181 cdmac_read_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr) 182 { 183 uint32_t val; 184 185 addr += h; 186 187 switch (addr) { 188 RCASE(DCR_CDMAC_BASE, CDMAC_STAT_BASE(0)); /* Tx engine */ 189 RCASE(DCR_CDMAC_BASE, CDMAC_STAT_BASE(1)); /* Rx engine */ 190 RCASE(DCR_CDMAC_BASE, CDMAC_INTR); 191 DOCHAN(RCASE, DCR_CDMAC_BASE, CDMAC_CTRL_BASE(0)); 192 DOCHAN(RCASE, DCR_CDMAC_BASE, CDMAC_CTRL_BASE(1)); 193 RDEAD(addr); 194 } 195 196 return (val); 197 } 198 199 #undef DOCHAN 200 201 static void 202 temac_write_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr, 203 uint32_t val) 204 { 205 addr += h; 206 207 switch (addr) { 208 WCASE(DCR_TEMAC_BASE, TEMAC_RESET); 209 WDEAD(addr); 210 } 211 } 212 213 static uint32_t 214 temac_read_4(bus_space_tag_t t, bus_space_handle_t h, uint32_t addr) 215 { 216 uint32_t val; 217 218 addr += h; 219 220 switch (addr) { 221 RCASE(DCR_TEMAC_BASE, TEMAC_RESET); 222 RDEAD(addr); 223 } 224 225 return (val); 226 } 227 228 static const struct powerpc_bus_space cdmac_bst = { 229 DCR_BST_BODY(DCR_CDMAC_BASE, cdmac_read_4, cdmac_write_4) 230 }; 231 232 static const struct powerpc_bus_space temac_bst = { 233 DCR_BST_BODY(DCR_TEMAC_BASE, temac_read_4, temac_write_4) 234 }; 235 236 #ifndef DESIGN_DFC 237 static const struct powerpc_bus_space tft0_bst = { 238 DCR_BST_BODY(DCR_TFT0_BASE, tft0_read_4, tft0_write_4) 239 }; 240 #endif 241 242 static const struct powerpc_bus_space tft1_bst = { 243 DCR_BST_BODY(DCR_TFT1_BASE, tft1_read_4, tft1_write_4) 244 }; 245 246 static struct powerpc_bus_space opb_bst = { 247 .pbs_flags = _BUS_SPACE_BIG_ENDIAN|_BUS_SPACE_MEM_TYPE, 248 .pbs_base = 0 /*OPB_BASE*/, 249 .pbs_offset = OPB_BASE, 250 }; 251 252 static char opb_extent_storage[EXTENT_FIXED_STORAGE_SIZE(8)] __aligned(8); 253 254 /* 255 * Master device configuration table for GSRD2 design. 256 */ 257 static const struct gsrddev { 258 const char *gdv_name; 259 const char *gdv_attr; 260 bus_space_tag_t gdv_bst; 261 bus_addr_t gdv_addr; 262 int gdv_intr; 263 int gdv_rx_dma; 264 int gdv_tx_dma; 265 int gdv_dcr; /* XXX bst flag */ 266 } gsrd_devices[] = { 267 { /* gsrd_devices[0] */ 268 .gdv_name = "xlcom", 269 .gdv_attr = "xcvbus", 270 .gdv_bst = &opb_bst, 271 .gdv_addr = OPB_XLCOM_BASE, 272 .gdv_intr = 2, 273 .gdv_rx_dma = -1, 274 .gdv_tx_dma = -1, 275 .gdv_dcr = 0, 276 }, 277 { /* gsrd_devices[1] */ 278 .gdv_name = "temac", 279 .gdv_attr = "xcvbus", 280 .gdv_bst = &temac_bst, 281 .gdv_addr = 0, 282 .gdv_intr = 1, /* unused MII intr */ 283 .gdv_rx_dma = 1, /* cdmac Rx */ 284 .gdv_tx_dma = 0, /* cdmac Tx */ 285 .gdv_dcr = 1, 286 }, 287 #ifndef DESIGN_DFC 288 { /* gsrd_devices[2] */ 289 .gdv_name = "tft", 290 .gdv_attr = "plbus", 291 .gdv_bst = &tft0_bst, 292 .gdv_addr = 0, 293 .gdv_intr = -1, 294 .gdv_rx_dma = -1, 295 .gdv_tx_dma = -1, 296 .gdv_dcr = 1, 297 }, 298 #endif 299 { /* gsrd_devices[2] */ 300 .gdv_name = "tft", 301 .gdv_attr = "plbus", 302 .gdv_bst = &tft1_bst, 303 .gdv_addr = 0, 304 .gdv_intr = -1, 305 .gdv_rx_dma = -1, 306 .gdv_tx_dma = -1, 307 .gdv_dcr = 1, 308 }, 309 #ifdef DESIGN_DFC 310 { /* gsrd_devices[3] */ 311 .gdv_name = "pstwo", 312 .gdv_attr = "xcvbus", 313 .gdv_bst = &opb_bst, 314 .gdv_addr = OPB_PSTWO0_BASE, 315 .gdv_intr = 3, 316 .gdv_rx_dma = -1, 317 .gdv_tx_dma = -1, 318 .gdv_dcr = 0, 319 }, 320 { /* gsrd_devices[4] */ 321 .gdv_name = "pstwo", 322 .gdv_attr = "xcvbus", 323 .gdv_bst = &opb_bst, 324 .gdv_addr = OPB_PSTWO1_BASE, 325 .gdv_intr = 4, 326 .gdv_rx_dma = -1, 327 .gdv_tx_dma = -1, 328 .gdv_dcr = 0, 329 }, 330 #endif 331 }; 332 333 static struct ll_dmac * 334 virtex_mpmc_mapdma(int idx, struct ll_dmac *chan) 335 { 336 if (idx == -1) 337 return (NULL); 338 339 KASSERT(idx >= 0 && idx < CDMAC_NCHAN); 340 341 chan->dmac_iot = &cdmac_bst; 342 chan->dmac_ctrl_addr = CDMAC_CTRL_BASE(idx); 343 chan->dmac_stat_addr = CDMAC_STAT_BASE(idx); 344 chan->dmac_chan = idx; 345 346 return (chan); 347 } 348 349 static int 350 cdmac_intr(void *arg) 351 { 352 uint32_t isr; 353 int did = 0; 354 355 isr = bus_space_read_4(&cdmac_bst, 0, CDMAC_INTR); 356 357 if (ISSET(isr, CDMAC_INTR_TX0) && cdmacintr[0].cih_func) { 358 (cdmacintr[0].cih_func)(cdmacintr[0].cih_arg); 359 did++; 360 } 361 if (ISSET(isr, CDMAC_INTR_RX0) && cdmacintr[1].cih_func) { 362 (cdmacintr[1].cih_func)(cdmacintr[1].cih_arg); 363 did++; 364 } 365 366 bus_space_write_4(&cdmac_bst, 0, CDMAC_INTR, isr); /* ack */ 367 368 /* XXX This still happens all the time under load. */ 369 #if 0 370 if (did == 0) 371 aprint_normal("WARNING: stray cdmac isr 0x%x\n", isr); 372 #endif 373 return (0); 374 } 375 376 /* 377 * Public interface. 378 */ 379 380 void 381 virtex_autoconf(device_t self, struct plb_attach_args *paa) 382 { 383 384 struct xcvbus_attach_args vaa; 385 struct ll_dmac rx, tx; 386 int i; 387 388 /* Reset DMA channels. */ 389 bus_space_write_4(&cdmac_bst, 0, CDMAC_STAT_BASE(0), CDMAC_STAT_RESET); 390 bus_space_write_4(&cdmac_bst, 0, CDMAC_STAT_BASE(1), CDMAC_STAT_RESET); 391 bus_space_write_4(&cdmac_bst, 0, CDMAC_INTR, 0); 392 393 vaa.vaa_dmat = paa->plb_dmat; 394 395 for (i = 0; i < __arraycount(gsrd_devices); i++) { 396 const struct gsrddev *g = &gsrd_devices[i]; 397 398 vaa._vaa_is_dcr = g->gdv_dcr; /* XXX bst flag */ 399 vaa.vaa_name = g->gdv_name; 400 vaa.vaa_addr = g->gdv_addr; 401 vaa.vaa_intr = g->gdv_intr; 402 vaa.vaa_iot = g->gdv_bst; 403 404 vaa.vaa_rx_dmac = virtex_mpmc_mapdma(g->gdv_rx_dma, &rx); 405 vaa.vaa_tx_dmac = virtex_mpmc_mapdma(g->gdv_tx_dma, &tx); 406 407 config_found(self, &vaa, xcvbus_print, 408 CFARGS(.iattr = g->gdv_attr)); 409 } 410 411 /* Setup the dispatch handler. */ 412 cdmac_ih = intr_establish(CDMAC_INTR_LINE, IST_LEVEL, IPL_NET, 413 cdmac_intr, NULL); 414 if (cdmac_ih == NULL) 415 panic("virtex_mpmc_done: could not establish cdmac intr"); 416 417 /* Clear (XXX?) and enable interrupts. */ 418 bus_space_write_4(&cdmac_bst, 0, CDMAC_INTR, ~CDMAC_INTR_MIE); 419 bus_space_write_4(&cdmac_bst, 0, CDMAC_INTR, CDMAC_INTR_MIE); 420 } 421 422 void * 423 ll_dmac_intr_establish(int chan, void (*handler)(void *), void *arg) 424 { 425 KASSERT(chan >= 0 && chan < CDMAC_NCHAN); 426 KASSERT(cdmacintr[chan].cih_func == NULL); 427 KASSERT(cdmacintr[chan].cih_arg == NULL); 428 429 cdmacintr[chan].cih_func = handler; 430 cdmacintr[chan].cih_arg = arg; 431 432 return (&cdmacintr[chan]); 433 } 434 435 void 436 ll_dmac_intr_disestablish(int chan, void *handle) 437 { 438 int s; 439 440 KASSERT(chan >= 0 && chan < CDMAC_NCHAN); 441 KASSERT(&cdmacintr[chan] == handle); 442 443 s = splnet(); 444 cdmacintr[chan].cih_func = NULL; 445 cdmacintr[chan].cih_arg = NULL; 446 splx(s); 447 } 448 449 int 450 virtex_bus_space_tag(const char *xname, bus_space_tag_t *bst) 451 { 452 if (strncmp(xname, "xlcom", 5) == 0) { 453 *bst = &opb_bst; 454 return (0); 455 } 456 457 return (ENODEV); 458 } 459 460 void 461 virtex_machdep_init(vaddr_t endva, vsize_t maxsz, struct mem_region *phys, 462 struct mem_region *avail) 463 { 464 ppc4xx_tlb_reserve(OPB_BASE, endva, maxsz, TLB_I | TLB_G); 465 endva += maxsz; 466 467 opb_bst.pbs_limit = maxsz; 468 469 if (bus_space_init(&opb_bst, "opbtag", opb_extent_storage, 470 sizeof(opb_extent_storage))) 471 panic("virtex_machdep_init: failed to initialize opb_bst"); 472 473 /* 474 * The TFT controller is broken, we can't change FB address. 475 * Hardwire it at predefined base address, create uncached 476 * mapping. 477 */ 478 479 avail[0].size = TFT_FB_BASE - avail[0].start; 480 ppc4xx_tlb_reserve(TFT_FB_BASE, endva, TFT_FB_SIZE, TLB_I | TLB_G); 481 } 482 483 void 484 device_register(device_t dev, void *aux) 485 { 486 prop_number_t pn; 487 void *fb; 488 489 if (strncmp(device_xname(dev), "tft0", 4) == 0) { 490 fb = ppc4xx_tlb_mapiodev(TFT_FB_BASE, TFT_FB_SIZE); 491 if (fb == NULL) 492 panic("device_register: framebuffer mapping gone!\n"); 493 494 pn = prop_number_create_unsigned_integer(TFT_FB_BASE); 495 if (pn == NULL) { 496 printf("WARNING: could not allocate virtex-tft-pa\n"); 497 return ; 498 } 499 if (prop_dictionary_set(device_properties(dev), 500 "virtex-tft-pa", pn) != true) 501 printf("WARNING: could not set virtex-tft-pa\n"); 502 prop_object_release(pn); 503 504 pn = prop_number_create_unsigned_integer((uintptr_t)fb); 505 if (pn == NULL) { 506 printf("WARNING: could not allocate virtex-tft-va\n"); 507 return ; 508 } 509 if (prop_dictionary_set(device_properties(dev), 510 "virtex-tft-va", pn) != true) 511 printf("WARNING: could not set virtex-tft-va\n"); 512 prop_object_release(pn); 513 } 514 } 515