qemu/hw/lm32/lm32_boards.c
<<
>>
Prefs
   1/*
   2 *  QEMU models for LatticeMico32 uclinux and evr32 boards.
   3 *
   4 *  Copyright (c) 2010 Michael Walle <michael@walle.cc>
   5 *
   6 * This library is free software; you can redistribute it and/or
   7 * modify it under the terms of the GNU Lesser General Public
   8 * License as published by the Free Software Foundation; either
   9 * version 2 of the License, or (at your option) any later version.
  10 *
  11 * This library is distributed in the hope that it will be useful,
  12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 * Lesser General Public License for more details.
  15 *
  16 * You should have received a copy of the GNU Lesser General Public
  17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20#include "qemu/osdep.h"
  21#include "qemu-common.h"
  22#include "cpu.h"
  23#include "hw/sysbus.h"
  24#include "hw/hw.h"
  25#include "hw/block/flash.h"
  26#include "hw/devices.h"
  27#include "hw/boards.h"
  28#include "hw/loader.h"
  29#include "sysemu/block-backend.h"
  30#include "elf.h"
  31#include "lm32_hwsetup.h"
  32#include "lm32.h"
  33#include "exec/address-spaces.h"
  34#include "sysemu/sysemu.h"
  35
  36typedef struct {
  37    LM32CPU *cpu;
  38    hwaddr bootstrap_pc;
  39    hwaddr flash_base;
  40    hwaddr hwsetup_base;
  41    hwaddr initrd_base;
  42    size_t initrd_size;
  43    hwaddr cmdline_base;
  44} ResetInfo;
  45
  46static void cpu_irq_handler(void *opaque, int irq, int level)
  47{
  48    LM32CPU *cpu = opaque;
  49    CPUState *cs = CPU(cpu);
  50
  51    if (level) {
  52        cpu_interrupt(cs, CPU_INTERRUPT_HARD);
  53    } else {
  54        cpu_reset_interrupt(cs, CPU_INTERRUPT_HARD);
  55    }
  56}
  57
  58static void main_cpu_reset(void *opaque)
  59{
  60    ResetInfo *reset_info = opaque;
  61    CPULM32State *env = &reset_info->cpu->env;
  62
  63    cpu_reset(CPU(reset_info->cpu));
  64
  65    /* init defaults */
  66    env->pc = (uint32_t)reset_info->bootstrap_pc;
  67    env->regs[R_R1] = (uint32_t)reset_info->hwsetup_base;
  68    env->regs[R_R2] = (uint32_t)reset_info->cmdline_base;
  69    env->regs[R_R3] = (uint32_t)reset_info->initrd_base;
  70    env->regs[R_R4] = (uint32_t)(reset_info->initrd_base +
  71        reset_info->initrd_size);
  72    env->eba = reset_info->flash_base;
  73    env->deba = reset_info->flash_base;
  74}
  75
  76static void lm32_evr_init(MachineState *machine)
  77{
  78    const char *kernel_filename = machine->kernel_filename;
  79    LM32CPU *cpu;
  80    CPULM32State *env;
  81    DriveInfo *dinfo;
  82    MemoryRegion *address_space_mem =  get_system_memory();
  83    MemoryRegion *phys_ram = g_new(MemoryRegion, 1);
  84    qemu_irq irq[32];
  85    ResetInfo *reset_info;
  86    int i;
  87
  88    /* memory map */
  89    hwaddr flash_base  = 0x04000000;
  90    size_t flash_sector_size       = 256 * 1024;
  91    size_t flash_size              = 32 * 1024 * 1024;
  92    hwaddr ram_base    = 0x08000000;
  93    size_t ram_size                = 64 * 1024 * 1024;
  94    hwaddr timer0_base = 0x80002000;
  95    hwaddr uart0_base  = 0x80006000;
  96    hwaddr timer1_base = 0x8000a000;
  97    int uart0_irq                  = 0;
  98    int timer0_irq                 = 1;
  99    int timer1_irq                 = 3;
 100
 101    reset_info = g_malloc0(sizeof(ResetInfo));
 102
 103    cpu = LM32_CPU(cpu_create(machine->cpu_type));
 104
 105    env = &cpu->env;
 106    reset_info->cpu = cpu;
 107
 108    reset_info->flash_base = flash_base;
 109
 110    memory_region_allocate_system_memory(phys_ram, NULL, "lm32_evr.sdram",
 111                                         ram_size);
 112    memory_region_add_subregion(address_space_mem, ram_base, phys_ram);
 113
 114    dinfo = drive_get(IF_PFLASH, 0, 0);
 115    /* Spansion S29NS128P */
 116    pflash_cfi02_register(flash_base, NULL, "lm32_evr.flash", flash_size,
 117                          dinfo ? blk_by_legacy_dinfo(dinfo) : NULL,
 118                          flash_sector_size, flash_size / flash_sector_size,
 119                          1, 2, 0x01, 0x7e, 0x43, 0x00, 0x555, 0x2aa, 1);
 120
 121    /* create irq lines */
 122    env->pic_state = lm32_pic_init(qemu_allocate_irq(cpu_irq_handler, cpu, 0));
 123    for (i = 0; i < 32; i++) {
 124        irq[i] = qdev_get_gpio_in(env->pic_state, i);
 125    }
 126
 127    lm32_uart_create(uart0_base, irq[uart0_irq], serial_hds[0]);
 128    sysbus_create_simple("lm32-timer", timer0_base, irq[timer0_irq]);
 129    sysbus_create_simple("lm32-timer", timer1_base, irq[timer1_irq]);
 130
 131    /* make sure juart isn't the first chardev */
 132    env->juart_state = lm32_juart_init(serial_hds[1]);
 133
 134    reset_info->bootstrap_pc = flash_base;
 135
 136    if (kernel_filename) {
 137        uint64_t entry;
 138        int kernel_size;
 139
 140        kernel_size = load_elf(kernel_filename, NULL, NULL, &entry, NULL, NULL,
 141                               1, EM_LATTICEMICO32, 0, 0);
 142        reset_info->bootstrap_pc = entry;
 143
 144        if (kernel_size < 0) {
 145            kernel_size = load_image_targphys(kernel_filename, ram_base,
 146                                              ram_size);
 147            reset_info->bootstrap_pc = ram_base;
 148        }
 149
 150        if (kernel_size < 0) {
 151            fprintf(stderr, "qemu: could not load kernel '%s'\n",
 152                    kernel_filename);
 153            exit(1);
 154        }
 155    }
 156
 157    qemu_register_reset(main_cpu_reset, reset_info);
 158}
 159
 160static void lm32_uclinux_init(MachineState *machine)
 161{
 162    const char *kernel_filename = machine->kernel_filename;
 163    const char *kernel_cmdline = machine->kernel_cmdline;
 164    const char *initrd_filename = machine->initrd_filename;
 165    LM32CPU *cpu;
 166    CPULM32State *env;
 167    DriveInfo *dinfo;
 168    MemoryRegion *address_space_mem =  get_system_memory();
 169    MemoryRegion *phys_ram = g_new(MemoryRegion, 1);
 170    qemu_irq irq[32];
 171    HWSetup *hw;
 172    ResetInfo *reset_info;
 173    int i;
 174
 175    /* memory map */
 176    hwaddr flash_base   = 0x04000000;
 177    size_t flash_sector_size        = 256 * 1024;
 178    size_t flash_size               = 32 * 1024 * 1024;
 179    hwaddr ram_base     = 0x08000000;
 180    size_t ram_size                 = 64 * 1024 * 1024;
 181    hwaddr uart0_base   = 0x80000000;
 182    hwaddr timer0_base  = 0x80002000;
 183    hwaddr timer1_base  = 0x80010000;
 184    hwaddr timer2_base  = 0x80012000;
 185    int uart0_irq                   = 0;
 186    int timer0_irq                  = 1;
 187    int timer1_irq                  = 20;
 188    int timer2_irq                  = 21;
 189    hwaddr hwsetup_base = 0x0bffe000;
 190    hwaddr cmdline_base = 0x0bfff000;
 191    hwaddr initrd_base  = 0x08400000;
 192    size_t initrd_max               = 0x01000000;
 193
 194    reset_info = g_malloc0(sizeof(ResetInfo));
 195
 196    cpu = LM32_CPU(cpu_create(machine->cpu_type));
 197
 198    env = &cpu->env;
 199    reset_info->cpu = cpu;
 200
 201    reset_info->flash_base = flash_base;
 202
 203    memory_region_allocate_system_memory(phys_ram, NULL,
 204                                         "lm32_uclinux.sdram", ram_size);
 205    memory_region_add_subregion(address_space_mem, ram_base, phys_ram);
 206
 207    dinfo = drive_get(IF_PFLASH, 0, 0);
 208    /* Spansion S29NS128P */
 209    pflash_cfi02_register(flash_base, NULL, "lm32_uclinux.flash", flash_size,
 210                          dinfo ? blk_by_legacy_dinfo(dinfo) : NULL,
 211                          flash_sector_size, flash_size / flash_sector_size,
 212                          1, 2, 0x01, 0x7e, 0x43, 0x00, 0x555, 0x2aa, 1);
 213
 214    /* create irq lines */
 215    env->pic_state = lm32_pic_init(qemu_allocate_irq(cpu_irq_handler, env, 0));
 216    for (i = 0; i < 32; i++) {
 217        irq[i] = qdev_get_gpio_in(env->pic_state, i);
 218    }
 219
 220    lm32_uart_create(uart0_base, irq[uart0_irq], serial_hds[0]);
 221    sysbus_create_simple("lm32-timer", timer0_base, irq[timer0_irq]);
 222    sysbus_create_simple("lm32-timer", timer1_base, irq[timer1_irq]);
 223    sysbus_create_simple("lm32-timer", timer2_base, irq[timer2_irq]);
 224
 225    /* make sure juart isn't the first chardev */
 226    env->juart_state = lm32_juart_init(serial_hds[1]);
 227
 228    reset_info->bootstrap_pc = flash_base;
 229
 230    if (kernel_filename) {
 231        uint64_t entry;
 232        int kernel_size;
 233
 234        kernel_size = load_elf(kernel_filename, NULL, NULL, &entry, NULL, NULL,
 235                               1, EM_LATTICEMICO32, 0, 0);
 236        reset_info->bootstrap_pc = entry;
 237
 238        if (kernel_size < 0) {
 239            kernel_size = load_image_targphys(kernel_filename, ram_base,
 240                                              ram_size);
 241            reset_info->bootstrap_pc = ram_base;
 242        }
 243
 244        if (kernel_size < 0) {
 245            fprintf(stderr, "qemu: could not load kernel '%s'\n",
 246                    kernel_filename);
 247            exit(1);
 248        }
 249    }
 250
 251    /* generate a rom with the hardware description */
 252    hw = hwsetup_init();
 253    hwsetup_add_cpu(hw, "LM32", 75000000);
 254    hwsetup_add_flash(hw, "flash", flash_base, flash_size);
 255    hwsetup_add_ddr_sdram(hw, "ddr_sdram", ram_base, ram_size);
 256    hwsetup_add_timer(hw, "timer0", timer0_base, timer0_irq);
 257    hwsetup_add_timer(hw, "timer1_dev_only", timer1_base, timer1_irq);
 258    hwsetup_add_timer(hw, "timer2_dev_only", timer2_base, timer2_irq);
 259    hwsetup_add_uart(hw, "uart", uart0_base, uart0_irq);
 260    hwsetup_add_trailer(hw);
 261    hwsetup_create_rom(hw, hwsetup_base);
 262    hwsetup_free(hw);
 263
 264    reset_info->hwsetup_base = hwsetup_base;
 265
 266    if (kernel_cmdline && strlen(kernel_cmdline)) {
 267        pstrcpy_targphys("cmdline", cmdline_base, TARGET_PAGE_SIZE,
 268                kernel_cmdline);
 269        reset_info->cmdline_base = cmdline_base;
 270    }
 271
 272    if (initrd_filename) {
 273        size_t initrd_size;
 274        initrd_size = load_image_targphys(initrd_filename, initrd_base,
 275                initrd_max);
 276        reset_info->initrd_base = initrd_base;
 277        reset_info->initrd_size = initrd_size;
 278    }
 279
 280    qemu_register_reset(main_cpu_reset, reset_info);
 281}
 282
 283static void lm32_evr_class_init(ObjectClass *oc, void *data)
 284{
 285    MachineClass *mc = MACHINE_CLASS(oc);
 286
 287    mc->desc = "LatticeMico32 EVR32 eval system";
 288    mc->init = lm32_evr_init;
 289    mc->is_default = 1;
 290    mc->default_cpu_type = LM32_CPU_TYPE_NAME("lm32-full");
 291}
 292
 293static const TypeInfo lm32_evr_type = {
 294    .name = MACHINE_TYPE_NAME("lm32-evr"),
 295    .parent = TYPE_MACHINE,
 296    .class_init = lm32_evr_class_init,
 297};
 298
 299static void lm32_uclinux_class_init(ObjectClass *oc, void *data)
 300{
 301    MachineClass *mc = MACHINE_CLASS(oc);
 302
 303    mc->desc = "lm32 platform for uClinux and u-boot by Theobroma Systems";
 304    mc->init = lm32_uclinux_init;
 305    mc->is_default = 0;
 306    mc->default_cpu_type = LM32_CPU_TYPE_NAME("lm32-full");
 307}
 308
 309static const TypeInfo lm32_uclinux_type = {
 310    .name = MACHINE_TYPE_NAME("lm32-uclinux"),
 311    .parent = TYPE_MACHINE,
 312    .class_init = lm32_uclinux_class_init,
 313};
 314
 315static void lm32_machine_init(void)
 316{
 317    type_register_static(&lm32_evr_type);
 318    type_register_static(&lm32_uclinux_type);
 319}
 320
 321type_init(lm32_machine_init)
 322