1c64b21d5SDmitry Eremin-Solenikov /* 2c64b21d5SDmitry Eremin-Solenikov * SA-1110-based Sharp Zaurus SL-5500 platform. 3c64b21d5SDmitry Eremin-Solenikov * 4c64b21d5SDmitry Eremin-Solenikov * Copyright (C) 2011 Dmitry Eremin-Solenikov 5c64b21d5SDmitry Eremin-Solenikov * 6c64b21d5SDmitry Eremin-Solenikov * This code is licensed under GNU GPL v2. 76b620ca3SPaolo Bonzini * 86b620ca3SPaolo Bonzini * Contributions after 2012-01-13 are licensed under the terms of the 96b620ca3SPaolo Bonzini * GNU GPL, version 2 or (at your option) any later version. 10c64b21d5SDmitry Eremin-Solenikov */ 1112b16722SPeter Maydell #include "qemu/osdep.h" 12ce14710fSMarkus Armbruster #include "qemu/units.h" 1300b9829fSIgor Mammedov #include "qemu/cutils.h" 1483c9f4caSPaolo Bonzini #include "hw/sysbus.h" 1583c9f4caSPaolo Bonzini #include "hw/boards.h" 1647b43a1fSPaolo Bonzini #include "strongarm.h" 1712ec8bd5SPeter Maydell #include "hw/arm/boot.h" 180d09e41aSPaolo Bonzini #include "hw/block/flash.h" 19022c62cbSPaolo Bonzini #include "exec/address-spaces.h" 20ba1ba5ccSIgor Mammedov #include "cpu.h" 21c64b21d5SDmitry Eremin-Solenikov 22*8a2b76ffSPeter Maydell typedef struct { 23*8a2b76ffSPeter Maydell MachineState parent; 24*8a2b76ffSPeter Maydell 25*8a2b76ffSPeter Maydell StrongARMState *sa1110; 26*8a2b76ffSPeter Maydell } CollieMachineState; 27*8a2b76ffSPeter Maydell 28*8a2b76ffSPeter Maydell #define TYPE_COLLIE_MACHINE MACHINE_TYPE_NAME("collie") 29*8a2b76ffSPeter Maydell #define COLLIE_MACHINE(obj) \ 30*8a2b76ffSPeter Maydell OBJECT_CHECK(CollieMachineState, obj, TYPE_COLLIE_MACHINE) 31*8a2b76ffSPeter Maydell 32c64b21d5SDmitry Eremin-Solenikov static struct arm_boot_info collie_binfo = { 33c64b21d5SDmitry Eremin-Solenikov .loader_start = SA_SDCS0, 34c64b21d5SDmitry Eremin-Solenikov .ram_size = 0x20000000, 35c64b21d5SDmitry Eremin-Solenikov }; 36c64b21d5SDmitry Eremin-Solenikov 373ef96221SMarcel Apfelbaum static void collie_init(MachineState *machine) 38c64b21d5SDmitry Eremin-Solenikov { 39c64b21d5SDmitry Eremin-Solenikov DriveInfo *dinfo; 4000b9829fSIgor Mammedov MachineClass *mc = MACHINE_GET_CLASS(machine); 41*8a2b76ffSPeter Maydell CollieMachineState *cms = COLLIE_MACHINE(machine); 4200b9829fSIgor Mammedov 4300b9829fSIgor Mammedov if (machine->ram_size != mc->default_ram_size) { 4400b9829fSIgor Mammedov char *sz = size_to_str(mc->default_ram_size); 4500b9829fSIgor Mammedov error_report("Invalid RAM size, should be %s", sz); 4600b9829fSIgor Mammedov g_free(sz); 4700b9829fSIgor Mammedov exit(EXIT_FAILURE); 4800b9829fSIgor Mammedov } 49c64b21d5SDmitry Eremin-Solenikov 50*8a2b76ffSPeter Maydell cms->sa1110 = sa1110_init(machine->cpu_type); 513cd892daSPhilippe Mathieu-Daudé 5200b9829fSIgor Mammedov memory_region_add_subregion(get_system_memory(), SA_SDCS0, machine->ram); 53c64b21d5SDmitry Eremin-Solenikov 54c64b21d5SDmitry Eremin-Solenikov dinfo = drive_get(IF_PFLASH, 0, 0); 55940d5b13SMarkus Armbruster pflash_cfi01_register(SA_CS0, "collie.fl1", 0x02000000, 564be74634SMarkus Armbruster dinfo ? blk_by_legacy_dinfo(dinfo) : NULL, 57ce14710fSMarkus Armbruster 64 * KiB, 4, 0x00, 0x00, 0x00, 0x00, 0); 58c64b21d5SDmitry Eremin-Solenikov 59c64b21d5SDmitry Eremin-Solenikov dinfo = drive_get(IF_PFLASH, 0, 1); 60940d5b13SMarkus Armbruster pflash_cfi01_register(SA_CS1, "collie.fl2", 0x02000000, 614be74634SMarkus Armbruster dinfo ? blk_by_legacy_dinfo(dinfo) : NULL, 62ce14710fSMarkus Armbruster 64 * KiB, 4, 0x00, 0x00, 0x00, 0x00, 0); 63c64b21d5SDmitry Eremin-Solenikov 64c64b21d5SDmitry Eremin-Solenikov sysbus_create_simple("scoop", 0x40800000, NULL); 65c64b21d5SDmitry Eremin-Solenikov 66c64b21d5SDmitry Eremin-Solenikov collie_binfo.board_id = 0x208; 67*8a2b76ffSPeter Maydell arm_load_kernel(cms->sa1110->cpu, machine, &collie_binfo); 68c64b21d5SDmitry Eremin-Solenikov } 69c64b21d5SDmitry Eremin-Solenikov 70*8a2b76ffSPeter Maydell static void collie_machine_class_init(ObjectClass *oc, void *data) 71c64b21d5SDmitry Eremin-Solenikov { 72*8a2b76ffSPeter Maydell MachineClass *mc = MACHINE_CLASS(oc); 73*8a2b76ffSPeter Maydell 74ad1e8db8SRyo ONODERA mc->desc = "Sharp SL-5500 (Collie) PDA (SA-1110)"; 75e264d29dSEduardo Habkost mc->init = collie_init; 764672cbd7SPeter Maydell mc->ignore_memory_transaction_failures = true; 77ba1ba5ccSIgor Mammedov mc->default_cpu_type = ARM_CPU_TYPE_NAME("sa1110"); 7800b9829fSIgor Mammedov mc->default_ram_size = 0x20000000; 7900b9829fSIgor Mammedov mc->default_ram_id = "strongarm.sdram"; 80c64b21d5SDmitry Eremin-Solenikov } 81c64b21d5SDmitry Eremin-Solenikov 82*8a2b76ffSPeter Maydell static const TypeInfo collie_machine_typeinfo = { 83*8a2b76ffSPeter Maydell .name = TYPE_COLLIE_MACHINE, 84*8a2b76ffSPeter Maydell .parent = TYPE_MACHINE, 85*8a2b76ffSPeter Maydell .class_init = collie_machine_class_init, 86*8a2b76ffSPeter Maydell .instance_size = sizeof(CollieMachineState), 87*8a2b76ffSPeter Maydell }; 88*8a2b76ffSPeter Maydell 89*8a2b76ffSPeter Maydell static void collie_machine_register_types(void) 90*8a2b76ffSPeter Maydell { 91*8a2b76ffSPeter Maydell type_register_static(&collie_machine_typeinfo); 92*8a2b76ffSPeter Maydell } 93*8a2b76ffSPeter Maydell type_init(collie_machine_register_types); 94