target/cris/cpu.c

   1 /*
   2  * QEMU CRIS CPU
   3  *
   4  * Copyright (c) 2008 AXIS Communications AB
   5  * Written by Edgar E. Iglesias.
   6  *
   7  * Copyright (c) 2012 SUSE LINUX Products GmbH
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with this library; if not, see
  21  * <http://www.gnu.org/licenses/lgpl-2.1.html>
  22  */
  23
  24 #include "qemu/osdep.h"
  25 #include "qapi/error.h"
  26 #include "qemu/qemu-print.h"
  27 #include "cpu.h"
  28 #include "mmu.h"
  29
  30
  31 static void cris_cpu_set_pc(CPUState *cs, vaddr value)
  32 {
  33     CRISCPU *cpu = CRIS_CPU(cs);
  34
  35     cpu->env.pc = value;
  36 }
  37
  38 static vaddr cris_cpu_get_pc(CPUState *cs)
  39 {
  40     CRISCPU *cpu = CRIS_CPU(cs);
  41
  42     return cpu->env.pc;
  43 }
  44
  45 static void cris_restore_state_to_opc(CPUState *cs,
  46                                       const TranslationBlock *tb,
  47                                       const uint64_t *data)
  48 {
  49     CRISCPU *cpu = CRIS_CPU(cs);
  50
  51     cpu->env.pc = data[0];
  52 }
  53
  54 static bool cris_cpu_has_work(CPUState *cs)
  55 {
  56     return cs->interrupt_request & (CPU_INTERRUPT_HARD | CPU_INTERRUPT_NMI);
  57 }
  58
  59 static int cris_cpu_mmu_index(CPUState *cs, bool ifetch)
  60 {
  61     return !!(cpu_env(cs)->pregs[PR_CCS] & U_FLAG);
  62 }
  63
  64 static void cris_cpu_reset_hold(Object *obj, ResetType type)
  65 {
  66     CPUState *cs = CPU(obj);
  67     CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(obj);
  68     CPUCRISState *env = cpu_env(cs);
  69     uint32_t vr;
  70
  71     if (ccc->parent_phases.hold) {
  72         ccc->parent_phases.hold(obj, type);
  73     }
  74
  75     vr = env->pregs[PR_VR];
  76     memset(env, 0, offsetof(CPUCRISState, end_reset_fields));
  77     env->pregs[PR_VR] = vr;
  78
  79 #if defined(CONFIG_USER_ONLY)
  80     /* start in user mode with interrupts enabled.  */
  81     env->pregs[PR_CCS] |= U_FLAG | I_FLAG | P_FLAG;
  82 #else
  83     cris_mmu_init(env);
  84     env->pregs[PR_CCS] = 0;
  85 #endif
  86 }
  87
  88 static ObjectClass *cris_cpu_class_by_name(const char *cpu_model)
  89 {
  90     ObjectClass *oc;
  91     char *typename;
  92
  93 #if defined(CONFIG_USER_ONLY)
  94     if (strcasecmp(cpu_model, "any") == 0) {
  95         return object_class_by_name(CRIS_CPU_TYPE_NAME("crisv32"));
  96     }
  97 #endif
  98
  99     typename = g_strdup_printf(CRIS_CPU_TYPE_NAME("%s"), cpu_model);
 100     oc = object_class_by_name(typename);
 101     g_free(typename);
 102
 103     return oc;
 104 }
 105
 106 static void cris_cpu_realizefn(DeviceState *dev, Error **errp)
 107 {
 108     CPUState *cs = CPU(dev);
 109     CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(dev);
 110     Error *local_err = NULL;
 111
 112     cpu_exec_realizefn(cs, &local_err);
 113     if (local_err != NULL) {
 114         error_propagate(errp, local_err);
 115         return;
 116     }
 117
 118     cpu_reset(cs);
 119     qemu_init_vcpu(cs);
 120
 121     ccc->parent_realize(dev, errp);
 122 }
 123
 124 #ifndef CONFIG_USER_ONLY
 125 static void cris_cpu_set_irq(void *opaque, int irq, int level)
 126 {
 127     CRISCPU *cpu = opaque;
 128     CPUState *cs = CPU(cpu);
 129     int type = irq == CRIS_CPU_IRQ ? CPU_INTERRUPT_HARD : CPU_INTERRUPT_NMI;
 130
 131     if (irq == CRIS_CPU_IRQ) {
 132         /*
 133          * The PIC passes us the vector for the IRQ as the value it sends
 134          * over the qemu_irq line
 135          */
 136         cpu->env.interrupt_vector = level;
 137     }
 138
 139     if (level) {
 140         cpu_interrupt(cs, type);
 141     } else {
 142         cpu_reset_interrupt(cs, type);
 143     }
 144 }
 145 #endif
 146
 147 static void cris_disas_set_info(CPUState *cpu, disassemble_info *info)
 148 {
 149     if (cpu_env(cpu)->pregs[PR_VR] != 32) {
 150         info->mach = bfd_mach_cris_v0_v10;
 151         info->print_insn = print_insn_crisv10;
 152     } else {
 153         info->mach = bfd_mach_cris_v32;
 154         info->print_insn = print_insn_crisv32;
 155     }
 156 }
 157
 158 static void cris_cpu_initfn(Object *obj)
 159 {
 160     CRISCPU *cpu = CRIS_CPU(obj);
 161     CRISCPUClass *ccc = CRIS_CPU_GET_CLASS(obj);
 162     CPUCRISState *env = &cpu->env;
 163
 164     env->pregs[PR_VR] = ccc->vr;
 165
 166 #ifndef CONFIG_USER_ONLY
 167     /* IRQ and NMI lines.  */
 168     qdev_init_gpio_in(DEVICE(cpu), cris_cpu_set_irq, 2);
 169 #endif
 170 }
 171
 172 #ifndef CONFIG_USER_ONLY
 173 #include "hw/core/sysemu-cpu-ops.h"
 174
 175 static const struct SysemuCPUOps cris_sysemu_ops = {
 176     .get_phys_page_debug = cris_cpu_get_phys_page_debug,
 177 };
 178 #endif
 179
 180 #include "hw/core/tcg-cpu-ops.h"
 181
 182 static const TCGCPUOps crisv10_tcg_ops = {
 183     .initialize = cris_initialize_crisv10_tcg,
 184     .restore_state_to_opc = cris_restore_state_to_opc,
 185
 186 #ifndef CONFIG_USER_ONLY
 187     .tlb_fill = cris_cpu_tlb_fill,
 188     .cpu_exec_interrupt = cris_cpu_exec_interrupt,
 189     .cpu_exec_halt = cris_cpu_has_work,
 190     .do_interrupt = crisv10_cpu_do_interrupt,
 191 #endif /* !CONFIG_USER_ONLY */
 192 };
 193
 194 static const TCGCPUOps crisv32_tcg_ops = {
 195     .initialize = cris_initialize_tcg,
 196     .restore_state_to_opc = cris_restore_state_to_opc,
 197
 198 #ifndef CONFIG_USER_ONLY
 199     .tlb_fill = cris_cpu_tlb_fill,
 200     .cpu_exec_interrupt = cris_cpu_exec_interrupt,
 201     .cpu_exec_halt = cris_cpu_has_work,
 202     .do_interrupt = cris_cpu_do_interrupt,
 203 #endif /* !CONFIG_USER_ONLY */
 204 };
 205
 206 static void crisv8_cpu_class_init(ObjectClass *oc, void *data)
 207 {
 208     CPUClass *cc = CPU_CLASS(oc);
 209     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 210
 211     ccc->vr = 8;
 212     cc->gdb_read_register = crisv10_cpu_gdb_read_register;
 213     cc->tcg_ops = &crisv10_tcg_ops;
 214 }
 215
 216 static void crisv9_cpu_class_init(ObjectClass *oc, void *data)
 217 {
 218     CPUClass *cc = CPU_CLASS(oc);
 219     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 220
 221     ccc->vr = 9;
 222     cc->gdb_read_register = crisv10_cpu_gdb_read_register;
 223     cc->tcg_ops = &crisv10_tcg_ops;
 224 }
 225
 226 static void crisv10_cpu_class_init(ObjectClass *oc, void *data)
 227 {
 228     CPUClass *cc = CPU_CLASS(oc);
 229     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 230
 231     ccc->vr = 10;
 232     cc->gdb_read_register = crisv10_cpu_gdb_read_register;
 233     cc->tcg_ops = &crisv10_tcg_ops;
 234 }
 235
 236 static void crisv11_cpu_class_init(ObjectClass *oc, void *data)
 237 {
 238     CPUClass *cc = CPU_CLASS(oc);
 239     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 240
 241     ccc->vr = 11;
 242     cc->gdb_read_register = crisv10_cpu_gdb_read_register;
 243     cc->tcg_ops = &crisv10_tcg_ops;
 244 }
 245
 246 static void crisv17_cpu_class_init(ObjectClass *oc, void *data)
 247 {
 248     CPUClass *cc = CPU_CLASS(oc);
 249     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 250
 251     ccc->vr = 17;
 252     cc->gdb_read_register = crisv10_cpu_gdb_read_register;
 253     cc->tcg_ops = &crisv10_tcg_ops;
 254 }
 255
 256 static void crisv32_cpu_class_init(ObjectClass *oc, void *data)
 257 {
 258     CPUClass *cc = CPU_CLASS(oc);
 259     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 260
 261     ccc->vr = 32;
 262     cc->tcg_ops = &crisv32_tcg_ops;
 263 }
 264
 265 static void cris_cpu_class_init(ObjectClass *oc, void *data)
 266 {
 267     DeviceClass *dc = DEVICE_CLASS(oc);
 268     CPUClass *cc = CPU_CLASS(oc);
 269     CRISCPUClass *ccc = CRIS_CPU_CLASS(oc);
 270     ResettableClass *rc = RESETTABLE_CLASS(oc);
 271
 272     device_class_set_parent_realize(dc, cris_cpu_realizefn,
 273                                     &ccc->parent_realize);
 274
 275     resettable_class_set_parent_phases(rc, NULL, cris_cpu_reset_hold, NULL,
 276                                        &ccc->parent_phases);
 277
 278     cc->class_by_name = cris_cpu_class_by_name;
 279     cc->has_work = cris_cpu_has_work;
 280     cc->mmu_index = cris_cpu_mmu_index;
 281     cc->dump_state = cris_cpu_dump_state;
 282     cc->set_pc = cris_cpu_set_pc;
 283     cc->get_pc = cris_cpu_get_pc;
 284     cc->gdb_read_register = cris_cpu_gdb_read_register;
 285     cc->gdb_write_register = cris_cpu_gdb_write_register;
 286 #ifndef CONFIG_USER_ONLY
 287     dc->vmsd = &vmstate_cris_cpu;
 288     cc->sysemu_ops = &cris_sysemu_ops;
 289 #endif
 290
 291     cc->gdb_num_core_regs = 49;
 292     cc->gdb_stop_before_watchpoint = true;
 293
 294     cc->disas_set_info = cris_disas_set_info;
 295 }
 296
 297 #define DEFINE_CRIS_CPU_TYPE(cpu_model, initfn) \
 298      {                                          \
 299          .parent = TYPE_CRIS_CPU,               \
 300          .class_init = initfn,                  \
 301          .name = CRIS_CPU_TYPE_NAME(cpu_model), \
 302      }
 303
 304 static const TypeInfo cris_cpu_model_type_infos[] = {
 305     {
 306         .name = TYPE_CRIS_CPU,
 307         .parent = TYPE_CPU,
 308         .instance_size = sizeof(CRISCPU),
 309         .instance_align = __alignof(CRISCPU),
 310         .instance_init = cris_cpu_initfn,
 311         .abstract = true,
 312         .class_size = sizeof(CRISCPUClass),
 313         .class_init = cris_cpu_class_init,
 314     },
 315     DEFINE_CRIS_CPU_TYPE("crisv8", crisv8_cpu_class_init),
 316     DEFINE_CRIS_CPU_TYPE("crisv9", crisv9_cpu_class_init),
 317     DEFINE_CRIS_CPU_TYPE("crisv10", crisv10_cpu_class_init),
 318     DEFINE_CRIS_CPU_TYPE("crisv11", crisv11_cpu_class_init),
 319     DEFINE_CRIS_CPU_TYPE("crisv17", crisv17_cpu_class_init),
 320     DEFINE_CRIS_CPU_TYPE("crisv32", crisv32_cpu_class_init),
 321 };
 322
 323 DEFINE_TYPES(cris_cpu_model_type_infos)