2 * QEMU PowerPC 405 embedded processors emulation
4 * Copyright (c) 2007 Jocelyn Mayer
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:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
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
28 #include "qemu-timer.h"
31 #include "exec-memory.h"
42 //#define DEBUG_CLOCKS_LL
44 ram_addr_t
ppc405_set_bootinfo (CPUState
*env
, ppc4xx_bd_info_t
*bd
,
50 /* We put the bd structure at the top of memory */
51 if (bd
->bi_memsize
>= 0x01000000UL
)
52 bdloc
= 0x01000000UL
- sizeof(struct ppc4xx_bd_info_t
);
54 bdloc
= bd
->bi_memsize
- sizeof(struct ppc4xx_bd_info_t
);
55 stl_be_phys(bdloc
+ 0x00, bd
->bi_memstart
);
56 stl_be_phys(bdloc
+ 0x04, bd
->bi_memsize
);
57 stl_be_phys(bdloc
+ 0x08, bd
->bi_flashstart
);
58 stl_be_phys(bdloc
+ 0x0C, bd
->bi_flashsize
);
59 stl_be_phys(bdloc
+ 0x10, bd
->bi_flashoffset
);
60 stl_be_phys(bdloc
+ 0x14, bd
->bi_sramstart
);
61 stl_be_phys(bdloc
+ 0x18, bd
->bi_sramsize
);
62 stl_be_phys(bdloc
+ 0x1C, bd
->bi_bootflags
);
63 stl_be_phys(bdloc
+ 0x20, bd
->bi_ipaddr
);
64 for (i
= 0; i
< 6; i
++) {
65 stb_phys(bdloc
+ 0x24 + i
, bd
->bi_enetaddr
[i
]);
67 stw_be_phys(bdloc
+ 0x2A, bd
->bi_ethspeed
);
68 stl_be_phys(bdloc
+ 0x2C, bd
->bi_intfreq
);
69 stl_be_phys(bdloc
+ 0x30, bd
->bi_busfreq
);
70 stl_be_phys(bdloc
+ 0x34, bd
->bi_baudrate
);
71 for (i
= 0; i
< 4; i
++) {
72 stb_phys(bdloc
+ 0x38 + i
, bd
->bi_s_version
[i
]);
74 for (i
= 0; i
< 32; i
++) {
75 stb_phys(bdloc
+ 0x3C + i
, bd
->bi_r_version
[i
]);
77 stl_be_phys(bdloc
+ 0x5C, bd
->bi_plb_busfreq
);
78 stl_be_phys(bdloc
+ 0x60, bd
->bi_pci_busfreq
);
79 for (i
= 0; i
< 6; i
++) {
80 stb_phys(bdloc
+ 0x64 + i
, bd
->bi_pci_enetaddr
[i
]);
83 if (flags
& 0x00000001) {
84 for (i
= 0; i
< 6; i
++)
85 stb_phys(bdloc
+ n
++, bd
->bi_pci_enetaddr2
[i
]);
87 stl_be_phys(bdloc
+ n
, bd
->bi_opbfreq
);
89 for (i
= 0; i
< 2; i
++) {
90 stl_be_phys(bdloc
+ n
, bd
->bi_iic_fast
[i
]);
97 /*****************************************************************************/
98 /* Shared peripherals */
100 /*****************************************************************************/
101 /* Peripheral local bus arbitrer */
108 typedef struct ppc4xx_plb_t ppc4xx_plb_t
;
109 struct ppc4xx_plb_t
{
115 static uint32_t dcr_read_plb (void *opaque
, int dcrn
)
132 /* Avoid gcc warning */
140 static void dcr_write_plb (void *opaque
, int dcrn
, uint32_t val
)
147 /* We don't care about the actual parameters written as
148 * we don't manage any priorities on the bus
150 plb
->acr
= val
& 0xF8000000;
162 static void ppc4xx_plb_reset (void *opaque
)
167 plb
->acr
= 0x00000000;
168 plb
->bear
= 0x00000000;
169 plb
->besr
= 0x00000000;
172 static void ppc4xx_plb_init(CPUState
*env
)
176 plb
= g_malloc0(sizeof(ppc4xx_plb_t
));
177 ppc_dcr_register(env
, PLB0_ACR
, plb
, &dcr_read_plb
, &dcr_write_plb
);
178 ppc_dcr_register(env
, PLB0_BEAR
, plb
, &dcr_read_plb
, &dcr_write_plb
);
179 ppc_dcr_register(env
, PLB0_BESR
, plb
, &dcr_read_plb
, &dcr_write_plb
);
180 qemu_register_reset(ppc4xx_plb_reset
, plb
);
183 /*****************************************************************************/
184 /* PLB to OPB bridge */
191 typedef struct ppc4xx_pob_t ppc4xx_pob_t
;
192 struct ppc4xx_pob_t
{
197 static uint32_t dcr_read_pob (void *opaque
, int dcrn
)
209 ret
= pob
->besr
[dcrn
- POB0_BESR0
];
212 /* Avoid gcc warning */
220 static void dcr_write_pob (void *opaque
, int dcrn
, uint32_t val
)
232 pob
->besr
[dcrn
- POB0_BESR0
] &= ~val
;
237 static void ppc4xx_pob_reset (void *opaque
)
243 pob
->bear
= 0x00000000;
244 pob
->besr
[0] = 0x0000000;
245 pob
->besr
[1] = 0x0000000;
248 static void ppc4xx_pob_init(CPUState
*env
)
252 pob
= g_malloc0(sizeof(ppc4xx_pob_t
));
253 ppc_dcr_register(env
, POB0_BEAR
, pob
, &dcr_read_pob
, &dcr_write_pob
);
254 ppc_dcr_register(env
, POB0_BESR0
, pob
, &dcr_read_pob
, &dcr_write_pob
);
255 ppc_dcr_register(env
, POB0_BESR1
, pob
, &dcr_read_pob
, &dcr_write_pob
);
256 qemu_register_reset(ppc4xx_pob_reset
, pob
);
259 /*****************************************************************************/
261 typedef struct ppc4xx_opba_t ppc4xx_opba_t
;
262 struct ppc4xx_opba_t
{
268 static uint32_t opba_readb (void *opaque
, target_phys_addr_t addr
)
274 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
292 static void opba_writeb (void *opaque
,
293 target_phys_addr_t addr
, uint32_t value
)
298 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
304 opba
->cr
= value
& 0xF8;
307 opba
->pr
= value
& 0xFF;
314 static uint32_t opba_readw (void *opaque
, target_phys_addr_t addr
)
319 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
321 ret
= opba_readb(opaque
, addr
) << 8;
322 ret
|= opba_readb(opaque
, addr
+ 1);
327 static void opba_writew (void *opaque
,
328 target_phys_addr_t addr
, uint32_t value
)
331 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
334 opba_writeb(opaque
, addr
, value
>> 8);
335 opba_writeb(opaque
, addr
+ 1, value
);
338 static uint32_t opba_readl (void *opaque
, target_phys_addr_t addr
)
343 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
345 ret
= opba_readb(opaque
, addr
) << 24;
346 ret
|= opba_readb(opaque
, addr
+ 1) << 16;
351 static void opba_writel (void *opaque
,
352 target_phys_addr_t addr
, uint32_t value
)
355 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
358 opba_writeb(opaque
, addr
, value
>> 24);
359 opba_writeb(opaque
, addr
+ 1, value
>> 16);
362 static const MemoryRegionOps opba_ops
= {
364 .read
= { opba_readb
, opba_readw
, opba_readl
, },
365 .write
= { opba_writeb
, opba_writew
, opba_writel
, },
367 .endianness
= DEVICE_NATIVE_ENDIAN
,
370 static void ppc4xx_opba_reset (void *opaque
)
375 opba
->cr
= 0x00; /* No dynamic priorities - park disabled */
379 static void ppc4xx_opba_init(target_phys_addr_t base
)
383 opba
= g_malloc0(sizeof(ppc4xx_opba_t
));
385 printf("%s: offset " TARGET_FMT_plx
"\n", __func__
, base
);
387 memory_region_init_io(&opba
->io
, &opba_ops
, opba
, "opba", 0x002);
388 memory_region_add_subregion(get_system_memory(), base
, &opba
->io
);
389 qemu_register_reset(ppc4xx_opba_reset
, opba
);
392 /*****************************************************************************/
393 /* Code decompression controller */
396 /*****************************************************************************/
397 /* Peripheral controller */
398 typedef struct ppc4xx_ebc_t ppc4xx_ebc_t
;
399 struct ppc4xx_ebc_t
{
410 EBC0_CFGADDR
= 0x012,
411 EBC0_CFGDATA
= 0x013,
414 static uint32_t dcr_read_ebc (void *opaque
, int dcrn
)
426 case 0x00: /* B0CR */
429 case 0x01: /* B1CR */
432 case 0x02: /* B2CR */
435 case 0x03: /* B3CR */
438 case 0x04: /* B4CR */
441 case 0x05: /* B5CR */
444 case 0x06: /* B6CR */
447 case 0x07: /* B7CR */
450 case 0x10: /* B0AP */
453 case 0x11: /* B1AP */
456 case 0x12: /* B2AP */
459 case 0x13: /* B3AP */
462 case 0x14: /* B4AP */
465 case 0x15: /* B5AP */
468 case 0x16: /* B6AP */
471 case 0x17: /* B7AP */
474 case 0x20: /* BEAR */
477 case 0x21: /* BESR0 */
480 case 0x22: /* BESR1 */
499 static void dcr_write_ebc (void *opaque
, int dcrn
, uint32_t val
)
510 case 0x00: /* B0CR */
512 case 0x01: /* B1CR */
514 case 0x02: /* B2CR */
516 case 0x03: /* B3CR */
518 case 0x04: /* B4CR */
520 case 0x05: /* B5CR */
522 case 0x06: /* B6CR */
524 case 0x07: /* B7CR */
526 case 0x10: /* B0AP */
528 case 0x11: /* B1AP */
530 case 0x12: /* B2AP */
532 case 0x13: /* B3AP */
534 case 0x14: /* B4AP */
536 case 0x15: /* B5AP */
538 case 0x16: /* B6AP */
540 case 0x17: /* B7AP */
542 case 0x20: /* BEAR */
544 case 0x21: /* BESR0 */
546 case 0x22: /* BESR1 */
559 static void ebc_reset (void *opaque
)
565 ebc
->addr
= 0x00000000;
566 ebc
->bap
[0] = 0x7F8FFE80;
567 ebc
->bcr
[0] = 0xFFE28000;
568 for (i
= 0; i
< 8; i
++) {
569 ebc
->bap
[i
] = 0x00000000;
570 ebc
->bcr
[i
] = 0x00000000;
572 ebc
->besr0
= 0x00000000;
573 ebc
->besr1
= 0x00000000;
574 ebc
->cfg
= 0x80400000;
577 static void ppc405_ebc_init(CPUState
*env
)
581 ebc
= g_malloc0(sizeof(ppc4xx_ebc_t
));
582 qemu_register_reset(&ebc_reset
, ebc
);
583 ppc_dcr_register(env
, EBC0_CFGADDR
,
584 ebc
, &dcr_read_ebc
, &dcr_write_ebc
);
585 ppc_dcr_register(env
, EBC0_CFGDATA
,
586 ebc
, &dcr_read_ebc
, &dcr_write_ebc
);
589 /*****************************************************************************/
618 typedef struct ppc405_dma_t ppc405_dma_t
;
619 struct ppc405_dma_t
{
632 static uint32_t dcr_read_dma (void *opaque
, int dcrn
)
637 static void dcr_write_dma (void *opaque
, int dcrn
, uint32_t val
)
641 static void ppc405_dma_reset (void *opaque
)
647 for (i
= 0; i
< 4; i
++) {
648 dma
->cr
[i
] = 0x00000000;
649 dma
->ct
[i
] = 0x00000000;
650 dma
->da
[i
] = 0x00000000;
651 dma
->sa
[i
] = 0x00000000;
652 dma
->sg
[i
] = 0x00000000;
654 dma
->sr
= 0x00000000;
655 dma
->sgc
= 0x00000000;
656 dma
->slp
= 0x7C000000;
657 dma
->pol
= 0x00000000;
660 static void ppc405_dma_init(CPUState
*env
, qemu_irq irqs
[4])
664 dma
= g_malloc0(sizeof(ppc405_dma_t
));
665 memcpy(dma
->irqs
, irqs
, 4 * sizeof(qemu_irq
));
666 qemu_register_reset(&ppc405_dma_reset
, dma
);
667 ppc_dcr_register(env
, DMA0_CR0
,
668 dma
, &dcr_read_dma
, &dcr_write_dma
);
669 ppc_dcr_register(env
, DMA0_CT0
,
670 dma
, &dcr_read_dma
, &dcr_write_dma
);
671 ppc_dcr_register(env
, DMA0_DA0
,
672 dma
, &dcr_read_dma
, &dcr_write_dma
);
673 ppc_dcr_register(env
, DMA0_SA0
,
674 dma
, &dcr_read_dma
, &dcr_write_dma
);
675 ppc_dcr_register(env
, DMA0_SG0
,
676 dma
, &dcr_read_dma
, &dcr_write_dma
);
677 ppc_dcr_register(env
, DMA0_CR1
,
678 dma
, &dcr_read_dma
, &dcr_write_dma
);
679 ppc_dcr_register(env
, DMA0_CT1
,
680 dma
, &dcr_read_dma
, &dcr_write_dma
);
681 ppc_dcr_register(env
, DMA0_DA1
,
682 dma
, &dcr_read_dma
, &dcr_write_dma
);
683 ppc_dcr_register(env
, DMA0_SA1
,
684 dma
, &dcr_read_dma
, &dcr_write_dma
);
685 ppc_dcr_register(env
, DMA0_SG1
,
686 dma
, &dcr_read_dma
, &dcr_write_dma
);
687 ppc_dcr_register(env
, DMA0_CR2
,
688 dma
, &dcr_read_dma
, &dcr_write_dma
);
689 ppc_dcr_register(env
, DMA0_CT2
,
690 dma
, &dcr_read_dma
, &dcr_write_dma
);
691 ppc_dcr_register(env
, DMA0_DA2
,
692 dma
, &dcr_read_dma
, &dcr_write_dma
);
693 ppc_dcr_register(env
, DMA0_SA2
,
694 dma
, &dcr_read_dma
, &dcr_write_dma
);
695 ppc_dcr_register(env
, DMA0_SG2
,
696 dma
, &dcr_read_dma
, &dcr_write_dma
);
697 ppc_dcr_register(env
, DMA0_CR3
,
698 dma
, &dcr_read_dma
, &dcr_write_dma
);
699 ppc_dcr_register(env
, DMA0_CT3
,
700 dma
, &dcr_read_dma
, &dcr_write_dma
);
701 ppc_dcr_register(env
, DMA0_DA3
,
702 dma
, &dcr_read_dma
, &dcr_write_dma
);
703 ppc_dcr_register(env
, DMA0_SA3
,
704 dma
, &dcr_read_dma
, &dcr_write_dma
);
705 ppc_dcr_register(env
, DMA0_SG3
,
706 dma
, &dcr_read_dma
, &dcr_write_dma
);
707 ppc_dcr_register(env
, DMA0_SR
,
708 dma
, &dcr_read_dma
, &dcr_write_dma
);
709 ppc_dcr_register(env
, DMA0_SGC
,
710 dma
, &dcr_read_dma
, &dcr_write_dma
);
711 ppc_dcr_register(env
, DMA0_SLP
,
712 dma
, &dcr_read_dma
, &dcr_write_dma
);
713 ppc_dcr_register(env
, DMA0_POL
,
714 dma
, &dcr_read_dma
, &dcr_write_dma
);
717 /*****************************************************************************/
719 typedef struct ppc405_gpio_t ppc405_gpio_t
;
720 struct ppc405_gpio_t
{
735 static uint32_t ppc405_gpio_readb (void *opaque
, target_phys_addr_t addr
)
738 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
744 static void ppc405_gpio_writeb (void *opaque
,
745 target_phys_addr_t addr
, uint32_t value
)
748 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
753 static uint32_t ppc405_gpio_readw (void *opaque
, target_phys_addr_t addr
)
756 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
762 static void ppc405_gpio_writew (void *opaque
,
763 target_phys_addr_t addr
, uint32_t value
)
766 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
771 static uint32_t ppc405_gpio_readl (void *opaque
, target_phys_addr_t addr
)
774 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
780 static void ppc405_gpio_writel (void *opaque
,
781 target_phys_addr_t addr
, uint32_t value
)
784 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
789 static const MemoryRegionOps ppc405_gpio_ops
= {
791 .read
= { ppc405_gpio_readb
, ppc405_gpio_readw
, ppc405_gpio_readl
, },
792 .write
= { ppc405_gpio_writeb
, ppc405_gpio_writew
, ppc405_gpio_writel
, },
794 .endianness
= DEVICE_NATIVE_ENDIAN
,
797 static void ppc405_gpio_reset (void *opaque
)
801 static void ppc405_gpio_init(target_phys_addr_t base
)
805 gpio
= g_malloc0(sizeof(ppc405_gpio_t
));
807 printf("%s: offset " TARGET_FMT_plx
"\n", __func__
, base
);
809 memory_region_init_io(&gpio
->io
, &ppc405_gpio_ops
, gpio
, "pgio", 0x038);
810 memory_region_add_subregion(get_system_memory(), base
, &gpio
->io
);
811 qemu_register_reset(&ppc405_gpio_reset
, gpio
);
814 /*****************************************************************************/
818 OCM0_ISACNTL
= 0x019,
820 OCM0_DSACNTL
= 0x01B,
823 typedef struct ppc405_ocm_t ppc405_ocm_t
;
824 struct ppc405_ocm_t
{
826 MemoryRegion isarc_ram
;
827 MemoryRegion dsarc_ram
;
834 static void ocm_update_mappings (ppc405_ocm_t
*ocm
,
835 uint32_t isarc
, uint32_t isacntl
,
836 uint32_t dsarc
, uint32_t dsacntl
)
839 printf("OCM update ISA %08" PRIx32
" %08" PRIx32
" (%08" PRIx32
840 " %08" PRIx32
") DSA %08" PRIx32
" %08" PRIx32
841 " (%08" PRIx32
" %08" PRIx32
")\n",
842 isarc
, isacntl
, dsarc
, dsacntl
,
843 ocm
->isarc
, ocm
->isacntl
, ocm
->dsarc
, ocm
->dsacntl
);
845 if (ocm
->isarc
!= isarc
||
846 (ocm
->isacntl
& 0x80000000) != (isacntl
& 0x80000000)) {
847 if (ocm
->isacntl
& 0x80000000) {
848 /* Unmap previously assigned memory region */
849 printf("OCM unmap ISA %08" PRIx32
"\n", ocm
->isarc
);
850 memory_region_del_subregion(get_system_memory(), &ocm
->isarc_ram
);
852 if (isacntl
& 0x80000000) {
853 /* Map new instruction memory region */
855 printf("OCM map ISA %08" PRIx32
"\n", isarc
);
857 memory_region_add_subregion(get_system_memory(), isarc
,
861 if (ocm
->dsarc
!= dsarc
||
862 (ocm
->dsacntl
& 0x80000000) != (dsacntl
& 0x80000000)) {
863 if (ocm
->dsacntl
& 0x80000000) {
864 /* Beware not to unmap the region we just mapped */
865 if (!(isacntl
& 0x80000000) || ocm
->dsarc
!= isarc
) {
866 /* Unmap previously assigned memory region */
868 printf("OCM unmap DSA %08" PRIx32
"\n", ocm
->dsarc
);
870 memory_region_del_subregion(get_system_memory(),
874 if (dsacntl
& 0x80000000) {
875 /* Beware not to remap the region we just mapped */
876 if (!(isacntl
& 0x80000000) || dsarc
!= isarc
) {
877 /* Map new data memory region */
879 printf("OCM map DSA %08" PRIx32
"\n", dsarc
);
881 memory_region_add_subregion(get_system_memory(), dsarc
,
888 static uint32_t dcr_read_ocm (void *opaque
, int dcrn
)
915 static void dcr_write_ocm (void *opaque
, int dcrn
, uint32_t val
)
918 uint32_t isarc
, dsarc
, isacntl
, dsacntl
;
923 isacntl
= ocm
->isacntl
;
924 dsacntl
= ocm
->dsacntl
;
927 isarc
= val
& 0xFC000000;
930 isacntl
= val
& 0xC0000000;
933 isarc
= val
& 0xFC000000;
936 isacntl
= val
& 0xC0000000;
939 ocm_update_mappings(ocm
, isarc
, isacntl
, dsarc
, dsacntl
);
942 ocm
->isacntl
= isacntl
;
943 ocm
->dsacntl
= dsacntl
;
946 static void ocm_reset (void *opaque
)
949 uint32_t isarc
, dsarc
, isacntl
, dsacntl
;
953 isacntl
= 0x00000000;
955 dsacntl
= 0x00000000;
956 ocm_update_mappings(ocm
, isarc
, isacntl
, dsarc
, dsacntl
);
959 ocm
->isacntl
= isacntl
;
960 ocm
->dsacntl
= dsacntl
;
963 static void ppc405_ocm_init(CPUState
*env
)
967 ocm
= g_malloc0(sizeof(ppc405_ocm_t
));
968 /* XXX: Size is 4096 or 0x04000000 */
969 memory_region_init_ram(&ocm
->isarc_ram
, NULL
, "ppc405.ocm", 4096);
970 memory_region_init_alias(&ocm
->dsarc_ram
, "ppc405.dsarc", &ocm
->isarc_ram
,
972 qemu_register_reset(&ocm_reset
, ocm
);
973 ppc_dcr_register(env
, OCM0_ISARC
,
974 ocm
, &dcr_read_ocm
, &dcr_write_ocm
);
975 ppc_dcr_register(env
, OCM0_ISACNTL
,
976 ocm
, &dcr_read_ocm
, &dcr_write_ocm
);
977 ppc_dcr_register(env
, OCM0_DSARC
,
978 ocm
, &dcr_read_ocm
, &dcr_write_ocm
);
979 ppc_dcr_register(env
, OCM0_DSACNTL
,
980 ocm
, &dcr_read_ocm
, &dcr_write_ocm
);
983 /*****************************************************************************/
985 typedef struct ppc4xx_i2c_t ppc4xx_i2c_t
;
986 struct ppc4xx_i2c_t
{
1006 static uint32_t ppc4xx_i2c_readb (void *opaque
, target_phys_addr_t addr
)
1012 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1017 // i2c_readbyte(&i2c->mdata);
1057 ret
= i2c
->xtcntlss
;
1060 ret
= i2c
->directcntl
;
1067 printf("%s: addr " TARGET_FMT_plx
" %02" PRIx32
"\n", __func__
, addr
, ret
);
1073 static void ppc4xx_i2c_writeb (void *opaque
,
1074 target_phys_addr_t addr
, uint32_t value
)
1079 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1086 // i2c_sendbyte(&i2c->mdata);
1101 i2c
->mdcntl
= value
& 0xDF;
1104 i2c
->sts
&= ~(value
& 0x0A);
1107 i2c
->extsts
&= ~(value
& 0x8F);
1116 i2c
->clkdiv
= value
;
1119 i2c
->intrmsk
= value
;
1122 i2c
->xfrcnt
= value
& 0x77;
1125 i2c
->xtcntlss
= value
;
1128 i2c
->directcntl
= value
& 0x7;
1133 static uint32_t ppc4xx_i2c_readw (void *opaque
, target_phys_addr_t addr
)
1138 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1140 ret
= ppc4xx_i2c_readb(opaque
, addr
) << 8;
1141 ret
|= ppc4xx_i2c_readb(opaque
, addr
+ 1);
1146 static void ppc4xx_i2c_writew (void *opaque
,
1147 target_phys_addr_t addr
, uint32_t value
)
1150 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1153 ppc4xx_i2c_writeb(opaque
, addr
, value
>> 8);
1154 ppc4xx_i2c_writeb(opaque
, addr
+ 1, value
);
1157 static uint32_t ppc4xx_i2c_readl (void *opaque
, target_phys_addr_t addr
)
1162 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1164 ret
= ppc4xx_i2c_readb(opaque
, addr
) << 24;
1165 ret
|= ppc4xx_i2c_readb(opaque
, addr
+ 1) << 16;
1166 ret
|= ppc4xx_i2c_readb(opaque
, addr
+ 2) << 8;
1167 ret
|= ppc4xx_i2c_readb(opaque
, addr
+ 3);
1172 static void ppc4xx_i2c_writel (void *opaque
,
1173 target_phys_addr_t addr
, uint32_t value
)
1176 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1179 ppc4xx_i2c_writeb(opaque
, addr
, value
>> 24);
1180 ppc4xx_i2c_writeb(opaque
, addr
+ 1, value
>> 16);
1181 ppc4xx_i2c_writeb(opaque
, addr
+ 2, value
>> 8);
1182 ppc4xx_i2c_writeb(opaque
, addr
+ 3, value
);
1185 static const MemoryRegionOps i2c_ops
= {
1187 .read
= { ppc4xx_i2c_readb
, ppc4xx_i2c_readw
, ppc4xx_i2c_readl
, },
1188 .write
= { ppc4xx_i2c_writeb
, ppc4xx_i2c_writew
, ppc4xx_i2c_writel
, },
1190 .endianness
= DEVICE_NATIVE_ENDIAN
,
1193 static void ppc4xx_i2c_reset (void *opaque
)
1206 i2c
->directcntl
= 0x0F;
1209 static void ppc405_i2c_init(target_phys_addr_t base
, qemu_irq irq
)
1213 i2c
= g_malloc0(sizeof(ppc4xx_i2c_t
));
1216 printf("%s: offset " TARGET_FMT_plx
"\n", __func__
, base
);
1218 memory_region_init_io(&i2c
->iomem
, &i2c_ops
, i2c
, "i2c", 0x011);
1219 memory_region_add_subregion(get_system_memory(), base
, &i2c
->iomem
);
1220 qemu_register_reset(ppc4xx_i2c_reset
, i2c
);
1223 /*****************************************************************************/
1224 /* General purpose timers */
1225 typedef struct ppc4xx_gpt_t ppc4xx_gpt_t
;
1226 struct ppc4xx_gpt_t
{
1230 struct QEMUTimer
*timer
;
1241 static uint32_t ppc4xx_gpt_readb (void *opaque
, target_phys_addr_t addr
)
1244 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1246 /* XXX: generate a bus fault */
1250 static void ppc4xx_gpt_writeb (void *opaque
,
1251 target_phys_addr_t addr
, uint32_t value
)
1254 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1257 /* XXX: generate a bus fault */
1260 static uint32_t ppc4xx_gpt_readw (void *opaque
, target_phys_addr_t addr
)
1263 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1265 /* XXX: generate a bus fault */
1269 static void ppc4xx_gpt_writew (void *opaque
,
1270 target_phys_addr_t addr
, uint32_t value
)
1273 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1276 /* XXX: generate a bus fault */
1279 static int ppc4xx_gpt_compare (ppc4xx_gpt_t
*gpt
, int n
)
1285 static void ppc4xx_gpt_set_output (ppc4xx_gpt_t
*gpt
, int n
, int level
)
1290 static void ppc4xx_gpt_set_outputs (ppc4xx_gpt_t
*gpt
)
1296 for (i
= 0; i
< 5; i
++) {
1297 if (gpt
->oe
& mask
) {
1298 /* Output is enabled */
1299 if (ppc4xx_gpt_compare(gpt
, i
)) {
1300 /* Comparison is OK */
1301 ppc4xx_gpt_set_output(gpt
, i
, gpt
->ol
& mask
);
1303 /* Comparison is KO */
1304 ppc4xx_gpt_set_output(gpt
, i
, gpt
->ol
& mask
? 0 : 1);
1311 static void ppc4xx_gpt_set_irqs (ppc4xx_gpt_t
*gpt
)
1317 for (i
= 0; i
< 5; i
++) {
1318 if (gpt
->is
& gpt
->im
& mask
)
1319 qemu_irq_raise(gpt
->irqs
[i
]);
1321 qemu_irq_lower(gpt
->irqs
[i
]);
1326 static void ppc4xx_gpt_compute_timer (ppc4xx_gpt_t
*gpt
)
1331 static uint32_t ppc4xx_gpt_readl (void *opaque
, target_phys_addr_t addr
)
1338 printf("%s: addr " TARGET_FMT_plx
"\n", __func__
, addr
);
1343 /* Time base counter */
1344 ret
= muldiv64(qemu_get_clock_ns(vm_clock
) + gpt
->tb_offset
,
1345 gpt
->tb_freq
, get_ticks_per_sec());
1356 /* Interrupt mask */
1361 /* Interrupt status */
1365 /* Interrupt enable */
1370 idx
= (addr
- 0x80) >> 2;
1371 ret
= gpt
->comp
[idx
];
1375 idx
= (addr
- 0xC0) >> 2;
1376 ret
= gpt
->mask
[idx
];
1386 static void ppc4xx_gpt_writel (void *opaque
,
1387 target_phys_addr_t addr
, uint32_t value
)
1393 printf("%s: addr " TARGET_FMT_plx
" val %08" PRIx32
"\n", __func__
, addr
,
1399 /* Time base counter */
1400 gpt
->tb_offset
= muldiv64(value
, get_ticks_per_sec(), gpt
->tb_freq
)
1401 - qemu_get_clock_ns(vm_clock
);
1402 ppc4xx_gpt_compute_timer(gpt
);
1406 gpt
->oe
= value
& 0xF8000000;
1407 ppc4xx_gpt_set_outputs(gpt
);
1411 gpt
->ol
= value
& 0xF8000000;
1412 ppc4xx_gpt_set_outputs(gpt
);
1415 /* Interrupt mask */
1416 gpt
->im
= value
& 0x0000F800;
1419 /* Interrupt status set */
1420 gpt
->is
|= value
& 0x0000F800;
1421 ppc4xx_gpt_set_irqs(gpt
);
1424 /* Interrupt status clear */
1425 gpt
->is
&= ~(value
& 0x0000F800);
1426 ppc4xx_gpt_set_irqs(gpt
);
1429 /* Interrupt enable */
1430 gpt
->ie
= value
& 0x0000F800;
1431 ppc4xx_gpt_set_irqs(gpt
);
1435 idx
= (addr
- 0x80) >> 2;
1436 gpt
->comp
[idx
] = value
& 0xF8000000;
1437 ppc4xx_gpt_compute_timer(gpt
);
1441 idx
= (addr
- 0xC0) >> 2;
1442 gpt
->mask
[idx
] = value
& 0xF8000000;
1443 ppc4xx_gpt_compute_timer(gpt
);
1448 static const MemoryRegionOps gpt_ops
= {
1450 .read
= { ppc4xx_gpt_readb
, ppc4xx_gpt_readw
, ppc4xx_gpt_readl
, },
1451 .write
= { ppc4xx_gpt_writeb
, ppc4xx_gpt_writew
, ppc4xx_gpt_writel
, },
1453 .endianness
= DEVICE_NATIVE_ENDIAN
,
1456 static void ppc4xx_gpt_cb (void *opaque
)
1461 ppc4xx_gpt_set_irqs(gpt
);
1462 ppc4xx_gpt_set_outputs(gpt
);
1463 ppc4xx_gpt_compute_timer(gpt
);
1466 static void ppc4xx_gpt_reset (void *opaque
)
1472 qemu_del_timer(gpt
->timer
);
1473 gpt
->oe
= 0x00000000;
1474 gpt
->ol
= 0x00000000;
1475 gpt
->im
= 0x00000000;
1476 gpt
->is
= 0x00000000;
1477 gpt
->ie
= 0x00000000;
1478 for (i
= 0; i
< 5; i
++) {
1479 gpt
->comp
[i
] = 0x00000000;
1480 gpt
->mask
[i
] = 0x00000000;
1484 static void ppc4xx_gpt_init(target_phys_addr_t base
, qemu_irq irqs
[5])
1489 gpt
= g_malloc0(sizeof(ppc4xx_gpt_t
));
1490 for (i
= 0; i
< 5; i
++) {
1491 gpt
->irqs
[i
] = irqs
[i
];
1493 gpt
->timer
= qemu_new_timer_ns(vm_clock
, &ppc4xx_gpt_cb
, gpt
);
1495 printf("%s: offset " TARGET_FMT_plx
"\n", __func__
, base
);
1497 memory_region_init_io(&gpt
->iomem
, &gpt_ops
, gpt
, "gpt", 0x0d4);
1498 memory_region_add_subregion(get_system_memory(), base
, &gpt
->iomem
);
1499 qemu_register_reset(ppc4xx_gpt_reset
, gpt
);
1502 /*****************************************************************************/
1508 MAL0_TXCASR
= 0x184,
1509 MAL0_TXCARR
= 0x185,
1510 MAL0_TXEOBISR
= 0x186,
1511 MAL0_TXDEIR
= 0x187,
1512 MAL0_RXCASR
= 0x190,
1513 MAL0_RXCARR
= 0x191,
1514 MAL0_RXEOBISR
= 0x192,
1515 MAL0_RXDEIR
= 0x193,
1516 MAL0_TXCTP0R
= 0x1A0,
1517 MAL0_TXCTP1R
= 0x1A1,
1518 MAL0_TXCTP2R
= 0x1A2,
1519 MAL0_TXCTP3R
= 0x1A3,
1520 MAL0_RXCTP0R
= 0x1C0,
1521 MAL0_RXCTP1R
= 0x1C1,
1526 typedef struct ppc40x_mal_t ppc40x_mal_t
;
1527 struct ppc40x_mal_t
{
1545 static void ppc40x_mal_reset (void *opaque
);
1547 static uint32_t dcr_read_mal (void *opaque
, int dcrn
)
1570 ret
= mal
->txeobisr
;
1582 ret
= mal
->rxeobisr
;
1588 ret
= mal
->txctpr
[0];
1591 ret
= mal
->txctpr
[1];
1594 ret
= mal
->txctpr
[2];
1597 ret
= mal
->txctpr
[3];
1600 ret
= mal
->rxctpr
[0];
1603 ret
= mal
->rxctpr
[1];
1619 static void dcr_write_mal (void *opaque
, int dcrn
, uint32_t val
)
1627 if (val
& 0x80000000)
1628 ppc40x_mal_reset(mal
);
1629 mal
->cfg
= val
& 0x00FFC087;
1636 mal
->ier
= val
& 0x0000001F;
1639 mal
->txcasr
= val
& 0xF0000000;
1642 mal
->txcarr
= val
& 0xF0000000;
1646 mal
->txeobisr
&= ~val
;
1650 mal
->txdeir
&= ~val
;
1653 mal
->rxcasr
= val
& 0xC0000000;
1656 mal
->rxcarr
= val
& 0xC0000000;
1660 mal
->rxeobisr
&= ~val
;
1664 mal
->rxdeir
&= ~val
;
1678 mal
->txctpr
[idx
] = val
;
1686 mal
->rxctpr
[idx
] = val
;
1690 goto update_rx_size
;
1694 mal
->rcbs
[idx
] = val
& 0x000000FF;
1699 static void ppc40x_mal_reset (void *opaque
)
1704 mal
->cfg
= 0x0007C000;
1705 mal
->esr
= 0x00000000;
1706 mal
->ier
= 0x00000000;
1707 mal
->rxcasr
= 0x00000000;
1708 mal
->rxdeir
= 0x00000000;
1709 mal
->rxeobisr
= 0x00000000;
1710 mal
->txcasr
= 0x00000000;
1711 mal
->txdeir
= 0x00000000;
1712 mal
->txeobisr
= 0x00000000;
1715 static void ppc405_mal_init(CPUState
*env
, qemu_irq irqs
[4])
1720 mal
= g_malloc0(sizeof(ppc40x_mal_t
));
1721 for (i
= 0; i
< 4; i
++)
1722 mal
->irqs
[i
] = irqs
[i
];
1723 qemu_register_reset(&ppc40x_mal_reset
, mal
);
1724 ppc_dcr_register(env
, MAL0_CFG
,
1725 mal
, &dcr_read_mal
, &dcr_write_mal
);
1726 ppc_dcr_register(env
, MAL0_ESR
,
1727 mal
, &dcr_read_mal
, &dcr_write_mal
);
1728 ppc_dcr_register(env
, MAL0_IER
,
1729 mal
, &dcr_read_mal
, &dcr_write_mal
);
1730 ppc_dcr_register(env
, MAL0_TXCASR
,
1731 mal
, &dcr_read_mal
, &dcr_write_mal
);
1732 ppc_dcr_register(env
, MAL0_TXCARR
,
1733 mal
, &dcr_read_mal
, &dcr_write_mal
);
1734 ppc_dcr_register(env
, MAL0_TXEOBISR
,
1735 mal
, &dcr_read_mal
, &dcr_write_mal
);
1736 ppc_dcr_register(env
, MAL0_TXDEIR
,
1737 mal
, &dcr_read_mal
, &dcr_write_mal
);
1738 ppc_dcr_register(env
, MAL0_RXCASR
,
1739 mal
, &dcr_read_mal
, &dcr_write_mal
);
1740 ppc_dcr_register(env
, MAL0_RXCARR
,
1741 mal
, &dcr_read_mal
, &dcr_write_mal
);
1742 ppc_dcr_register(env
, MAL0_RXEOBISR
,
1743 mal
, &dcr_read_mal
, &dcr_write_mal
);
1744 ppc_dcr_register(env
, MAL0_RXDEIR
,
1745 mal
, &dcr_read_mal
, &dcr_write_mal
);
1746 ppc_dcr_register(env
, MAL0_TXCTP0R
,
1747 mal
, &dcr_read_mal
, &dcr_write_mal
);
1748 ppc_dcr_register(env
, MAL0_TXCTP1R
,
1749 mal
, &dcr_read_mal
, &dcr_write_mal
);
1750 ppc_dcr_register(env
, MAL0_TXCTP2R
,
1751 mal
, &dcr_read_mal
, &dcr_write_mal
);
1752 ppc_dcr_register(env
, MAL0_TXCTP3R
,
1753 mal
, &dcr_read_mal
, &dcr_write_mal
);
1754 ppc_dcr_register(env
, MAL0_RXCTP0R
,
1755 mal
, &dcr_read_mal
, &dcr_write_mal
);
1756 ppc_dcr_register(env
, MAL0_RXCTP1R
,
1757 mal
, &dcr_read_mal
, &dcr_write_mal
);
1758 ppc_dcr_register(env
, MAL0_RCBS0
,
1759 mal
, &dcr_read_mal
, &dcr_write_mal
);
1760 ppc_dcr_register(env
, MAL0_RCBS1
,
1761 mal
, &dcr_read_mal
, &dcr_write_mal
);
1764 /*****************************************************************************/
1766 void ppc40x_core_reset (CPUState
*env
)
1770 printf("Reset PowerPC core\n");
1771 env
->interrupt_request
|= CPU_INTERRUPT_EXITTB
;
1776 qemu_system_reset_request();
1778 dbsr
= env
->spr
[SPR_40x_DBSR
];
1779 dbsr
&= ~0x00000300;
1781 env
->spr
[SPR_40x_DBSR
] = dbsr
;
1784 void ppc40x_chip_reset (CPUState
*env
)
1788 printf("Reset PowerPC chip\n");
1789 env
->interrupt_request
|= CPU_INTERRUPT_EXITTB
;
1794 qemu_system_reset_request();
1796 /* XXX: TODO reset all internal peripherals */
1797 dbsr
= env
->spr
[SPR_40x_DBSR
];
1798 dbsr
&= ~0x00000300;
1800 env
->spr
[SPR_40x_DBSR
] = dbsr
;
1803 void ppc40x_system_reset (CPUState
*env
)
1805 printf("Reset PowerPC system\n");
1806 qemu_system_reset_request();
1809 void store_40x_dbcr0 (CPUState
*env
, uint32_t val
)
1811 switch ((val
>> 28) & 0x3) {
1817 ppc40x_core_reset(env
);
1821 ppc40x_chip_reset(env
);
1825 ppc40x_system_reset(env
);
1830 /*****************************************************************************/
1833 PPC405CR_CPC0_PLLMR
= 0x0B0,
1834 PPC405CR_CPC0_CR0
= 0x0B1,
1835 PPC405CR_CPC0_CR1
= 0x0B2,
1836 PPC405CR_CPC0_PSR
= 0x0B4,
1837 PPC405CR_CPC0_JTAGID
= 0x0B5,
1838 PPC405CR_CPC0_ER
= 0x0B9,
1839 PPC405CR_CPC0_FR
= 0x0BA,
1840 PPC405CR_CPC0_SR
= 0x0BB,
1844 PPC405CR_CPU_CLK
= 0,
1845 PPC405CR_TMR_CLK
= 1,
1846 PPC405CR_PLB_CLK
= 2,
1847 PPC405CR_SDRAM_CLK
= 3,
1848 PPC405CR_OPB_CLK
= 4,
1849 PPC405CR_EXT_CLK
= 5,
1850 PPC405CR_UART_CLK
= 6,
1851 PPC405CR_CLK_NB
= 7,
1854 typedef struct ppc405cr_cpc_t ppc405cr_cpc_t
;
1855 struct ppc405cr_cpc_t
{
1856 clk_setup_t clk_setup
[PPC405CR_CLK_NB
];
1867 static void ppc405cr_clk_setup (ppc405cr_cpc_t
*cpc
)
1869 uint64_t VCO_out
, PLL_out
;
1870 uint32_t CPU_clk
, TMR_clk
, SDRAM_clk
, PLB_clk
, OPB_clk
, EXT_clk
, UART_clk
;
1873 D0
= ((cpc
->pllmr
>> 26) & 0x3) + 1; /* CBDV */
1874 if (cpc
->pllmr
& 0x80000000) {
1875 D1
= (((cpc
->pllmr
>> 20) - 1) & 0xF) + 1; /* FBDV */
1876 D2
= 8 - ((cpc
->pllmr
>> 16) & 0x7); /* FWDVA */
1878 VCO_out
= cpc
->sysclk
* M
;
1879 if (VCO_out
< 400000000 || VCO_out
> 800000000) {
1880 /* PLL cannot lock */
1881 cpc
->pllmr
&= ~0x80000000;
1884 PLL_out
= VCO_out
/ D2
;
1889 PLL_out
= cpc
->sysclk
* M
;
1892 if (cpc
->cr1
& 0x00800000)
1893 TMR_clk
= cpc
->sysclk
; /* Should have a separate clock */
1896 PLB_clk
= CPU_clk
/ D0
;
1897 SDRAM_clk
= PLB_clk
;
1898 D0
= ((cpc
->pllmr
>> 10) & 0x3) + 1;
1899 OPB_clk
= PLB_clk
/ D0
;
1900 D0
= ((cpc
->pllmr
>> 24) & 0x3) + 2;
1901 EXT_clk
= PLB_clk
/ D0
;
1902 D0
= ((cpc
->cr0
>> 1) & 0x1F) + 1;
1903 UART_clk
= CPU_clk
/ D0
;
1904 /* Setup CPU clocks */
1905 clk_setup(&cpc
->clk_setup
[PPC405CR_CPU_CLK
], CPU_clk
);
1906 /* Setup time-base clock */
1907 clk_setup(&cpc
->clk_setup
[PPC405CR_TMR_CLK
], TMR_clk
);
1908 /* Setup PLB clock */
1909 clk_setup(&cpc
->clk_setup
[PPC405CR_PLB_CLK
], PLB_clk
);
1910 /* Setup SDRAM clock */
1911 clk_setup(&cpc
->clk_setup
[PPC405CR_SDRAM_CLK
], SDRAM_clk
);
1912 /* Setup OPB clock */
1913 clk_setup(&cpc
->clk_setup
[PPC405CR_OPB_CLK
], OPB_clk
);
1914 /* Setup external clock */
1915 clk_setup(&cpc
->clk_setup
[PPC405CR_EXT_CLK
], EXT_clk
);
1916 /* Setup UART clock */
1917 clk_setup(&cpc
->clk_setup
[PPC405CR_UART_CLK
], UART_clk
);
1920 static uint32_t dcr_read_crcpc (void *opaque
, int dcrn
)
1922 ppc405cr_cpc_t
*cpc
;
1927 case PPC405CR_CPC0_PLLMR
:
1930 case PPC405CR_CPC0_CR0
:
1933 case PPC405CR_CPC0_CR1
:
1936 case PPC405CR_CPC0_PSR
:
1939 case PPC405CR_CPC0_JTAGID
:
1942 case PPC405CR_CPC0_ER
:
1945 case PPC405CR_CPC0_FR
:
1948 case PPC405CR_CPC0_SR
:
1949 ret
= ~(cpc
->er
| cpc
->fr
) & 0xFFFF0000;
1952 /* Avoid gcc warning */
1960 static void dcr_write_crcpc (void *opaque
, int dcrn
, uint32_t val
)
1962 ppc405cr_cpc_t
*cpc
;
1966 case PPC405CR_CPC0_PLLMR
:
1967 cpc
->pllmr
= val
& 0xFFF77C3F;
1969 case PPC405CR_CPC0_CR0
:
1970 cpc
->cr0
= val
& 0x0FFFFFFE;
1972 case PPC405CR_CPC0_CR1
:
1973 cpc
->cr1
= val
& 0x00800000;
1975 case PPC405CR_CPC0_PSR
:
1978 case PPC405CR_CPC0_JTAGID
:
1981 case PPC405CR_CPC0_ER
:
1982 cpc
->er
= val
& 0xBFFC0000;
1984 case PPC405CR_CPC0_FR
:
1985 cpc
->fr
= val
& 0xBFFC0000;
1987 case PPC405CR_CPC0_SR
:
1993 static void ppc405cr_cpc_reset (void *opaque
)
1995 ppc405cr_cpc_t
*cpc
;
1999 /* Compute PLLMR value from PSR settings */
2000 cpc
->pllmr
= 0x80000000;
2002 switch ((cpc
->psr
>> 30) & 3) {
2005 cpc
->pllmr
&= ~0x80000000;
2009 cpc
->pllmr
|= 5 << 16;
2013 cpc
->pllmr
|= 4 << 16;
2017 cpc
->pllmr
|= 2 << 16;
2021 D
= (cpc
->psr
>> 28) & 3;
2022 cpc
->pllmr
|= (D
+ 1) << 20;
2024 D
= (cpc
->psr
>> 25) & 7;
2039 D
= (cpc
->psr
>> 23) & 3;
2040 cpc
->pllmr
|= D
<< 26;
2042 D
= (cpc
->psr
>> 21) & 3;
2043 cpc
->pllmr
|= D
<< 10;
2045 D
= (cpc
->psr
>> 17) & 3;
2046 cpc
->pllmr
|= D
<< 24;
2047 cpc
->cr0
= 0x0000003C;
2048 cpc
->cr1
= 0x2B0D8800;
2049 cpc
->er
= 0x00000000;
2050 cpc
->fr
= 0x00000000;
2051 ppc405cr_clk_setup(cpc
);
2054 static void ppc405cr_clk_init (ppc405cr_cpc_t
*cpc
)
2058 /* XXX: this should be read from IO pins */
2059 cpc
->psr
= 0x00000000; /* 8 bits ROM */
2061 D
= 0x2; /* Divide by 4 */
2062 cpc
->psr
|= D
<< 30;
2064 D
= 0x1; /* Divide by 2 */
2065 cpc
->psr
|= D
<< 28;
2067 D
= 0x1; /* Divide by 2 */
2068 cpc
->psr
|= D
<< 23;
2070 D
= 0x5; /* M = 16 */
2071 cpc
->psr
|= D
<< 25;
2073 D
= 0x1; /* Divide by 2 */
2074 cpc
->psr
|= D
<< 21;
2076 D
= 0x2; /* Divide by 4 */
2077 cpc
->psr
|= D
<< 17;
2080 static void ppc405cr_cpc_init (CPUState
*env
, clk_setup_t clk_setup
[7],
2083 ppc405cr_cpc_t
*cpc
;
2085 cpc
= g_malloc0(sizeof(ppc405cr_cpc_t
));
2086 memcpy(cpc
->clk_setup
, clk_setup
,
2087 PPC405CR_CLK_NB
* sizeof(clk_setup_t
));
2088 cpc
->sysclk
= sysclk
;
2089 cpc
->jtagid
= 0x42051049;
2090 ppc_dcr_register(env
, PPC405CR_CPC0_PSR
, cpc
,
2091 &dcr_read_crcpc
, &dcr_write_crcpc
);
2092 ppc_dcr_register(env
, PPC405CR_CPC0_CR0
, cpc
,
2093 &dcr_read_crcpc
, &dcr_write_crcpc
);
2094 ppc_dcr_register(env
, PPC405CR_CPC0_CR1
, cpc
,
2095 &dcr_read_crcpc
, &dcr_write_crcpc
);
2096 ppc_dcr_register(env
, PPC405CR_CPC0_JTAGID
, cpc
,
2097 &dcr_read_crcpc
, &dcr_write_crcpc
);
2098 ppc_dcr_register(env
, PPC405CR_CPC0_PLLMR
, cpc
,
2099 &dcr_read_crcpc
, &dcr_write_crcpc
);
2100 ppc_dcr_register(env
, PPC405CR_CPC0_ER
, cpc
,
2101 &dcr_read_crcpc
, &dcr_write_crcpc
);
2102 ppc_dcr_register(env
, PPC405CR_CPC0_FR
, cpc
,
2103 &dcr_read_crcpc
, &dcr_write_crcpc
);
2104 ppc_dcr_register(env
, PPC405CR_CPC0_SR
, cpc
,
2105 &dcr_read_crcpc
, &dcr_write_crcpc
);
2106 ppc405cr_clk_init(cpc
);
2107 qemu_register_reset(ppc405cr_cpc_reset
, cpc
);
2110 CPUState
*ppc405cr_init(MemoryRegion
*address_space_mem
,
2111 MemoryRegion ram_memories
[4],
2112 target_phys_addr_t ram_bases
[4],
2113 target_phys_addr_t ram_sizes
[4],
2114 uint32_t sysclk
, qemu_irq
**picp
,
2117 clk_setup_t clk_setup
[PPC405CR_CLK_NB
];
2118 qemu_irq dma_irqs
[4];
2120 qemu_irq
*pic
, *irqs
;
2122 memset(clk_setup
, 0, sizeof(clk_setup
));
2123 env
= ppc4xx_init("405cr", &clk_setup
[PPC405CR_CPU_CLK
],
2124 &clk_setup
[PPC405CR_TMR_CLK
], sysclk
);
2125 /* Memory mapped devices registers */
2127 ppc4xx_plb_init(env
);
2128 /* PLB to OPB bridge */
2129 ppc4xx_pob_init(env
);
2131 ppc4xx_opba_init(0xef600600);
2132 /* Universal interrupt controller */
2133 irqs
= g_malloc0(sizeof(qemu_irq
) * PPCUIC_OUTPUT_NB
);
2134 irqs
[PPCUIC_OUTPUT_INT
] =
2135 ((qemu_irq
*)env
->irq_inputs
)[PPC40x_INPUT_INT
];
2136 irqs
[PPCUIC_OUTPUT_CINT
] =
2137 ((qemu_irq
*)env
->irq_inputs
)[PPC40x_INPUT_CINT
];
2138 pic
= ppcuic_init(env
, irqs
, 0x0C0, 0, 1);
2140 /* SDRAM controller */
2141 ppc4xx_sdram_init(env
, pic
[14], 1, ram_memories
,
2142 ram_bases
, ram_sizes
, do_init
);
2143 /* External bus controller */
2144 ppc405_ebc_init(env
);
2145 /* DMA controller */
2146 dma_irqs
[0] = pic
[26];
2147 dma_irqs
[1] = pic
[25];
2148 dma_irqs
[2] = pic
[24];
2149 dma_irqs
[3] = pic
[23];
2150 ppc405_dma_init(env
, dma_irqs
);
2152 if (serial_hds
[0] != NULL
) {
2153 serial_mm_init(address_space_mem
, 0xef600300, 0, pic
[0],
2154 PPC_SERIAL_MM_BAUDBASE
, serial_hds
[0],
2157 if (serial_hds
[1] != NULL
) {
2158 serial_mm_init(address_space_mem
, 0xef600400, 0, pic
[1],
2159 PPC_SERIAL_MM_BAUDBASE
, serial_hds
[1],
2162 /* IIC controller */
2163 ppc405_i2c_init(0xef600500, pic
[2]);
2165 ppc405_gpio_init(0xef600700);
2167 ppc405cr_cpc_init(env
, clk_setup
, sysclk
);
2172 /*****************************************************************************/
2176 PPC405EP_CPC0_PLLMR0
= 0x0F0,
2177 PPC405EP_CPC0_BOOT
= 0x0F1,
2178 PPC405EP_CPC0_EPCTL
= 0x0F3,
2179 PPC405EP_CPC0_PLLMR1
= 0x0F4,
2180 PPC405EP_CPC0_UCR
= 0x0F5,
2181 PPC405EP_CPC0_SRR
= 0x0F6,
2182 PPC405EP_CPC0_JTAGID
= 0x0F7,
2183 PPC405EP_CPC0_PCI
= 0x0F9,
2185 PPC405EP_CPC0_ER
= xxx
,
2186 PPC405EP_CPC0_FR
= xxx
,
2187 PPC405EP_CPC0_SR
= xxx
,
2192 PPC405EP_CPU_CLK
= 0,
2193 PPC405EP_PLB_CLK
= 1,
2194 PPC405EP_OPB_CLK
= 2,
2195 PPC405EP_EBC_CLK
= 3,
2196 PPC405EP_MAL_CLK
= 4,
2197 PPC405EP_PCI_CLK
= 5,
2198 PPC405EP_UART0_CLK
= 6,
2199 PPC405EP_UART1_CLK
= 7,
2200 PPC405EP_CLK_NB
= 8,
2203 typedef struct ppc405ep_cpc_t ppc405ep_cpc_t
;
2204 struct ppc405ep_cpc_t
{
2206 clk_setup_t clk_setup
[PPC405EP_CLK_NB
];
2214 /* Clock and power management */
2220 static void ppc405ep_compute_clocks (ppc405ep_cpc_t
*cpc
)
2222 uint32_t CPU_clk
, PLB_clk
, OPB_clk
, EBC_clk
, MAL_clk
, PCI_clk
;
2223 uint32_t UART0_clk
, UART1_clk
;
2224 uint64_t VCO_out
, PLL_out
;
2228 if ((cpc
->pllmr
[1] & 0x80000000) && !(cpc
->pllmr
[1] & 0x40000000)) {
2229 M
= (((cpc
->pllmr
[1] >> 20) - 1) & 0xF) + 1; /* FBMUL */
2230 #ifdef DEBUG_CLOCKS_LL
2231 printf("FBMUL %01" PRIx32
" %d\n", (cpc
->pllmr
[1] >> 20) & 0xF, M
);
2233 D
= 8 - ((cpc
->pllmr
[1] >> 16) & 0x7); /* FWDA */
2234 #ifdef DEBUG_CLOCKS_LL
2235 printf("FWDA %01" PRIx32
" %d\n", (cpc
->pllmr
[1] >> 16) & 0x7, D
);
2237 VCO_out
= cpc
->sysclk
* M
* D
;
2238 if (VCO_out
< 500000000UL || VCO_out
> 1000000000UL) {
2239 /* Error - unlock the PLL */
2240 printf("VCO out of range %" PRIu64
"\n", VCO_out
);
2242 cpc
->pllmr
[1] &= ~0x80000000;
2246 PLL_out
= VCO_out
/ D
;
2247 /* Pretend the PLL is locked */
2248 cpc
->boot
|= 0x00000001;
2253 PLL_out
= cpc
->sysclk
;
2254 if (cpc
->pllmr
[1] & 0x40000000) {
2255 /* Pretend the PLL is not locked */
2256 cpc
->boot
&= ~0x00000001;
2259 /* Now, compute all other clocks */
2260 D
= ((cpc
->pllmr
[0] >> 20) & 0x3) + 1; /* CCDV */
2261 #ifdef DEBUG_CLOCKS_LL
2262 printf("CCDV %01" PRIx32
" %d\n", (cpc
->pllmr
[0] >> 20) & 0x3, D
);
2264 CPU_clk
= PLL_out
/ D
;
2265 D
= ((cpc
->pllmr
[0] >> 16) & 0x3) + 1; /* CBDV */
2266 #ifdef DEBUG_CLOCKS_LL
2267 printf("CBDV %01" PRIx32
" %d\n", (cpc
->pllmr
[0] >> 16) & 0x3, D
);
2269 PLB_clk
= CPU_clk
/ D
;
2270 D
= ((cpc
->pllmr
[0] >> 12) & 0x3) + 1; /* OPDV */
2271 #ifdef DEBUG_CLOCKS_LL
2272 printf("OPDV %01" PRIx32
" %d\n", (cpc
->pllmr
[0] >> 12) & 0x3, D
);
2274 OPB_clk
= PLB_clk
/ D
;
2275 D
= ((cpc
->pllmr
[0] >> 8) & 0x3) + 2; /* EPDV */
2276 #ifdef DEBUG_CLOCKS_LL
2277 printf("EPDV %01" PRIx32
" %d\n", (cpc
->pllmr
[0] >> 8) & 0x3, D
);
2279 EBC_clk
= PLB_clk
/ D
;
2280 D
= ((cpc
->pllmr
[0] >> 4) & 0x3) + 1; /* MPDV */
2281 #ifdef DEBUG_CLOCKS_LL
2282 printf("MPDV %01" PRIx32
" %d\n", (cpc
->pllmr
[0] >> 4) & 0x3, D
);
2284 MAL_clk
= PLB_clk
/ D
;
2285 D
= (cpc
->pllmr
[0] & 0x3) + 1; /* PPDV */
2286 #ifdef DEBUG_CLOCKS_LL
2287 printf("PPDV %01" PRIx32
" %d\n", cpc
->pllmr
[0] & 0x3, D
);
2289 PCI_clk
= PLB_clk
/ D
;
2290 D
= ((cpc
->ucr
- 1) & 0x7F) + 1; /* U0DIV */
2291 #ifdef DEBUG_CLOCKS_LL
2292 printf("U0DIV %01" PRIx32
" %d\n", cpc
->ucr
& 0x7F, D
);
2294 UART0_clk
= PLL_out
/ D
;
2295 D
= (((cpc
->ucr
>> 8) - 1) & 0x7F) + 1; /* U1DIV */
2296 #ifdef DEBUG_CLOCKS_LL
2297 printf("U1DIV %01" PRIx32
" %d\n", (cpc
->ucr
>> 8) & 0x7F, D
);
2299 UART1_clk
= PLL_out
/ D
;
2301 printf("Setup PPC405EP clocks - sysclk %" PRIu32
" VCO %" PRIu64
2302 " PLL out %" PRIu64
" Hz\n", cpc
->sysclk
, VCO_out
, PLL_out
);
2303 printf("CPU %" PRIu32
" PLB %" PRIu32
" OPB %" PRIu32
" EBC %" PRIu32
2304 " MAL %" PRIu32
" PCI %" PRIu32
" UART0 %" PRIu32
2305 " UART1 %" PRIu32
"\n",
2306 CPU_clk
, PLB_clk
, OPB_clk
, EBC_clk
, MAL_clk
, PCI_clk
,
2307 UART0_clk
, UART1_clk
);
2309 /* Setup CPU clocks */
2310 clk_setup(&cpc
->clk_setup
[PPC405EP_CPU_CLK
], CPU_clk
);
2311 /* Setup PLB clock */
2312 clk_setup(&cpc
->clk_setup
[PPC405EP_PLB_CLK
], PLB_clk
);
2313 /* Setup OPB clock */
2314 clk_setup(&cpc
->clk_setup
[PPC405EP_OPB_CLK
], OPB_clk
);
2315 /* Setup external clock */
2316 clk_setup(&cpc
->clk_setup
[PPC405EP_EBC_CLK
], EBC_clk
);
2317 /* Setup MAL clock */
2318 clk_setup(&cpc
->clk_setup
[PPC405EP_MAL_CLK
], MAL_clk
);
2319 /* Setup PCI clock */
2320 clk_setup(&cpc
->clk_setup
[PPC405EP_PCI_CLK
], PCI_clk
);
2321 /* Setup UART0 clock */
2322 clk_setup(&cpc
->clk_setup
[PPC405EP_UART0_CLK
], UART0_clk
);
2323 /* Setup UART1 clock */
2324 clk_setup(&cpc
->clk_setup
[PPC405EP_UART1_CLK
], UART1_clk
);
2327 static uint32_t dcr_read_epcpc (void *opaque
, int dcrn
)
2329 ppc405ep_cpc_t
*cpc
;
2334 case PPC405EP_CPC0_BOOT
:
2337 case PPC405EP_CPC0_EPCTL
:
2340 case PPC405EP_CPC0_PLLMR0
:
2341 ret
= cpc
->pllmr
[0];
2343 case PPC405EP_CPC0_PLLMR1
:
2344 ret
= cpc
->pllmr
[1];
2346 case PPC405EP_CPC0_UCR
:
2349 case PPC405EP_CPC0_SRR
:
2352 case PPC405EP_CPC0_JTAGID
:
2355 case PPC405EP_CPC0_PCI
:
2359 /* Avoid gcc warning */
2367 static void dcr_write_epcpc (void *opaque
, int dcrn
, uint32_t val
)
2369 ppc405ep_cpc_t
*cpc
;
2373 case PPC405EP_CPC0_BOOT
:
2374 /* Read-only register */
2376 case PPC405EP_CPC0_EPCTL
:
2377 /* Don't care for now */
2378 cpc
->epctl
= val
& 0xC00000F3;
2380 case PPC405EP_CPC0_PLLMR0
:
2381 cpc
->pllmr
[0] = val
& 0x00633333;
2382 ppc405ep_compute_clocks(cpc
);
2384 case PPC405EP_CPC0_PLLMR1
:
2385 cpc
->pllmr
[1] = val
& 0xC0F73FFF;
2386 ppc405ep_compute_clocks(cpc
);
2388 case PPC405EP_CPC0_UCR
:
2389 /* UART control - don't care for now */
2390 cpc
->ucr
= val
& 0x003F7F7F;
2392 case PPC405EP_CPC0_SRR
:
2395 case PPC405EP_CPC0_JTAGID
:
2398 case PPC405EP_CPC0_PCI
:
2404 static void ppc405ep_cpc_reset (void *opaque
)
2406 ppc405ep_cpc_t
*cpc
= opaque
;
2408 cpc
->boot
= 0x00000010; /* Boot from PCI - IIC EEPROM disabled */
2409 cpc
->epctl
= 0x00000000;
2410 cpc
->pllmr
[0] = 0x00011010;
2411 cpc
->pllmr
[1] = 0x40000000;
2412 cpc
->ucr
= 0x00000000;
2413 cpc
->srr
= 0x00040000;
2414 cpc
->pci
= 0x00000000;
2415 cpc
->er
= 0x00000000;
2416 cpc
->fr
= 0x00000000;
2417 cpc
->sr
= 0x00000000;
2418 ppc405ep_compute_clocks(cpc
);
2421 /* XXX: sysclk should be between 25 and 100 MHz */
2422 static void ppc405ep_cpc_init (CPUState
*env
, clk_setup_t clk_setup
[8],
2425 ppc405ep_cpc_t
*cpc
;
2427 cpc
= g_malloc0(sizeof(ppc405ep_cpc_t
));
2428 memcpy(cpc
->clk_setup
, clk_setup
,
2429 PPC405EP_CLK_NB
* sizeof(clk_setup_t
));
2430 cpc
->jtagid
= 0x20267049;
2431 cpc
->sysclk
= sysclk
;
2432 qemu_register_reset(&ppc405ep_cpc_reset
, cpc
);
2433 ppc_dcr_register(env
, PPC405EP_CPC0_BOOT
, cpc
,
2434 &dcr_read_epcpc
, &dcr_write_epcpc
);
2435 ppc_dcr_register(env
, PPC405EP_CPC0_EPCTL
, cpc
,
2436 &dcr_read_epcpc
, &dcr_write_epcpc
);
2437 ppc_dcr_register(env
, PPC405EP_CPC0_PLLMR0
, cpc
,
2438 &dcr_read_epcpc
, &dcr_write_epcpc
);
2439 ppc_dcr_register(env
, PPC405EP_CPC0_PLLMR1
, cpc
,
2440 &dcr_read_epcpc
, &dcr_write_epcpc
);
2441 ppc_dcr_register(env
, PPC405EP_CPC0_UCR
, cpc
,
2442 &dcr_read_epcpc
, &dcr_write_epcpc
);
2443 ppc_dcr_register(env
, PPC405EP_CPC0_SRR
, cpc
,
2444 &dcr_read_epcpc
, &dcr_write_epcpc
);
2445 ppc_dcr_register(env
, PPC405EP_CPC0_JTAGID
, cpc
,
2446 &dcr_read_epcpc
, &dcr_write_epcpc
);
2447 ppc_dcr_register(env
, PPC405EP_CPC0_PCI
, cpc
,
2448 &dcr_read_epcpc
, &dcr_write_epcpc
);
2450 ppc_dcr_register(env
, PPC405EP_CPC0_ER
, cpc
,
2451 &dcr_read_epcpc
, &dcr_write_epcpc
);
2452 ppc_dcr_register(env
, PPC405EP_CPC0_FR
, cpc
,
2453 &dcr_read_epcpc
, &dcr_write_epcpc
);
2454 ppc_dcr_register(env
, PPC405EP_CPC0_SR
, cpc
,
2455 &dcr_read_epcpc
, &dcr_write_epcpc
);
2459 CPUState
*ppc405ep_init(MemoryRegion
*address_space_mem
,
2460 MemoryRegion ram_memories
[2],
2461 target_phys_addr_t ram_bases
[2],
2462 target_phys_addr_t ram_sizes
[2],
2463 uint32_t sysclk
, qemu_irq
**picp
,
2466 clk_setup_t clk_setup
[PPC405EP_CLK_NB
], tlb_clk_setup
;
2467 qemu_irq dma_irqs
[4], gpt_irqs
[5], mal_irqs
[4];
2469 qemu_irq
*pic
, *irqs
;
2471 memset(clk_setup
, 0, sizeof(clk_setup
));
2473 env
= ppc4xx_init("405ep", &clk_setup
[PPC405EP_CPU_CLK
],
2474 &tlb_clk_setup
, sysclk
);
2475 clk_setup
[PPC405EP_CPU_CLK
].cb
= tlb_clk_setup
.cb
;
2476 clk_setup
[PPC405EP_CPU_CLK
].opaque
= tlb_clk_setup
.opaque
;
2477 /* Internal devices init */
2478 /* Memory mapped devices registers */
2480 ppc4xx_plb_init(env
);
2481 /* PLB to OPB bridge */
2482 ppc4xx_pob_init(env
);
2484 ppc4xx_opba_init(0xef600600);
2485 /* Universal interrupt controller */
2486 irqs
= g_malloc0(sizeof(qemu_irq
) * PPCUIC_OUTPUT_NB
);
2487 irqs
[PPCUIC_OUTPUT_INT
] =
2488 ((qemu_irq
*)env
->irq_inputs
)[PPC40x_INPUT_INT
];
2489 irqs
[PPCUIC_OUTPUT_CINT
] =
2490 ((qemu_irq
*)env
->irq_inputs
)[PPC40x_INPUT_CINT
];
2491 pic
= ppcuic_init(env
, irqs
, 0x0C0, 0, 1);
2493 /* SDRAM controller */
2494 /* XXX 405EP has no ECC interrupt */
2495 ppc4xx_sdram_init(env
, pic
[17], 2, ram_memories
,
2496 ram_bases
, ram_sizes
, do_init
);
2497 /* External bus controller */
2498 ppc405_ebc_init(env
);
2499 /* DMA controller */
2500 dma_irqs
[0] = pic
[5];
2501 dma_irqs
[1] = pic
[6];
2502 dma_irqs
[2] = pic
[7];
2503 dma_irqs
[3] = pic
[8];
2504 ppc405_dma_init(env
, dma_irqs
);
2505 /* IIC controller */
2506 ppc405_i2c_init(0xef600500, pic
[2]);
2508 ppc405_gpio_init(0xef600700);
2510 if (serial_hds
[0] != NULL
) {
2511 serial_mm_init(address_space_mem
, 0xef600300, 0, pic
[0],
2512 PPC_SERIAL_MM_BAUDBASE
, serial_hds
[0],
2515 if (serial_hds
[1] != NULL
) {
2516 serial_mm_init(address_space_mem
, 0xef600400, 0, pic
[1],
2517 PPC_SERIAL_MM_BAUDBASE
, serial_hds
[1],
2521 ppc405_ocm_init(env
);
2523 gpt_irqs
[0] = pic
[19];
2524 gpt_irqs
[1] = pic
[20];
2525 gpt_irqs
[2] = pic
[21];
2526 gpt_irqs
[3] = pic
[22];
2527 gpt_irqs
[4] = pic
[23];
2528 ppc4xx_gpt_init(0xef600000, gpt_irqs
);
2530 /* Uses pic[3], pic[16], pic[18] */
2532 mal_irqs
[0] = pic
[11];
2533 mal_irqs
[1] = pic
[12];
2534 mal_irqs
[2] = pic
[13];
2535 mal_irqs
[3] = pic
[14];
2536 ppc405_mal_init(env
, mal_irqs
);
2538 /* Uses pic[9], pic[15], pic[17] */
2540 ppc405ep_cpc_init(env
, clk_setup
, sysclk
);