153018216SPaolo Bonzini /*
253018216SPaolo Bonzini * SA-1110-based Sharp Zaurus SL-5500 platform.
353018216SPaolo Bonzini *
453018216SPaolo Bonzini * Copyright (C) 2011 Dmitry Eremin-Solenikov
553018216SPaolo Bonzini *
653018216SPaolo Bonzini * This code is licensed under GNU GPL v2.
753018216SPaolo Bonzini *
853018216SPaolo Bonzini * Contributions after 2012-01-13 are licensed under the terms of the
953018216SPaolo Bonzini * GNU GPL, version 2 or (at your option) any later version.
1053018216SPaolo Bonzini */
1112b16722SPeter Maydell #include "qemu/osdep.h"
12ce14710fSMarkus Armbruster #include "qemu/units.h"
1300b9829fSIgor Mammedov #include "qemu/cutils.h"
1453018216SPaolo Bonzini #include "hw/sysbus.h"
1553018216SPaolo Bonzini #include "hw/boards.h"
1647b43a1fSPaolo Bonzini #include "strongarm.h"
1712ec8bd5SPeter Maydell #include "hw/arm/boot.h"
180d09e41aSPaolo Bonzini #include "hw/block/flash.h"
1953018216SPaolo Bonzini #include "exec/address-spaces.h"
20db1015e9SEduardo Habkost #include "qom/object.h"
21*cc37d98bSRichard Henderson #include "qemu/error-report.h"
22*cc37d98bSRichard Henderson
2353018216SPaolo Bonzini
2450f9b33bSPhilippe Mathieu-Daudé #define RAM_SIZE (512 * MiB)
2550f9b33bSPhilippe Mathieu-Daudé #define FLASH_SIZE (32 * MiB)
2650f9b33bSPhilippe Mathieu-Daudé #define FLASH_SECTOR_SIZE (64 * KiB)
2750f9b33bSPhilippe Mathieu-Daudé
28db1015e9SEduardo Habkost struct CollieMachineState {
298a2b76ffSPeter Maydell MachineState parent;
308a2b76ffSPeter Maydell
318a2b76ffSPeter Maydell StrongARMState *sa1110;
32db1015e9SEduardo Habkost };
338a2b76ffSPeter Maydell
348a2b76ffSPeter Maydell #define TYPE_COLLIE_MACHINE MACHINE_TYPE_NAME("collie")
358063396bSEduardo Habkost OBJECT_DECLARE_SIMPLE_TYPE(CollieMachineState, COLLIE_MACHINE)
368a2b76ffSPeter Maydell
3753018216SPaolo Bonzini static struct arm_boot_info collie_binfo = {
3853018216SPaolo Bonzini .loader_start = SA_SDCS0,
3950f9b33bSPhilippe Mathieu-Daudé .ram_size = RAM_SIZE,
4053018216SPaolo Bonzini };
4153018216SPaolo Bonzini
collie_init(MachineState * machine)423ef96221SMarcel Apfelbaum static void collie_init(MachineState *machine)
4353018216SPaolo Bonzini {
4400b9829fSIgor Mammedov MachineClass *mc = MACHINE_GET_CLASS(machine);
458a2b76ffSPeter Maydell CollieMachineState *cms = COLLIE_MACHINE(machine);
4600b9829fSIgor Mammedov
4700b9829fSIgor Mammedov if (machine->ram_size != mc->default_ram_size) {
4800b9829fSIgor Mammedov char *sz = size_to_str(mc->default_ram_size);
4900b9829fSIgor Mammedov error_report("Invalid RAM size, should be %s", sz);
5000b9829fSIgor Mammedov g_free(sz);
5100b9829fSIgor Mammedov exit(EXIT_FAILURE);
5200b9829fSIgor Mammedov }
5353018216SPaolo Bonzini
548a2b76ffSPeter Maydell cms->sa1110 = sa1110_init(machine->cpu_type);
553cd892daSPhilippe Mathieu-Daudé
5600b9829fSIgor Mammedov memory_region_add_subregion(get_system_memory(), SA_SDCS0, machine->ram);
5753018216SPaolo Bonzini
58ec177b73SPhilippe Mathieu-Daudé for (unsigned i = 0; i < 2; i++) {
59ec177b73SPhilippe Mathieu-Daudé DriveInfo *dinfo = drive_get(IF_PFLASH, 0, i);
60ec177b73SPhilippe Mathieu-Daudé pflash_cfi01_register(i ? SA_CS1 : SA_CS0,
61ec177b73SPhilippe Mathieu-Daudé i ? "collie.fl2" : "collie.fl1", FLASH_SIZE,
624be74634SMarkus Armbruster dinfo ? blk_by_legacy_dinfo(dinfo) : NULL,
6350f9b33bSPhilippe Mathieu-Daudé FLASH_SECTOR_SIZE, 4, 0x00, 0x00, 0x00, 0x00, 0);
64ec177b73SPhilippe Mathieu-Daudé }
6553018216SPaolo Bonzini
6653018216SPaolo Bonzini sysbus_create_simple("scoop", 0x40800000, NULL);
6753018216SPaolo Bonzini
6853018216SPaolo Bonzini collie_binfo.board_id = 0x208;
698a2b76ffSPeter Maydell arm_load_kernel(cms->sa1110->cpu, machine, &collie_binfo);
7053018216SPaolo Bonzini }
7153018216SPaolo Bonzini
collie_machine_class_init(ObjectClass * oc,void * data)728a2b76ffSPeter Maydell static void collie_machine_class_init(ObjectClass *oc, void *data)
7353018216SPaolo Bonzini {
748a2b76ffSPeter Maydell MachineClass *mc = MACHINE_CLASS(oc);
758a2b76ffSPeter Maydell
76ad1e8db8SRyo ONODERA mc->desc = "Sharp SL-5500 (Collie) PDA (SA-1110)";
77e264d29dSEduardo Habkost mc->init = collie_init;
784672cbd7SPeter Maydell mc->ignore_memory_transaction_failures = true;
79ba1ba5ccSIgor Mammedov mc->default_cpu_type = ARM_CPU_TYPE_NAME("sa1110");
8050f9b33bSPhilippe Mathieu-Daudé mc->default_ram_size = RAM_SIZE;
8100b9829fSIgor Mammedov mc->default_ram_id = "strongarm.sdram";
8253018216SPaolo Bonzini }
8353018216SPaolo Bonzini
848a2b76ffSPeter Maydell static const TypeInfo collie_machine_typeinfo = {
858a2b76ffSPeter Maydell .name = TYPE_COLLIE_MACHINE,
868a2b76ffSPeter Maydell .parent = TYPE_MACHINE,
878a2b76ffSPeter Maydell .class_init = collie_machine_class_init,
888a2b76ffSPeter Maydell .instance_size = sizeof(CollieMachineState),
898a2b76ffSPeter Maydell };
908a2b76ffSPeter Maydell
collie_machine_register_types(void)918a2b76ffSPeter Maydell static void collie_machine_register_types(void)
928a2b76ffSPeter Maydell {
938a2b76ffSPeter Maydell type_register_static(&collie_machine_typeinfo);
948a2b76ffSPeter Maydell }
958a2b76ffSPeter Maydell type_init(collie_machine_register_types);
96