hw/xtensa/xtensa_lx60.c

   1 /*
   2  * Copyright (c) 2011, Max Filippov, Open Source and Linux Lab.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions are met:
   7  *     * Redistributions of source code must retain the above copyright
   8  *       notice, this list of conditions and the following disclaimer.
   9  *     * Redistributions in binary form must reproduce the above copyright
  10  *       notice, this list of conditions and the following disclaimer in the
  11  *       documentation and/or other materials provided with the distribution.
  12  *     * Neither the name of the Open Source and Linux Lab nor the
  13  *       names of its contributors may be used to endorse or promote products
  14  *       derived from this software without specific prior written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  17  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  20  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  21  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  22  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  23  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  25  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #include "sysemu/sysemu.h"
  29 #include "hw/boards.h"
  30 #include "hw/loader.h"
  31 #include "elf.h"
  32 #include "exec/memory.h"
  33 #include "exec/address-spaces.h"
  34 #include "hw/char/serial.h"
  35 #include "net/net.h"
  36 #include "hw/sysbus.h"
  37 #include "hw/block/flash.h"
  38 #include "sysemu/blockdev.h"
  39 #include "sysemu/char.h"
  40 #include "xtensa_bootparam.h"
  41
  42 typedef struct LxBoardDesc {
  43     size_t flash_size;
  44     size_t flash_sector_size;
  45     size_t sram_size;
  46 } LxBoardDesc;
  47
  48 typedef struct Lx60FpgaState {
  49     MemoryRegion iomem;
  50     uint32_t leds;
  51     uint32_t switches;
  52 } Lx60FpgaState;
  53
  54 static void lx60_fpga_reset(void *opaque)
  55 {
  56     Lx60FpgaState *s = opaque;
  57
  58     s->leds = 0;
  59     s->switches = 0;
  60 }
  61
  62 static uint64_t lx60_fpga_read(void *opaque, hwaddr addr,
  63         unsigned size)
  64 {
  65     Lx60FpgaState *s = opaque;
  66
  67     switch (addr) {
  68     case 0x0: /*build date code*/
  69         return 0x09272011;
  70
  71     case 0x4: /*processor clock frequency, Hz*/
  72         return 10000000;
  73
  74     case 0x8: /*LEDs (off = 0, on = 1)*/
  75         return s->leds;
  76
  77     case 0xc: /*DIP switches (off = 0, on = 1)*/
  78         return s->switches;
  79     }
  80     return 0;
  81 }
  82
  83 static void lx60_fpga_write(void *opaque, hwaddr addr,
  84         uint64_t val, unsigned size)
  85 {
  86     Lx60FpgaState *s = opaque;
  87
  88     switch (addr) {
  89     case 0x8: /*LEDs (off = 0, on = 1)*/
  90         s->leds = val;
  91         break;
  92
  93     case 0x10: /*board reset*/
  94         if (val == 0xdead) {
  95             qemu_system_reset_request();
  96         }
  97         break;
  98     }
  99 }
 100
 101 static const MemoryRegionOps lx60_fpga_ops = {
 102     .read = lx60_fpga_read,
 103     .write = lx60_fpga_write,
 104     .endianness = DEVICE_NATIVE_ENDIAN,
 105 };
 106
 107 static Lx60FpgaState *lx60_fpga_init(MemoryRegion *address_space,
 108         hwaddr base)
 109 {
 110     Lx60FpgaState *s = g_malloc(sizeof(Lx60FpgaState));
 111
 112     memory_region_init_io(&s->iomem, NULL, &lx60_fpga_ops, s,
 113             "lx60.fpga", 0x10000);
 114     memory_region_add_subregion(address_space, base, &s->iomem);
 115     lx60_fpga_reset(s);
 116     qemu_register_reset(lx60_fpga_reset, s);
 117     return s;
 118 }
 119
 120 static void lx60_net_init(MemoryRegion *address_space,
 121         hwaddr base,
 122         hwaddr descriptors,
 123         hwaddr buffers,
 124         qemu_irq irq, NICInfo *nd)
 125 {
 126     DeviceState *dev;
 127     SysBusDevice *s;
 128     MemoryRegion *ram;
 129
 130     dev = qdev_create(NULL, "open_eth");
 131     qdev_set_nic_properties(dev, nd);
 132     qdev_init_nofail(dev);
 133
 134     s = SYS_BUS_DEVICE(dev);
 135     sysbus_connect_irq(s, 0, irq);
 136     memory_region_add_subregion(address_space, base,
 137             sysbus_mmio_get_region(s, 0));
 138     memory_region_add_subregion(address_space, descriptors,
 139             sysbus_mmio_get_region(s, 1));
 140
 141     ram = g_malloc(sizeof(*ram));
 142     memory_region_init_ram(ram, OBJECT(s), "open_eth.ram", 16384);
 143     vmstate_register_ram_global(ram);
 144     memory_region_add_subregion(address_space, buffers, ram);
 145 }
 146
 147 static uint64_t translate_phys_addr(void *opaque, uint64_t addr)
 148 {
 149     XtensaCPU *cpu = opaque;
 150
 151     return cpu_get_phys_page_debug(CPU(cpu), addr);
 152 }
 153
 154 static void lx60_reset(void *opaque)
 155 {
 156     XtensaCPU *cpu = opaque;
 157
 158     cpu_reset(CPU(cpu));
 159 }
 160
 161 static void lx_init(const LxBoardDesc *board, QEMUMachineInitArgs *args)
 162 {
 163 #ifdef TARGET_WORDS_BIGENDIAN
 164     int be = 1;
 165 #else
 166     int be = 0;
 167 #endif
 168     MemoryRegion *system_memory = get_system_memory();
 169     XtensaCPU *cpu = NULL;
 170     CPUXtensaState *env = NULL;
 171     MemoryRegion *ram, *rom, *system_io;
 172     DriveInfo *dinfo;
 173     pflash_t *flash = NULL;
 174     const char *cpu_model = args->cpu_model;
 175     const char *kernel_filename = args->kernel_filename;
 176     const char *kernel_cmdline = args->kernel_cmdline;
 177     int n;
 178
 179     if (!cpu_model) {
 180         cpu_model = XTENSA_DEFAULT_CPU_MODEL;
 181     }
 182
 183     for (n = 0; n < smp_cpus; n++) {
 184         cpu = cpu_xtensa_init(cpu_model);
 185         if (cpu == NULL) {
 186             fprintf(stderr, "Unable to find CPU definition\n");
 187             exit(1);
 188         }
 189         env = &cpu->env;
 190
 191         env->sregs[PRID] = n;
 192         qemu_register_reset(lx60_reset, cpu);
 193         /* Need MMU initialized prior to ELF loading,
 194          * so that ELF gets loaded into virtual addresses
 195          */
 196         cpu_reset(CPU(cpu));
 197     }
 198
 199     ram = g_malloc(sizeof(*ram));
 200     memory_region_init_ram(ram, NULL, "lx60.dram", args->ram_size);
 201     vmstate_register_ram_global(ram);
 202     memory_region_add_subregion(system_memory, 0, ram);
 203
 204     system_io = g_malloc(sizeof(*system_io));
 205     memory_region_init(system_io, NULL, "lx60.io", 224 * 1024 * 1024);
 206     memory_region_add_subregion(system_memory, 0xf0000000, system_io);
 207     lx60_fpga_init(system_io, 0x0d020000);
 208     if (nd_table[0].used) {
 209         lx60_net_init(system_io, 0x0d030000, 0x0d030400, 0x0d800000,
 210                 xtensa_get_extint(env, 1), nd_table);
 211     }
 212
 213     if (!serial_hds[0]) {
 214         serial_hds[0] = qemu_chr_new("serial0", "null", NULL);
 215     }
 216
 217     serial_mm_init(system_io, 0x0d050020, 2, xtensa_get_extint(env, 0),
 218             115200, serial_hds[0], DEVICE_NATIVE_ENDIAN);
 219
 220     dinfo = drive_get(IF_PFLASH, 0, 0);
 221     if (dinfo) {
 222         flash = pflash_cfi01_register(0xf8000000,
 223                 NULL, "lx60.io.flash", board->flash_size,
 224                 dinfo->bdrv, board->flash_sector_size,
 225                 board->flash_size / board->flash_sector_size,
 226                 4, 0x0000, 0x0000, 0x0000, 0x0000, be);
 227         if (flash == NULL) {
 228             fprintf(stderr, "Unable to mount pflash\n");
 229             exit(1);
 230         }
 231     }
 232
 233     /* Use presence of kernel file name as 'boot from SRAM' switch. */
 234     if (kernel_filename) {
 235         rom = g_malloc(sizeof(*rom));
 236         memory_region_init_ram(rom, NULL, "lx60.sram", board->sram_size);
 237         vmstate_register_ram_global(rom);
 238         memory_region_add_subregion(system_memory, 0xfe000000, rom);
 239
 240         /* Put kernel bootparameters to the end of that SRAM */
 241         if (kernel_cmdline) {
 242             size_t cmdline_size = strlen(kernel_cmdline) + 1;
 243             size_t bp_size = sizeof(BpTag[4]) + cmdline_size;
 244             uint32_t tagptr = (0xfe000000 + board->sram_size - bp_size) & ~0xff;
 245
 246             env->regs[2] = tagptr;
 247
 248             tagptr = put_tag(tagptr, 0x7b0b, 0, NULL);
 249             if (cmdline_size > 1) {
 250                 tagptr = put_tag(tagptr, 0x1001,
 251                         cmdline_size, kernel_cmdline);
 252             }
 253             tagptr = put_tag(tagptr, 0x7e0b, 0, NULL);
 254         }
 255         uint64_t elf_entry;
 256         uint64_t elf_lowaddr;
 257         int success = load_elf(kernel_filename, translate_phys_addr, cpu,
 258                 &elf_entry, &elf_lowaddr, NULL, be, ELF_MACHINE, 0);
 259         if (success > 0) {
 260             env->pc = elf_entry;
 261         }
 262     } else {
 263         if (flash) {
 264             MemoryRegion *flash_mr = pflash_cfi01_get_memory(flash);
 265             MemoryRegion *flash_io = g_malloc(sizeof(*flash_io));
 266
 267             memory_region_init_alias(flash_io, NULL, "lx60.flash",
 268                     flash_mr, 0, board->flash_size);
 269             memory_region_add_subregion(system_memory, 0xfe000000,
 270                     flash_io);
 271         }
 272     }
 273 }
 274
 275 static void xtensa_lx60_init(QEMUMachineInitArgs *args)
 276 {
 277     static const LxBoardDesc lx60_board = {
 278         .flash_size = 0x400000,
 279         .flash_sector_size = 0x10000,
 280         .sram_size = 0x20000,
 281     };
 282     lx_init(&lx60_board, args);
 283 }
 284
 285 static void xtensa_lx200_init(QEMUMachineInitArgs *args)
 286 {
 287     static const LxBoardDesc lx200_board = {
 288         .flash_size = 0x1000000,
 289         .flash_sector_size = 0x20000,
 290         .sram_size = 0x2000000,
 291     };
 292     lx_init(&lx200_board, args);
 293 }
 294
 295 static QEMUMachine xtensa_lx60_machine = {
 296     .name = "lx60",
 297     .desc = "lx60 EVB (" XTENSA_DEFAULT_CPU_MODEL ")",
 298     .init = xtensa_lx60_init,
 299     .max_cpus = 4,
 300     DEFAULT_MACHINE_OPTIONS,
 301 };
 302
 303 static QEMUMachine xtensa_lx200_machine = {
 304     .name = "lx200",
 305     .desc = "lx200 EVB (" XTENSA_DEFAULT_CPU_MODEL ")",
 306     .init = xtensa_lx200_init,
 307     .max_cpus = 4,
 308     DEFAULT_MACHINE_OPTIONS,
 309 };
 310
 311 static void xtensa_lx_machines_init(void)
 312 {
 313     qemu_register_machine(&xtensa_lx60_machine);
 314     qemu_register_machine(&xtensa_lx200_machine);
 315 }
 316
 317 machine_init(xtensa_lx_machines_init);