1 /* 2 * QEMU PowerPC 405 embedded processors emulation 3 * 4 * Copyright (c) 2007 Jocelyn Mayer 5 * 6 * Permission is hereby granted, free of charge, to any person obtaining a copy 7 * of this software and associated documentation files (the "Software"), to deal 8 * in the Software without restriction, including without limitation the rights 9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 10 * copies of the Software, and to permit persons to whom the Software is 11 * furnished to do so, subject to the following conditions: 12 * 13 * The above copyright notice and this permission notice shall be included in 14 * all copies or substantial portions of the Software. 15 * 16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 22 * THE SOFTWARE. 23 */ 24 25 #include "qemu/osdep.h" 26 #include "qemu/units.h" 27 #include "qapi/error.h" 28 #include "cpu.h" 29 #include "hw/ppc/ppc.h" 30 #include "hw/i2c/ppc4xx_i2c.h" 31 #include "hw/irq.h" 32 #include "ppc405.h" 33 #include "hw/char/serial.h" 34 #include "qemu/timer.h" 35 #include "sysemu/reset.h" 36 #include "sysemu/sysemu.h" 37 #include "exec/address-spaces.h" 38 #include "hw/intc/ppc-uic.h" 39 #include "hw/qdev-properties.h" 40 #include "qapi/error.h" 41 42 //#define DEBUG_OPBA 43 //#define DEBUG_SDRAM 44 //#define DEBUG_GPIO 45 //#define DEBUG_SERIAL 46 //#define DEBUG_OCM 47 //#define DEBUG_GPT 48 //#define DEBUG_CLOCKS 49 //#define DEBUG_CLOCKS_LL 50 51 ram_addr_t ppc405_set_bootinfo (CPUPPCState *env, ppc4xx_bd_info_t *bd, 52 uint32_t flags) 53 { 54 CPUState *cs = env_cpu(env); 55 ram_addr_t bdloc; 56 int i, n; 57 58 /* We put the bd structure at the top of memory */ 59 if (bd->bi_memsize >= 0x01000000UL) 60 bdloc = 0x01000000UL - sizeof(struct ppc4xx_bd_info_t); 61 else 62 bdloc = bd->bi_memsize - sizeof(struct ppc4xx_bd_info_t); 63 stl_be_phys(cs->as, bdloc + 0x00, bd->bi_memstart); 64 stl_be_phys(cs->as, bdloc + 0x04, bd->bi_memsize); 65 stl_be_phys(cs->as, bdloc + 0x08, bd->bi_flashstart); 66 stl_be_phys(cs->as, bdloc + 0x0C, bd->bi_flashsize); 67 stl_be_phys(cs->as, bdloc + 0x10, bd->bi_flashoffset); 68 stl_be_phys(cs->as, bdloc + 0x14, bd->bi_sramstart); 69 stl_be_phys(cs->as, bdloc + 0x18, bd->bi_sramsize); 70 stl_be_phys(cs->as, bdloc + 0x1C, bd->bi_bootflags); 71 stl_be_phys(cs->as, bdloc + 0x20, bd->bi_ipaddr); 72 for (i = 0; i < 6; i++) { 73 stb_phys(cs->as, bdloc + 0x24 + i, bd->bi_enetaddr[i]); 74 } 75 stw_be_phys(cs->as, bdloc + 0x2A, bd->bi_ethspeed); 76 stl_be_phys(cs->as, bdloc + 0x2C, bd->bi_intfreq); 77 stl_be_phys(cs->as, bdloc + 0x30, bd->bi_busfreq); 78 stl_be_phys(cs->as, bdloc + 0x34, bd->bi_baudrate); 79 for (i = 0; i < 4; i++) { 80 stb_phys(cs->as, bdloc + 0x38 + i, bd->bi_s_version[i]); 81 } 82 for (i = 0; i < 32; i++) { 83 stb_phys(cs->as, bdloc + 0x3C + i, bd->bi_r_version[i]); 84 } 85 stl_be_phys(cs->as, bdloc + 0x5C, bd->bi_plb_busfreq); 86 stl_be_phys(cs->as, bdloc + 0x60, bd->bi_pci_busfreq); 87 for (i = 0; i < 6; i++) { 88 stb_phys(cs->as, bdloc + 0x64 + i, bd->bi_pci_enetaddr[i]); 89 } 90 n = 0x6A; 91 if (flags & 0x00000001) { 92 for (i = 0; i < 6; i++) 93 stb_phys(cs->as, bdloc + n++, bd->bi_pci_enetaddr2[i]); 94 } 95 stl_be_phys(cs->as, bdloc + n, bd->bi_opbfreq); 96 n += 4; 97 for (i = 0; i < 2; i++) { 98 stl_be_phys(cs->as, bdloc + n, bd->bi_iic_fast[i]); 99 n += 4; 100 } 101 102 return bdloc; 103 } 104 105 /*****************************************************************************/ 106 /* Shared peripherals */ 107 108 /*****************************************************************************/ 109 /* Peripheral local bus arbitrer */ 110 enum { 111 PLB3A0_ACR = 0x077, 112 PLB4A0_ACR = 0x081, 113 PLB0_BESR = 0x084, 114 PLB0_BEAR = 0x086, 115 PLB0_ACR = 0x087, 116 PLB4A1_ACR = 0x089, 117 }; 118 119 typedef struct ppc4xx_plb_t ppc4xx_plb_t; 120 struct ppc4xx_plb_t { 121 uint32_t acr; 122 uint32_t bear; 123 uint32_t besr; 124 }; 125 126 static uint32_t dcr_read_plb (void *opaque, int dcrn) 127 { 128 ppc4xx_plb_t *plb; 129 uint32_t ret; 130 131 plb = opaque; 132 switch (dcrn) { 133 case PLB0_ACR: 134 ret = plb->acr; 135 break; 136 case PLB0_BEAR: 137 ret = plb->bear; 138 break; 139 case PLB0_BESR: 140 ret = plb->besr; 141 break; 142 default: 143 /* Avoid gcc warning */ 144 ret = 0; 145 break; 146 } 147 148 return ret; 149 } 150 151 static void dcr_write_plb (void *opaque, int dcrn, uint32_t val) 152 { 153 ppc4xx_plb_t *plb; 154 155 plb = opaque; 156 switch (dcrn) { 157 case PLB0_ACR: 158 /* We don't care about the actual parameters written as 159 * we don't manage any priorities on the bus 160 */ 161 plb->acr = val & 0xF8000000; 162 break; 163 case PLB0_BEAR: 164 /* Read only */ 165 break; 166 case PLB0_BESR: 167 /* Write-clear */ 168 plb->besr &= ~val; 169 break; 170 } 171 } 172 173 static void ppc4xx_plb_reset (void *opaque) 174 { 175 ppc4xx_plb_t *plb; 176 177 plb = opaque; 178 plb->acr = 0x00000000; 179 plb->bear = 0x00000000; 180 plb->besr = 0x00000000; 181 } 182 183 void ppc4xx_plb_init(CPUPPCState *env) 184 { 185 ppc4xx_plb_t *plb; 186 187 plb = g_malloc0(sizeof(ppc4xx_plb_t)); 188 ppc_dcr_register(env, PLB3A0_ACR, plb, &dcr_read_plb, &dcr_write_plb); 189 ppc_dcr_register(env, PLB4A0_ACR, plb, &dcr_read_plb, &dcr_write_plb); 190 ppc_dcr_register(env, PLB0_ACR, plb, &dcr_read_plb, &dcr_write_plb); 191 ppc_dcr_register(env, PLB0_BEAR, plb, &dcr_read_plb, &dcr_write_plb); 192 ppc_dcr_register(env, PLB0_BESR, plb, &dcr_read_plb, &dcr_write_plb); 193 ppc_dcr_register(env, PLB4A1_ACR, plb, &dcr_read_plb, &dcr_write_plb); 194 qemu_register_reset(ppc4xx_plb_reset, plb); 195 } 196 197 /*****************************************************************************/ 198 /* PLB to OPB bridge */ 199 enum { 200 POB0_BESR0 = 0x0A0, 201 POB0_BESR1 = 0x0A2, 202 POB0_BEAR = 0x0A4, 203 }; 204 205 typedef struct ppc4xx_pob_t ppc4xx_pob_t; 206 struct ppc4xx_pob_t { 207 uint32_t bear; 208 uint32_t besr0; 209 uint32_t besr1; 210 }; 211 212 static uint32_t dcr_read_pob (void *opaque, int dcrn) 213 { 214 ppc4xx_pob_t *pob; 215 uint32_t ret; 216 217 pob = opaque; 218 switch (dcrn) { 219 case POB0_BEAR: 220 ret = pob->bear; 221 break; 222 case POB0_BESR0: 223 ret = pob->besr0; 224 break; 225 case POB0_BESR1: 226 ret = pob->besr1; 227 break; 228 default: 229 /* Avoid gcc warning */ 230 ret = 0; 231 break; 232 } 233 234 return ret; 235 } 236 237 static void dcr_write_pob (void *opaque, int dcrn, uint32_t val) 238 { 239 ppc4xx_pob_t *pob; 240 241 pob = opaque; 242 switch (dcrn) { 243 case POB0_BEAR: 244 /* Read only */ 245 break; 246 case POB0_BESR0: 247 /* Write-clear */ 248 pob->besr0 &= ~val; 249 break; 250 case POB0_BESR1: 251 /* Write-clear */ 252 pob->besr1 &= ~val; 253 break; 254 } 255 } 256 257 static void ppc4xx_pob_reset (void *opaque) 258 { 259 ppc4xx_pob_t *pob; 260 261 pob = opaque; 262 /* No error */ 263 pob->bear = 0x00000000; 264 pob->besr0 = 0x0000000; 265 pob->besr1 = 0x0000000; 266 } 267 268 static void ppc4xx_pob_init(CPUPPCState *env) 269 { 270 ppc4xx_pob_t *pob; 271 272 pob = g_malloc0(sizeof(ppc4xx_pob_t)); 273 ppc_dcr_register(env, POB0_BEAR, pob, &dcr_read_pob, &dcr_write_pob); 274 ppc_dcr_register(env, POB0_BESR0, pob, &dcr_read_pob, &dcr_write_pob); 275 ppc_dcr_register(env, POB0_BESR1, pob, &dcr_read_pob, &dcr_write_pob); 276 qemu_register_reset(ppc4xx_pob_reset, pob); 277 } 278 279 /*****************************************************************************/ 280 /* OPB arbitrer */ 281 typedef struct ppc4xx_opba_t ppc4xx_opba_t; 282 struct ppc4xx_opba_t { 283 MemoryRegion io; 284 uint8_t cr; 285 uint8_t pr; 286 }; 287 288 static uint64_t opba_readb(void *opaque, hwaddr addr, unsigned size) 289 { 290 ppc4xx_opba_t *opba; 291 uint32_t ret; 292 293 #ifdef DEBUG_OPBA 294 printf("%s: addr " TARGET_FMT_plx "\n", __func__, addr); 295 #endif 296 opba = opaque; 297 switch (addr) { 298 case 0x00: 299 ret = opba->cr; 300 break; 301 case 0x01: 302 ret = opba->pr; 303 break; 304 default: 305 ret = 0x00; 306 break; 307 } 308 309 return ret; 310 } 311 312 static void opba_writeb(void *opaque, hwaddr addr, uint64_t value, 313 unsigned size) 314 { 315 ppc4xx_opba_t *opba; 316 317 #ifdef DEBUG_OPBA 318 printf("%s: addr " TARGET_FMT_plx " val %08" PRIx32 "\n", __func__, addr, 319 value); 320 #endif 321 opba = opaque; 322 switch (addr) { 323 case 0x00: 324 opba->cr = value & 0xF8; 325 break; 326 case 0x01: 327 opba->pr = value & 0xFF; 328 break; 329 default: 330 break; 331 } 332 } 333 static const MemoryRegionOps opba_ops = { 334 .read = opba_readb, 335 .write = opba_writeb, 336 .impl.min_access_size = 1, 337 .impl.max_access_size = 1, 338 .valid.min_access_size = 1, 339 .valid.max_access_size = 4, 340 .endianness = DEVICE_BIG_ENDIAN, 341 }; 342 343 static void ppc4xx_opba_reset (void *opaque) 344 { 345 ppc4xx_opba_t *opba; 346 347 opba = opaque; 348 opba->cr = 0x00; /* No dynamic priorities - park disabled */ 349 opba->pr = 0x11; 350 } 351 352 static void ppc4xx_opba_init(hwaddr base) 353 { 354 ppc4xx_opba_t *opba; 355 356 opba = g_malloc0(sizeof(ppc4xx_opba_t)); 357 #ifdef DEBUG_OPBA 358 printf("%s: offset " TARGET_FMT_plx "\n", __func__, base); 359 #endif 360 memory_region_init_io(&opba->io, NULL, &opba_ops, opba, "opba", 0x002); 361 memory_region_add_subregion(get_system_memory(), base, &opba->io); 362 qemu_register_reset(ppc4xx_opba_reset, opba); 363 } 364 365 /*****************************************************************************/ 366 /* Code decompression controller */ 367 /* XXX: TODO */ 368 369 /*****************************************************************************/ 370 /* Peripheral controller */ 371 typedef struct ppc4xx_ebc_t ppc4xx_ebc_t; 372 struct ppc4xx_ebc_t { 373 uint32_t addr; 374 uint32_t bcr[8]; 375 uint32_t bap[8]; 376 uint32_t bear; 377 uint32_t besr0; 378 uint32_t besr1; 379 uint32_t cfg; 380 }; 381 382 enum { 383 EBC0_CFGADDR = 0x012, 384 EBC0_CFGDATA = 0x013, 385 }; 386 387 static uint32_t dcr_read_ebc (void *opaque, int dcrn) 388 { 389 ppc4xx_ebc_t *ebc; 390 uint32_t ret; 391 392 ebc = opaque; 393 switch (dcrn) { 394 case EBC0_CFGADDR: 395 ret = ebc->addr; 396 break; 397 case EBC0_CFGDATA: 398 switch (ebc->addr) { 399 case 0x00: /* B0CR */ 400 ret = ebc->bcr[0]; 401 break; 402 case 0x01: /* B1CR */ 403 ret = ebc->bcr[1]; 404 break; 405 case 0x02: /* B2CR */ 406 ret = ebc->bcr[2]; 407 break; 408 case 0x03: /* B3CR */ 409 ret = ebc->bcr[3]; 410 break; 411 case 0x04: /* B4CR */ 412 ret = ebc->bcr[4]; 413 break; 414 case 0x05: /* B5CR */ 415 ret = ebc->bcr[5]; 416 break; 417 case 0x06: /* B6CR */ 418 ret = ebc->bcr[6]; 419 break; 420 case 0x07: /* B7CR */ 421 ret = ebc->bcr[7]; 422 break; 423 case 0x10: /* B0AP */ 424 ret = ebc->bap[0]; 425 break; 426 case 0x11: /* B1AP */ 427 ret = ebc->bap[1]; 428 break; 429 case 0x12: /* B2AP */ 430 ret = ebc->bap[2]; 431 break; 432 case 0x13: /* B3AP */ 433 ret = ebc->bap[3]; 434 break; 435 case 0x14: /* B4AP */ 436 ret = ebc->bap[4]; 437 break; 438 case 0x15: /* B5AP */ 439 ret = ebc->bap[5]; 440 break; 441 case 0x16: /* B6AP */ 442 ret = ebc->bap[6]; 443 break; 444 case 0x17: /* B7AP */ 445 ret = ebc->bap[7]; 446 break; 447 case 0x20: /* BEAR */ 448 ret = ebc->bear; 449 break; 450 case 0x21: /* BESR0 */ 451 ret = ebc->besr0; 452 break; 453 case 0x22: /* BESR1 */ 454 ret = ebc->besr1; 455 break; 456 case 0x23: /* CFG */ 457 ret = ebc->cfg; 458 break; 459 default: 460 ret = 0x00000000; 461 break; 462 } 463 break; 464 default: 465 ret = 0x00000000; 466 break; 467 } 468 469 return ret; 470 } 471 472 static void dcr_write_ebc (void *opaque, int dcrn, uint32_t val) 473 { 474 ppc4xx_ebc_t *ebc; 475 476 ebc = opaque; 477 switch (dcrn) { 478 case EBC0_CFGADDR: 479 ebc->addr = val; 480 break; 481 case EBC0_CFGDATA: 482 switch (ebc->addr) { 483 case 0x00: /* B0CR */ 484 break; 485 case 0x01: /* B1CR */ 486 break; 487 case 0x02: /* B2CR */ 488 break; 489 case 0x03: /* B3CR */ 490 break; 491 case 0x04: /* B4CR */ 492 break; 493 case 0x05: /* B5CR */ 494 break; 495 case 0x06: /* B6CR */ 496 break; 497 case 0x07: /* B7CR */ 498 break; 499 case 0x10: /* B0AP */ 500 break; 501 case 0x11: /* B1AP */ 502 break; 503 case 0x12: /* B2AP */ 504 break; 505 case 0x13: /* B3AP */ 506 break; 507 case 0x14: /* B4AP */ 508 break; 509 case 0x15: /* B5AP */ 510 break; 511 case 0x16: /* B6AP */ 512 break; 513 case 0x17: /* B7AP */ 514 break; 515 case 0x20: /* BEAR */ 516 break; 517 case 0x21: /* BESR0 */ 518 break; 519 case 0x22: /* BESR1 */ 520 break; 521 case 0x23: /* CFG */ 522 break; 523 default: 524 break; 525 } 526 break; 527 default: 528 break; 529 } 530 } 531 532 static void ebc_reset (void *opaque) 533 { 534 ppc4xx_ebc_t *ebc; 535 int i; 536 537 ebc = opaque; 538 ebc->addr = 0x00000000; 539 ebc->bap[0] = 0x7F8FFE80; 540 ebc->bcr[0] = 0xFFE28000; 541 for (i = 0; i < 8; i++) { 542 ebc->bap[i] = 0x00000000; 543 ebc->bcr[i] = 0x00000000; 544 } 545 ebc->besr0 = 0x00000000; 546 ebc->besr1 = 0x00000000; 547 ebc->cfg = 0x80400000; 548 } 549 550 void ppc405_ebc_init(CPUPPCState *env) 551 { 552 ppc4xx_ebc_t *ebc; 553 554 ebc = g_malloc0(sizeof(ppc4xx_ebc_t)); 555 qemu_register_reset(&ebc_reset, ebc); 556 ppc_dcr_register(env, EBC0_CFGADDR, 557 ebc, &dcr_read_ebc, &dcr_write_ebc); 558 ppc_dcr_register(env, EBC0_CFGDATA, 559 ebc, &dcr_read_ebc, &dcr_write_ebc); 560 } 561 562 /*****************************************************************************/ 563 /* DMA controller */ 564 enum { 565 DMA0_CR0 = 0x100, 566 DMA0_CT0 = 0x101, 567 DMA0_DA0 = 0x102, 568 DMA0_SA0 = 0x103, 569 DMA0_SG0 = 0x104, 570 DMA0_CR1 = 0x108, 571 DMA0_CT1 = 0x109, 572 DMA0_DA1 = 0x10A, 573 DMA0_SA1 = 0x10B, 574 DMA0_SG1 = 0x10C, 575 DMA0_CR2 = 0x110, 576 DMA0_CT2 = 0x111, 577 DMA0_DA2 = 0x112, 578 DMA0_SA2 = 0x113, 579 DMA0_SG2 = 0x114, 580 DMA0_CR3 = 0x118, 581 DMA0_CT3 = 0x119, 582 DMA0_DA3 = 0x11A, 583 DMA0_SA3 = 0x11B, 584 DMA0_SG3 = 0x11C, 585 DMA0_SR = 0x120, 586 DMA0_SGC = 0x123, 587 DMA0_SLP = 0x125, 588 DMA0_POL = 0x126, 589 }; 590 591 typedef struct ppc405_dma_t ppc405_dma_t; 592 struct ppc405_dma_t { 593 qemu_irq irqs[4]; 594 uint32_t cr[4]; 595 uint32_t ct[4]; 596 uint32_t da[4]; 597 uint32_t sa[4]; 598 uint32_t sg[4]; 599 uint32_t sr; 600 uint32_t sgc; 601 uint32_t slp; 602 uint32_t pol; 603 }; 604 605 static uint32_t dcr_read_dma (void *opaque, int dcrn) 606 { 607 return 0; 608 } 609 610 static void dcr_write_dma (void *opaque, int dcrn, uint32_t val) 611 { 612 } 613 614 static void ppc405_dma_reset (void *opaque) 615 { 616 ppc405_dma_t *dma; 617 int i; 618 619 dma = opaque; 620 for (i = 0; i < 4; i++) { 621 dma->cr[i] = 0x00000000; 622 dma->ct[i] = 0x00000000; 623 dma->da[i] = 0x00000000; 624 dma->sa[i] = 0x00000000; 625 dma->sg[i] = 0x00000000; 626 } 627 dma->sr = 0x00000000; 628 dma->sgc = 0x00000000; 629 dma->slp = 0x7C000000; 630 dma->pol = 0x00000000; 631 } 632 633 static void ppc405_dma_init(CPUPPCState *env, qemu_irq irqs[4]) 634 { 635 ppc405_dma_t *dma; 636 637 dma = g_malloc0(sizeof(ppc405_dma_t)); 638 memcpy(dma->irqs, irqs, 4 * sizeof(qemu_irq)); 639 qemu_register_reset(&ppc405_dma_reset, dma); 640 ppc_dcr_register(env, DMA0_CR0, 641 dma, &dcr_read_dma, &dcr_write_dma); 642 ppc_dcr_register(env, DMA0_CT0, 643 dma, &dcr_read_dma, &dcr_write_dma); 644 ppc_dcr_register(env, DMA0_DA0, 645 dma, &dcr_read_dma, &dcr_write_dma); 646 ppc_dcr_register(env, DMA0_SA0, 647 dma, &dcr_read_dma, &dcr_write_dma); 648 ppc_dcr_register(env, DMA0_SG0, 649 dma, &dcr_read_dma, &dcr_write_dma); 650 ppc_dcr_register(env, DMA0_CR1, 651 dma, &dcr_read_dma, &dcr_write_dma); 652 ppc_dcr_register(env, DMA0_CT1, 653 dma, &dcr_read_dma, &dcr_write_dma); 654 ppc_dcr_register(env, DMA0_DA1, 655 dma, &dcr_read_dma, &dcr_write_dma); 656 ppc_dcr_register(env, DMA0_SA1, 657 dma, &dcr_read_dma, &dcr_write_dma); 658 ppc_dcr_register(env, DMA0_SG1, 659 dma, &dcr_read_dma, &dcr_write_dma); 660 ppc_dcr_register(env, DMA0_CR2, 661 dma, &dcr_read_dma, &dcr_write_dma); 662 ppc_dcr_register(env, DMA0_CT2, 663 dma, &dcr_read_dma, &dcr_write_dma); 664 ppc_dcr_register(env, DMA0_DA2, 665 dma, &dcr_read_dma, &dcr_write_dma); 666 ppc_dcr_register(env, DMA0_SA2, 667 dma, &dcr_read_dma, &dcr_write_dma); 668 ppc_dcr_register(env, DMA0_SG2, 669 dma, &dcr_read_dma, &dcr_write_dma); 670 ppc_dcr_register(env, DMA0_CR3, 671 dma, &dcr_read_dma, &dcr_write_dma); 672 ppc_dcr_register(env, DMA0_CT3, 673 dma, &dcr_read_dma, &dcr_write_dma); 674 ppc_dcr_register(env, DMA0_DA3, 675 dma, &dcr_read_dma, &dcr_write_dma); 676 ppc_dcr_register(env, DMA0_SA3, 677 dma, &dcr_read_dma, &dcr_write_dma); 678 ppc_dcr_register(env, DMA0_SG3, 679 dma, &dcr_read_dma, &dcr_write_dma); 680 ppc_dcr_register(env, DMA0_SR, 681 dma, &dcr_read_dma, &dcr_write_dma); 682 ppc_dcr_register(env, DMA0_SGC, 683 dma, &dcr_read_dma, &dcr_write_dma); 684 ppc_dcr_register(env, DMA0_SLP, 685 dma, &dcr_read_dma, &dcr_write_dma); 686 ppc_dcr_register(env, DMA0_POL, 687 dma, &dcr_read_dma, &dcr_write_dma); 688 } 689 690 /*****************************************************************************/ 691 /* GPIO */ 692 typedef struct ppc405_gpio_t ppc405_gpio_t; 693 struct ppc405_gpio_t { 694 MemoryRegion io; 695 uint32_t or; 696 uint32_t tcr; 697 uint32_t osrh; 698 uint32_t osrl; 699 uint32_t tsrh; 700 uint32_t tsrl; 701 uint32_t odr; 702 uint32_t ir; 703 uint32_t rr1; 704 uint32_t isr1h; 705 uint32_t isr1l; 706 }; 707 708 static uint64_t ppc405_gpio_read(void *opaque, hwaddr addr, unsigned size) 709 { 710 #ifdef DEBUG_GPIO 711 printf("%s: addr " TARGET_FMT_plx " size %d\n", __func__, addr, size); 712 #endif 713 714 return 0; 715 } 716 717 static void ppc405_gpio_write(void *opaque, hwaddr addr, uint64_t value, 718 unsigned size) 719 { 720 #ifdef DEBUG_GPIO 721 printf("%s: addr " TARGET_FMT_plx " size %d val %08" PRIx32 "\n", 722 __func__, addr, size, value); 723 #endif 724 } 725 726 static const MemoryRegionOps ppc405_gpio_ops = { 727 .read = ppc405_gpio_read, 728 .write = ppc405_gpio_write, 729 .endianness = DEVICE_NATIVE_ENDIAN, 730 }; 731 732 static void ppc405_gpio_reset (void *opaque) 733 { 734 } 735 736 static void ppc405_gpio_init(hwaddr base) 737 { 738 ppc405_gpio_t *gpio; 739 740 gpio = g_malloc0(sizeof(ppc405_gpio_t)); 741 #ifdef DEBUG_GPIO 742 printf("%s: offset " TARGET_FMT_plx "\n", __func__, base); 743 #endif 744 memory_region_init_io(&gpio->io, NULL, &ppc405_gpio_ops, gpio, "pgio", 0x038); 745 memory_region_add_subregion(get_system_memory(), base, &gpio->io); 746 qemu_register_reset(&ppc405_gpio_reset, gpio); 747 } 748 749 /*****************************************************************************/ 750 /* On Chip Memory */ 751 enum { 752 OCM0_ISARC = 0x018, 753 OCM0_ISACNTL = 0x019, 754 OCM0_DSARC = 0x01A, 755 OCM0_DSACNTL = 0x01B, 756 }; 757 758 typedef struct ppc405_ocm_t ppc405_ocm_t; 759 struct ppc405_ocm_t { 760 MemoryRegion ram; 761 MemoryRegion isarc_ram; 762 MemoryRegion dsarc_ram; 763 uint32_t isarc; 764 uint32_t isacntl; 765 uint32_t dsarc; 766 uint32_t dsacntl; 767 }; 768 769 static void ocm_update_mappings (ppc405_ocm_t *ocm, 770 uint32_t isarc, uint32_t isacntl, 771 uint32_t dsarc, uint32_t dsacntl) 772 { 773 #ifdef DEBUG_OCM 774 printf("OCM update ISA %08" PRIx32 " %08" PRIx32 " (%08" PRIx32 775 " %08" PRIx32 ") DSA %08" PRIx32 " %08" PRIx32 776 " (%08" PRIx32 " %08" PRIx32 ")\n", 777 isarc, isacntl, dsarc, dsacntl, 778 ocm->isarc, ocm->isacntl, ocm->dsarc, ocm->dsacntl); 779 #endif 780 if (ocm->isarc != isarc || 781 (ocm->isacntl & 0x80000000) != (isacntl & 0x80000000)) { 782 if (ocm->isacntl & 0x80000000) { 783 /* Unmap previously assigned memory region */ 784 printf("OCM unmap ISA %08" PRIx32 "\n", ocm->isarc); 785 memory_region_del_subregion(get_system_memory(), &ocm->isarc_ram); 786 } 787 if (isacntl & 0x80000000) { 788 /* Map new instruction memory region */ 789 #ifdef DEBUG_OCM 790 printf("OCM map ISA %08" PRIx32 "\n", isarc); 791 #endif 792 memory_region_add_subregion(get_system_memory(), isarc, 793 &ocm->isarc_ram); 794 } 795 } 796 if (ocm->dsarc != dsarc || 797 (ocm->dsacntl & 0x80000000) != (dsacntl & 0x80000000)) { 798 if (ocm->dsacntl & 0x80000000) { 799 /* Beware not to unmap the region we just mapped */ 800 if (!(isacntl & 0x80000000) || ocm->dsarc != isarc) { 801 /* Unmap previously assigned memory region */ 802 #ifdef DEBUG_OCM 803 printf("OCM unmap DSA %08" PRIx32 "\n", ocm->dsarc); 804 #endif 805 memory_region_del_subregion(get_system_memory(), 806 &ocm->dsarc_ram); 807 } 808 } 809 if (dsacntl & 0x80000000) { 810 /* Beware not to remap the region we just mapped */ 811 if (!(isacntl & 0x80000000) || dsarc != isarc) { 812 /* Map new data memory region */ 813 #ifdef DEBUG_OCM 814 printf("OCM map DSA %08" PRIx32 "\n", dsarc); 815 #endif 816 memory_region_add_subregion(get_system_memory(), dsarc, 817 &ocm->dsarc_ram); 818 } 819 } 820 } 821 } 822 823 static uint32_t dcr_read_ocm (void *opaque, int dcrn) 824 { 825 ppc405_ocm_t *ocm; 826 uint32_t ret; 827 828 ocm = opaque; 829 switch (dcrn) { 830 case OCM0_ISARC: 831 ret = ocm->isarc; 832 break; 833 case OCM0_ISACNTL: 834 ret = ocm->isacntl; 835 break; 836 case OCM0_DSARC: 837 ret = ocm->dsarc; 838 break; 839 case OCM0_DSACNTL: 840 ret = ocm->dsacntl; 841 break; 842 default: 843 ret = 0; 844 break; 845 } 846 847 return ret; 848 } 849 850 static void dcr_write_ocm (void *opaque, int dcrn, uint32_t val) 851 { 852 ppc405_ocm_t *ocm; 853 uint32_t isarc, dsarc, isacntl, dsacntl; 854 855 ocm = opaque; 856 isarc = ocm->isarc; 857 dsarc = ocm->dsarc; 858 isacntl = ocm->isacntl; 859 dsacntl = ocm->dsacntl; 860 switch (dcrn) { 861 case OCM0_ISARC: 862 isarc = val & 0xFC000000; 863 break; 864 case OCM0_ISACNTL: 865 isacntl = val & 0xC0000000; 866 break; 867 case OCM0_DSARC: 868 isarc = val & 0xFC000000; 869 break; 870 case OCM0_DSACNTL: 871 isacntl = val & 0xC0000000; 872 break; 873 } 874 ocm_update_mappings(ocm, isarc, isacntl, dsarc, dsacntl); 875 ocm->isarc = isarc; 876 ocm->dsarc = dsarc; 877 ocm->isacntl = isacntl; 878 ocm->dsacntl = dsacntl; 879 } 880 881 static void ocm_reset (void *opaque) 882 { 883 ppc405_ocm_t *ocm; 884 uint32_t isarc, dsarc, isacntl, dsacntl; 885 886 ocm = opaque; 887 isarc = 0x00000000; 888 isacntl = 0x00000000; 889 dsarc = 0x00000000; 890 dsacntl = 0x00000000; 891 ocm_update_mappings(ocm, isarc, isacntl, dsarc, dsacntl); 892 ocm->isarc = isarc; 893 ocm->dsarc = dsarc; 894 ocm->isacntl = isacntl; 895 ocm->dsacntl = dsacntl; 896 } 897 898 static void ppc405_ocm_init(CPUPPCState *env) 899 { 900 ppc405_ocm_t *ocm; 901 902 ocm = g_malloc0(sizeof(ppc405_ocm_t)); 903 /* XXX: Size is 4096 or 0x04000000 */ 904 memory_region_init_ram(&ocm->isarc_ram, NULL, "ppc405.ocm", 4 * KiB, 905 &error_fatal); 906 memory_region_init_alias(&ocm->dsarc_ram, NULL, "ppc405.dsarc", 907 &ocm->isarc_ram, 0, 4 * KiB); 908 qemu_register_reset(&ocm_reset, ocm); 909 ppc_dcr_register(env, OCM0_ISARC, 910 ocm, &dcr_read_ocm, &dcr_write_ocm); 911 ppc_dcr_register(env, OCM0_ISACNTL, 912 ocm, &dcr_read_ocm, &dcr_write_ocm); 913 ppc_dcr_register(env, OCM0_DSARC, 914 ocm, &dcr_read_ocm, &dcr_write_ocm); 915 ppc_dcr_register(env, OCM0_DSACNTL, 916 ocm, &dcr_read_ocm, &dcr_write_ocm); 917 } 918 919 /*****************************************************************************/ 920 /* General purpose timers */ 921 typedef struct ppc4xx_gpt_t ppc4xx_gpt_t; 922 struct ppc4xx_gpt_t { 923 MemoryRegion iomem; 924 int64_t tb_offset; 925 uint32_t tb_freq; 926 QEMUTimer *timer; 927 qemu_irq irqs[5]; 928 uint32_t oe; 929 uint32_t ol; 930 uint32_t im; 931 uint32_t is; 932 uint32_t ie; 933 uint32_t comp[5]; 934 uint32_t mask[5]; 935 }; 936 937 static int ppc4xx_gpt_compare (ppc4xx_gpt_t *gpt, int n) 938 { 939 /* XXX: TODO */ 940 return 0; 941 } 942 943 static void ppc4xx_gpt_set_output (ppc4xx_gpt_t *gpt, int n, int level) 944 { 945 /* XXX: TODO */ 946 } 947 948 static void ppc4xx_gpt_set_outputs (ppc4xx_gpt_t *gpt) 949 { 950 uint32_t mask; 951 int i; 952 953 mask = 0x80000000; 954 for (i = 0; i < 5; i++) { 955 if (gpt->oe & mask) { 956 /* Output is enabled */ 957 if (ppc4xx_gpt_compare(gpt, i)) { 958 /* Comparison is OK */ 959 ppc4xx_gpt_set_output(gpt, i, gpt->ol & mask); 960 } else { 961 /* Comparison is KO */ 962 ppc4xx_gpt_set_output(gpt, i, gpt->ol & mask ? 0 : 1); 963 } 964 } 965 mask = mask >> 1; 966 } 967 } 968 969 static void ppc4xx_gpt_set_irqs (ppc4xx_gpt_t *gpt) 970 { 971 uint32_t mask; 972 int i; 973 974 mask = 0x00008000; 975 for (i = 0; i < 5; i++) { 976 if (gpt->is & gpt->im & mask) 977 qemu_irq_raise(gpt->irqs[i]); 978 else 979 qemu_irq_lower(gpt->irqs[i]); 980 mask = mask >> 1; 981 } 982 } 983 984 static void ppc4xx_gpt_compute_timer (ppc4xx_gpt_t *gpt) 985 { 986 /* XXX: TODO */ 987 } 988 989 static uint64_t ppc4xx_gpt_read(void *opaque, hwaddr addr, unsigned size) 990 { 991 ppc4xx_gpt_t *gpt; 992 uint32_t ret; 993 int idx; 994 995 #ifdef DEBUG_GPT 996 printf("%s: addr " TARGET_FMT_plx "\n", __func__, addr); 997 #endif 998 gpt = opaque; 999 switch (addr) { 1000 case 0x00: 1001 /* Time base counter */ 1002 ret = muldiv64(qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) + gpt->tb_offset, 1003 gpt->tb_freq, NANOSECONDS_PER_SECOND); 1004 break; 1005 case 0x10: 1006 /* Output enable */ 1007 ret = gpt->oe; 1008 break; 1009 case 0x14: 1010 /* Output level */ 1011 ret = gpt->ol; 1012 break; 1013 case 0x18: 1014 /* Interrupt mask */ 1015 ret = gpt->im; 1016 break; 1017 case 0x1C: 1018 case 0x20: 1019 /* Interrupt status */ 1020 ret = gpt->is; 1021 break; 1022 case 0x24: 1023 /* Interrupt enable */ 1024 ret = gpt->ie; 1025 break; 1026 case 0x80 ... 0x90: 1027 /* Compare timer */ 1028 idx = (addr - 0x80) >> 2; 1029 ret = gpt->comp[idx]; 1030 break; 1031 case 0xC0 ... 0xD0: 1032 /* Compare mask */ 1033 idx = (addr - 0xC0) >> 2; 1034 ret = gpt->mask[idx]; 1035 break; 1036 default: 1037 ret = -1; 1038 break; 1039 } 1040 1041 return ret; 1042 } 1043 1044 static void ppc4xx_gpt_write(void *opaque, hwaddr addr, uint64_t value, 1045 unsigned size) 1046 { 1047 ppc4xx_gpt_t *gpt; 1048 int idx; 1049 1050 #ifdef DEBUG_I2C 1051 printf("%s: addr " TARGET_FMT_plx " val %08" PRIx32 "\n", __func__, addr, 1052 value); 1053 #endif 1054 gpt = opaque; 1055 switch (addr) { 1056 case 0x00: 1057 /* Time base counter */ 1058 gpt->tb_offset = muldiv64(value, NANOSECONDS_PER_SECOND, gpt->tb_freq) 1059 - qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL); 1060 ppc4xx_gpt_compute_timer(gpt); 1061 break; 1062 case 0x10: 1063 /* Output enable */ 1064 gpt->oe = value & 0xF8000000; 1065 ppc4xx_gpt_set_outputs(gpt); 1066 break; 1067 case 0x14: 1068 /* Output level */ 1069 gpt->ol = value & 0xF8000000; 1070 ppc4xx_gpt_set_outputs(gpt); 1071 break; 1072 case 0x18: 1073 /* Interrupt mask */ 1074 gpt->im = value & 0x0000F800; 1075 break; 1076 case 0x1C: 1077 /* Interrupt status set */ 1078 gpt->is |= value & 0x0000F800; 1079 ppc4xx_gpt_set_irqs(gpt); 1080 break; 1081 case 0x20: 1082 /* Interrupt status clear */ 1083 gpt->is &= ~(value & 0x0000F800); 1084 ppc4xx_gpt_set_irqs(gpt); 1085 break; 1086 case 0x24: 1087 /* Interrupt enable */ 1088 gpt->ie = value & 0x0000F800; 1089 ppc4xx_gpt_set_irqs(gpt); 1090 break; 1091 case 0x80 ... 0x90: 1092 /* Compare timer */ 1093 idx = (addr - 0x80) >> 2; 1094 gpt->comp[idx] = value & 0xF8000000; 1095 ppc4xx_gpt_compute_timer(gpt); 1096 break; 1097 case 0xC0 ... 0xD0: 1098 /* Compare mask */ 1099 idx = (addr - 0xC0) >> 2; 1100 gpt->mask[idx] = value & 0xF8000000; 1101 ppc4xx_gpt_compute_timer(gpt); 1102 break; 1103 } 1104 } 1105 1106 static const MemoryRegionOps gpt_ops = { 1107 .read = ppc4xx_gpt_read, 1108 .write = ppc4xx_gpt_write, 1109 .valid.min_access_size = 4, 1110 .valid.max_access_size = 4, 1111 .endianness = DEVICE_NATIVE_ENDIAN, 1112 }; 1113 1114 static void ppc4xx_gpt_cb (void *opaque) 1115 { 1116 ppc4xx_gpt_t *gpt; 1117 1118 gpt = opaque; 1119 ppc4xx_gpt_set_irqs(gpt); 1120 ppc4xx_gpt_set_outputs(gpt); 1121 ppc4xx_gpt_compute_timer(gpt); 1122 } 1123 1124 static void ppc4xx_gpt_reset (void *opaque) 1125 { 1126 ppc4xx_gpt_t *gpt; 1127 int i; 1128 1129 gpt = opaque; 1130 timer_del(gpt->timer); 1131 gpt->oe = 0x00000000; 1132 gpt->ol = 0x00000000; 1133 gpt->im = 0x00000000; 1134 gpt->is = 0x00000000; 1135 gpt->ie = 0x00000000; 1136 for (i = 0; i < 5; i++) { 1137 gpt->comp[i] = 0x00000000; 1138 gpt->mask[i] = 0x00000000; 1139 } 1140 } 1141 1142 static void ppc4xx_gpt_init(hwaddr base, qemu_irq irqs[5]) 1143 { 1144 ppc4xx_gpt_t *gpt; 1145 int i; 1146 1147 gpt = g_malloc0(sizeof(ppc4xx_gpt_t)); 1148 for (i = 0; i < 5; i++) { 1149 gpt->irqs[i] = irqs[i]; 1150 } 1151 gpt->timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, &ppc4xx_gpt_cb, gpt); 1152 #ifdef DEBUG_GPT 1153 printf("%s: offset " TARGET_FMT_plx "\n", __func__, base); 1154 #endif 1155 memory_region_init_io(&gpt->iomem, NULL, &gpt_ops, gpt, "gpt", 0x0d4); 1156 memory_region_add_subregion(get_system_memory(), base, &gpt->iomem); 1157 qemu_register_reset(ppc4xx_gpt_reset, gpt); 1158 } 1159 1160 /*****************************************************************************/ 1161 /* PowerPC 405EP */ 1162 /* CPU control */ 1163 enum { 1164 PPC405EP_CPC0_PLLMR0 = 0x0F0, 1165 PPC405EP_CPC0_BOOT = 0x0F1, 1166 PPC405EP_CPC0_EPCTL = 0x0F3, 1167 PPC405EP_CPC0_PLLMR1 = 0x0F4, 1168 PPC405EP_CPC0_UCR = 0x0F5, 1169 PPC405EP_CPC0_SRR = 0x0F6, 1170 PPC405EP_CPC0_JTAGID = 0x0F7, 1171 PPC405EP_CPC0_PCI = 0x0F9, 1172 #if 0 1173 PPC405EP_CPC0_ER = xxx, 1174 PPC405EP_CPC0_FR = xxx, 1175 PPC405EP_CPC0_SR = xxx, 1176 #endif 1177 }; 1178 1179 enum { 1180 PPC405EP_CPU_CLK = 0, 1181 PPC405EP_PLB_CLK = 1, 1182 PPC405EP_OPB_CLK = 2, 1183 PPC405EP_EBC_CLK = 3, 1184 PPC405EP_MAL_CLK = 4, 1185 PPC405EP_PCI_CLK = 5, 1186 PPC405EP_UART0_CLK = 6, 1187 PPC405EP_UART1_CLK = 7, 1188 PPC405EP_CLK_NB = 8, 1189 }; 1190 1191 typedef struct ppc405ep_cpc_t ppc405ep_cpc_t; 1192 struct ppc405ep_cpc_t { 1193 uint32_t sysclk; 1194 clk_setup_t clk_setup[PPC405EP_CLK_NB]; 1195 uint32_t boot; 1196 uint32_t epctl; 1197 uint32_t pllmr[2]; 1198 uint32_t ucr; 1199 uint32_t srr; 1200 uint32_t jtagid; 1201 uint32_t pci; 1202 /* Clock and power management */ 1203 uint32_t er; 1204 uint32_t fr; 1205 uint32_t sr; 1206 }; 1207 1208 static void ppc405ep_compute_clocks (ppc405ep_cpc_t *cpc) 1209 { 1210 uint32_t CPU_clk, PLB_clk, OPB_clk, EBC_clk, MAL_clk, PCI_clk; 1211 uint32_t UART0_clk, UART1_clk; 1212 uint64_t VCO_out, PLL_out; 1213 int M, D; 1214 1215 VCO_out = 0; 1216 if ((cpc->pllmr[1] & 0x80000000) && !(cpc->pllmr[1] & 0x40000000)) { 1217 M = (((cpc->pllmr[1] >> 20) - 1) & 0xF) + 1; /* FBMUL */ 1218 #ifdef DEBUG_CLOCKS_LL 1219 printf("FBMUL %01" PRIx32 " %d\n", (cpc->pllmr[1] >> 20) & 0xF, M); 1220 #endif 1221 D = 8 - ((cpc->pllmr[1] >> 16) & 0x7); /* FWDA */ 1222 #ifdef DEBUG_CLOCKS_LL 1223 printf("FWDA %01" PRIx32 " %d\n", (cpc->pllmr[1] >> 16) & 0x7, D); 1224 #endif 1225 VCO_out = (uint64_t)cpc->sysclk * M * D; 1226 if (VCO_out < 500000000UL || VCO_out > 1000000000UL) { 1227 /* Error - unlock the PLL */ 1228 printf("VCO out of range %" PRIu64 "\n", VCO_out); 1229 #if 0 1230 cpc->pllmr[1] &= ~0x80000000; 1231 goto pll_bypass; 1232 #endif 1233 } 1234 PLL_out = VCO_out / D; 1235 /* Pretend the PLL is locked */ 1236 cpc->boot |= 0x00000001; 1237 } else { 1238 #if 0 1239 pll_bypass: 1240 #endif 1241 PLL_out = cpc->sysclk; 1242 if (cpc->pllmr[1] & 0x40000000) { 1243 /* Pretend the PLL is not locked */ 1244 cpc->boot &= ~0x00000001; 1245 } 1246 } 1247 /* Now, compute all other clocks */ 1248 D = ((cpc->pllmr[0] >> 20) & 0x3) + 1; /* CCDV */ 1249 #ifdef DEBUG_CLOCKS_LL 1250 printf("CCDV %01" PRIx32 " %d\n", (cpc->pllmr[0] >> 20) & 0x3, D); 1251 #endif 1252 CPU_clk = PLL_out / D; 1253 D = ((cpc->pllmr[0] >> 16) & 0x3) + 1; /* CBDV */ 1254 #ifdef DEBUG_CLOCKS_LL 1255 printf("CBDV %01" PRIx32 " %d\n", (cpc->pllmr[0] >> 16) & 0x3, D); 1256 #endif 1257 PLB_clk = CPU_clk / D; 1258 D = ((cpc->pllmr[0] >> 12) & 0x3) + 1; /* OPDV */ 1259 #ifdef DEBUG_CLOCKS_LL 1260 printf("OPDV %01" PRIx32 " %d\n", (cpc->pllmr[0] >> 12) & 0x3, D); 1261 #endif 1262 OPB_clk = PLB_clk / D; 1263 D = ((cpc->pllmr[0] >> 8) & 0x3) + 2; /* EPDV */ 1264 #ifdef DEBUG_CLOCKS_LL 1265 printf("EPDV %01" PRIx32 " %d\n", (cpc->pllmr[0] >> 8) & 0x3, D); 1266 #endif 1267 EBC_clk = PLB_clk / D; 1268 D = ((cpc->pllmr[0] >> 4) & 0x3) + 1; /* MPDV */ 1269 #ifdef DEBUG_CLOCKS_LL 1270 printf("MPDV %01" PRIx32 " %d\n", (cpc->pllmr[0] >> 4) & 0x3, D); 1271 #endif 1272 MAL_clk = PLB_clk / D; 1273 D = (cpc->pllmr[0] & 0x3) + 1; /* PPDV */ 1274 #ifdef DEBUG_CLOCKS_LL 1275 printf("PPDV %01" PRIx32 " %d\n", cpc->pllmr[0] & 0x3, D); 1276 #endif 1277 PCI_clk = PLB_clk / D; 1278 D = ((cpc->ucr - 1) & 0x7F) + 1; /* U0DIV */ 1279 #ifdef DEBUG_CLOCKS_LL 1280 printf("U0DIV %01" PRIx32 " %d\n", cpc->ucr & 0x7F, D); 1281 #endif 1282 UART0_clk = PLL_out / D; 1283 D = (((cpc->ucr >> 8) - 1) & 0x7F) + 1; /* U1DIV */ 1284 #ifdef DEBUG_CLOCKS_LL 1285 printf("U1DIV %01" PRIx32 " %d\n", (cpc->ucr >> 8) & 0x7F, D); 1286 #endif 1287 UART1_clk = PLL_out / D; 1288 #ifdef DEBUG_CLOCKS 1289 printf("Setup PPC405EP clocks - sysclk %" PRIu32 " VCO %" PRIu64 1290 " PLL out %" PRIu64 " Hz\n", cpc->sysclk, VCO_out, PLL_out); 1291 printf("CPU %" PRIu32 " PLB %" PRIu32 " OPB %" PRIu32 " EBC %" PRIu32 1292 " MAL %" PRIu32 " PCI %" PRIu32 " UART0 %" PRIu32 1293 " UART1 %" PRIu32 "\n", 1294 CPU_clk, PLB_clk, OPB_clk, EBC_clk, MAL_clk, PCI_clk, 1295 UART0_clk, UART1_clk); 1296 #endif 1297 /* Setup CPU clocks */ 1298 clk_setup(&cpc->clk_setup[PPC405EP_CPU_CLK], CPU_clk); 1299 /* Setup PLB clock */ 1300 clk_setup(&cpc->clk_setup[PPC405EP_PLB_CLK], PLB_clk); 1301 /* Setup OPB clock */ 1302 clk_setup(&cpc->clk_setup[PPC405EP_OPB_CLK], OPB_clk); 1303 /* Setup external clock */ 1304 clk_setup(&cpc->clk_setup[PPC405EP_EBC_CLK], EBC_clk); 1305 /* Setup MAL clock */ 1306 clk_setup(&cpc->clk_setup[PPC405EP_MAL_CLK], MAL_clk); 1307 /* Setup PCI clock */ 1308 clk_setup(&cpc->clk_setup[PPC405EP_PCI_CLK], PCI_clk); 1309 /* Setup UART0 clock */ 1310 clk_setup(&cpc->clk_setup[PPC405EP_UART0_CLK], UART0_clk); 1311 /* Setup UART1 clock */ 1312 clk_setup(&cpc->clk_setup[PPC405EP_UART1_CLK], UART1_clk); 1313 } 1314 1315 static uint32_t dcr_read_epcpc (void *opaque, int dcrn) 1316 { 1317 ppc405ep_cpc_t *cpc; 1318 uint32_t ret; 1319 1320 cpc = opaque; 1321 switch (dcrn) { 1322 case PPC405EP_CPC0_BOOT: 1323 ret = cpc->boot; 1324 break; 1325 case PPC405EP_CPC0_EPCTL: 1326 ret = cpc->epctl; 1327 break; 1328 case PPC405EP_CPC0_PLLMR0: 1329 ret = cpc->pllmr[0]; 1330 break; 1331 case PPC405EP_CPC0_PLLMR1: 1332 ret = cpc->pllmr[1]; 1333 break; 1334 case PPC405EP_CPC0_UCR: 1335 ret = cpc->ucr; 1336 break; 1337 case PPC405EP_CPC0_SRR: 1338 ret = cpc->srr; 1339 break; 1340 case PPC405EP_CPC0_JTAGID: 1341 ret = cpc->jtagid; 1342 break; 1343 case PPC405EP_CPC0_PCI: 1344 ret = cpc->pci; 1345 break; 1346 default: 1347 /* Avoid gcc warning */ 1348 ret = 0; 1349 break; 1350 } 1351 1352 return ret; 1353 } 1354 1355 static void dcr_write_epcpc (void *opaque, int dcrn, uint32_t val) 1356 { 1357 ppc405ep_cpc_t *cpc; 1358 1359 cpc = opaque; 1360 switch (dcrn) { 1361 case PPC405EP_CPC0_BOOT: 1362 /* Read-only register */ 1363 break; 1364 case PPC405EP_CPC0_EPCTL: 1365 /* Don't care for now */ 1366 cpc->epctl = val & 0xC00000F3; 1367 break; 1368 case PPC405EP_CPC0_PLLMR0: 1369 cpc->pllmr[0] = val & 0x00633333; 1370 ppc405ep_compute_clocks(cpc); 1371 break; 1372 case PPC405EP_CPC0_PLLMR1: 1373 cpc->pllmr[1] = val & 0xC0F73FFF; 1374 ppc405ep_compute_clocks(cpc); 1375 break; 1376 case PPC405EP_CPC0_UCR: 1377 /* UART control - don't care for now */ 1378 cpc->ucr = val & 0x003F7F7F; 1379 break; 1380 case PPC405EP_CPC0_SRR: 1381 cpc->srr = val; 1382 break; 1383 case PPC405EP_CPC0_JTAGID: 1384 /* Read-only */ 1385 break; 1386 case PPC405EP_CPC0_PCI: 1387 cpc->pci = val; 1388 break; 1389 } 1390 } 1391 1392 static void ppc405ep_cpc_reset (void *opaque) 1393 { 1394 ppc405ep_cpc_t *cpc = opaque; 1395 1396 cpc->boot = 0x00000010; /* Boot from PCI - IIC EEPROM disabled */ 1397 cpc->epctl = 0x00000000; 1398 cpc->pllmr[0] = 0x00011010; 1399 cpc->pllmr[1] = 0x40000000; 1400 cpc->ucr = 0x00000000; 1401 cpc->srr = 0x00040000; 1402 cpc->pci = 0x00000000; 1403 cpc->er = 0x00000000; 1404 cpc->fr = 0x00000000; 1405 cpc->sr = 0x00000000; 1406 ppc405ep_compute_clocks(cpc); 1407 } 1408 1409 /* XXX: sysclk should be between 25 and 100 MHz */ 1410 static void ppc405ep_cpc_init (CPUPPCState *env, clk_setup_t clk_setup[8], 1411 uint32_t sysclk) 1412 { 1413 ppc405ep_cpc_t *cpc; 1414 1415 cpc = g_malloc0(sizeof(ppc405ep_cpc_t)); 1416 memcpy(cpc->clk_setup, clk_setup, 1417 PPC405EP_CLK_NB * sizeof(clk_setup_t)); 1418 cpc->jtagid = 0x20267049; 1419 cpc->sysclk = sysclk; 1420 qemu_register_reset(&ppc405ep_cpc_reset, cpc); 1421 ppc_dcr_register(env, PPC405EP_CPC0_BOOT, cpc, 1422 &dcr_read_epcpc, &dcr_write_epcpc); 1423 ppc_dcr_register(env, PPC405EP_CPC0_EPCTL, cpc, 1424 &dcr_read_epcpc, &dcr_write_epcpc); 1425 ppc_dcr_register(env, PPC405EP_CPC0_PLLMR0, cpc, 1426 &dcr_read_epcpc, &dcr_write_epcpc); 1427 ppc_dcr_register(env, PPC405EP_CPC0_PLLMR1, cpc, 1428 &dcr_read_epcpc, &dcr_write_epcpc); 1429 ppc_dcr_register(env, PPC405EP_CPC0_UCR, cpc, 1430 &dcr_read_epcpc, &dcr_write_epcpc); 1431 ppc_dcr_register(env, PPC405EP_CPC0_SRR, cpc, 1432 &dcr_read_epcpc, &dcr_write_epcpc); 1433 ppc_dcr_register(env, PPC405EP_CPC0_JTAGID, cpc, 1434 &dcr_read_epcpc, &dcr_write_epcpc); 1435 ppc_dcr_register(env, PPC405EP_CPC0_PCI, cpc, 1436 &dcr_read_epcpc, &dcr_write_epcpc); 1437 #if 0 1438 ppc_dcr_register(env, PPC405EP_CPC0_ER, cpc, 1439 &dcr_read_epcpc, &dcr_write_epcpc); 1440 ppc_dcr_register(env, PPC405EP_CPC0_FR, cpc, 1441 &dcr_read_epcpc, &dcr_write_epcpc); 1442 ppc_dcr_register(env, PPC405EP_CPC0_SR, cpc, 1443 &dcr_read_epcpc, &dcr_write_epcpc); 1444 #endif 1445 } 1446 1447 CPUPPCState *ppc405ep_init(MemoryRegion *address_space_mem, 1448 MemoryRegion ram_memories[2], 1449 hwaddr ram_bases[2], 1450 hwaddr ram_sizes[2], 1451 uint32_t sysclk, DeviceState **uicdevp, 1452 int do_init) 1453 { 1454 clk_setup_t clk_setup[PPC405EP_CLK_NB], tlb_clk_setup; 1455 qemu_irq dma_irqs[4], gpt_irqs[5], mal_irqs[4]; 1456 PowerPCCPU *cpu; 1457 CPUPPCState *env; 1458 DeviceState *uicdev; 1459 SysBusDevice *uicsbd; 1460 1461 memset(clk_setup, 0, sizeof(clk_setup)); 1462 /* init CPUs */ 1463 cpu = ppc4xx_init(POWERPC_CPU_TYPE_NAME("405ep"), 1464 &clk_setup[PPC405EP_CPU_CLK], 1465 &tlb_clk_setup, sysclk); 1466 env = &cpu->env; 1467 clk_setup[PPC405EP_CPU_CLK].cb = tlb_clk_setup.cb; 1468 clk_setup[PPC405EP_CPU_CLK].opaque = tlb_clk_setup.opaque; 1469 /* Internal devices init */ 1470 /* Memory mapped devices registers */ 1471 /* PLB arbitrer */ 1472 ppc4xx_plb_init(env); 1473 /* PLB to OPB bridge */ 1474 ppc4xx_pob_init(env); 1475 /* OBP arbitrer */ 1476 ppc4xx_opba_init(0xef600600); 1477 /* Initialize timers */ 1478 ppc_booke_timers_init(cpu, sysclk, 0); 1479 /* Universal interrupt controller */ 1480 uicdev = qdev_new(TYPE_PPC_UIC); 1481 uicsbd = SYS_BUS_DEVICE(uicdev); 1482 1483 object_property_set_link(OBJECT(uicdev), "cpu", OBJECT(cpu), 1484 &error_fatal); 1485 sysbus_realize_and_unref(uicsbd, &error_fatal); 1486 1487 sysbus_connect_irq(uicsbd, PPCUIC_OUTPUT_INT, 1488 ((qemu_irq *)env->irq_inputs)[PPC40x_INPUT_INT]); 1489 sysbus_connect_irq(uicsbd, PPCUIC_OUTPUT_CINT, 1490 ((qemu_irq *)env->irq_inputs)[PPC40x_INPUT_CINT]); 1491 1492 *uicdevp = uicdev; 1493 1494 /* SDRAM controller */ 1495 /* XXX 405EP has no ECC interrupt */ 1496 ppc4xx_sdram_init(env, qdev_get_gpio_in(uicdev, 17), 2, ram_memories, 1497 ram_bases, ram_sizes, do_init); 1498 /* External bus controller */ 1499 ppc405_ebc_init(env); 1500 /* DMA controller */ 1501 dma_irqs[0] = qdev_get_gpio_in(uicdev, 5); 1502 dma_irqs[1] = qdev_get_gpio_in(uicdev, 6); 1503 dma_irqs[2] = qdev_get_gpio_in(uicdev, 7); 1504 dma_irqs[3] = qdev_get_gpio_in(uicdev, 8); 1505 ppc405_dma_init(env, dma_irqs); 1506 /* IIC controller */ 1507 sysbus_create_simple(TYPE_PPC4xx_I2C, 0xef600500, 1508 qdev_get_gpio_in(uicdev, 2)); 1509 /* GPIO */ 1510 ppc405_gpio_init(0xef600700); 1511 /* Serial ports */ 1512 if (serial_hd(0) != NULL) { 1513 serial_mm_init(address_space_mem, 0xef600300, 0, 1514 qdev_get_gpio_in(uicdev, 0), 1515 PPC_SERIAL_MM_BAUDBASE, serial_hd(0), 1516 DEVICE_BIG_ENDIAN); 1517 } 1518 if (serial_hd(1) != NULL) { 1519 serial_mm_init(address_space_mem, 0xef600400, 0, 1520 qdev_get_gpio_in(uicdev, 1), 1521 PPC_SERIAL_MM_BAUDBASE, serial_hd(1), 1522 DEVICE_BIG_ENDIAN); 1523 } 1524 /* OCM */ 1525 ppc405_ocm_init(env); 1526 /* GPT */ 1527 gpt_irqs[0] = qdev_get_gpio_in(uicdev, 19); 1528 gpt_irqs[1] = qdev_get_gpio_in(uicdev, 20); 1529 gpt_irqs[2] = qdev_get_gpio_in(uicdev, 21); 1530 gpt_irqs[3] = qdev_get_gpio_in(uicdev, 22); 1531 gpt_irqs[4] = qdev_get_gpio_in(uicdev, 23); 1532 ppc4xx_gpt_init(0xef600000, gpt_irqs); 1533 /* PCI */ 1534 /* Uses UIC IRQs 3, 16, 18 */ 1535 /* MAL */ 1536 mal_irqs[0] = qdev_get_gpio_in(uicdev, 11); 1537 mal_irqs[1] = qdev_get_gpio_in(uicdev, 12); 1538 mal_irqs[2] = qdev_get_gpio_in(uicdev, 13); 1539 mal_irqs[3] = qdev_get_gpio_in(uicdev, 14); 1540 ppc4xx_mal_init(env, 4, 2, mal_irqs); 1541 /* Ethernet */ 1542 /* Uses UIC IRQs 9, 15, 17 */ 1543 /* CPU control */ 1544 ppc405ep_cpc_init(env, clk_setup, sysclk); 1545 1546 return env; 1547 } 1548