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"
19dfc56946SRichard Henderson #include "system/address-spaces.h"
20db1015e9SEduardo Habkost #include "qom/object.h"
21cc37d98bSRichard Henderson #include "qemu/error-report.h"
22cc37d98bSRichard Henderson
23c64b21d5SDmitry Eremin-Solenikov
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
37c64b21d5SDmitry Eremin-Solenikov static struct arm_boot_info collie_binfo = {
38c64b21d5SDmitry Eremin-Solenikov .loader_start = SA_SDCS0,
3950f9b33bSPhilippe Mathieu-Daudé .ram_size = RAM_SIZE,
40c64b21d5SDmitry Eremin-Solenikov };
41c64b21d5SDmitry Eremin-Solenikov
collie_init(MachineState * machine)423ef96221SMarcel Apfelbaum static void collie_init(MachineState *machine)
43c64b21d5SDmitry Eremin-Solenikov {
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 }
53c64b21d5SDmitry Eremin-Solenikov
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);
57c64b21d5SDmitry Eremin-Solenikov
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é }
65c64b21d5SDmitry Eremin-Solenikov
66c64b21d5SDmitry Eremin-Solenikov sysbus_create_simple("scoop", 0x40800000, NULL);
67c64b21d5SDmitry Eremin-Solenikov
68c64b21d5SDmitry Eremin-Solenikov collie_binfo.board_id = 0x208;
698a2b76ffSPeter Maydell arm_load_kernel(cms->sa1110->cpu, machine, &collie_binfo);
70c64b21d5SDmitry Eremin-Solenikov }
71c64b21d5SDmitry Eremin-Solenikov
collie_machine_class_init(ObjectClass * oc,const void * data)72*12d1a768SPhilippe Mathieu-Daudé static void collie_machine_class_init(ObjectClass *oc, const void *data)
73c64b21d5SDmitry Eremin-Solenikov {
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";
82c64b21d5SDmitry Eremin-Solenikov }
83c64b21d5SDmitry Eremin-Solenikov
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