1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21#include "qemu/osdep.h"
22#include "qapi/error.h"
23#include "cpu.h"
24#include "qemu-common.h"
25#include "exec/exec-all.h"
26
27
28static void hppa_cpu_set_pc(CPUState *cs, vaddr value)
29{
30 HPPACPU *cpu = HPPA_CPU(cs);
31
32 cpu->env.iaoq_f = value;
33 cpu->env.iaoq_b = value + 4;
34}
35
36static void hppa_cpu_synchronize_from_tb(CPUState *cs, TranslationBlock *tb)
37{
38 HPPACPU *cpu = HPPA_CPU(cs);
39
40 cpu->env.iaoq_f = tb->pc;
41 cpu->env.iaoq_b = tb->cs_base;
42 cpu->env.psw_n = tb->flags & 1;
43}
44
45static void hppa_cpu_disas_set_info(CPUState *cs, disassemble_info *info)
46{
47 info->mach = bfd_mach_hppa20;
48 info->print_insn = print_insn_hppa;
49}
50
51static void hppa_cpu_realizefn(DeviceState *dev, Error **errp)
52{
53 CPUState *cs = CPU(dev);
54 HPPACPUClass *acc = HPPA_CPU_GET_CLASS(dev);
55 Error *local_err = NULL;
56
57 cpu_exec_realizefn(cs, &local_err);
58 if (local_err != NULL) {
59 error_propagate(errp, local_err);
60 return;
61 }
62
63 qemu_init_vcpu(cs);
64 acc->parent_realize(dev, errp);
65}
66
67
68static gint hppa_cpu_list_compare(gconstpointer a, gconstpointer b)
69{
70 ObjectClass *class_a = (ObjectClass *)a;
71 ObjectClass *class_b = (ObjectClass *)b;
72 const char *name_a, *name_b;
73
74 name_a = object_class_get_name(class_a);
75 name_b = object_class_get_name(class_b);
76 return strcmp(name_a, name_b);
77}
78
79static void hppa_cpu_list_entry(gpointer data, gpointer user_data)
80{
81 ObjectClass *oc = data;
82 CPUListState *s = user_data;
83
84 (*s->cpu_fprintf)(s->file, " %s\n", object_class_get_name(oc));
85}
86
87void hppa_cpu_list(FILE *f, fprintf_function cpu_fprintf)
88{
89 CPUListState s = {
90 .file = f,
91 .cpu_fprintf = cpu_fprintf,
92 };
93 GSList *list;
94
95 list = object_class_get_list(TYPE_HPPA_CPU, false);
96 list = g_slist_sort(list, hppa_cpu_list_compare);
97 (*cpu_fprintf)(f, "Available CPUs:\n");
98 g_slist_foreach(list, hppa_cpu_list_entry, &s);
99 g_slist_free(list);
100}
101
102static void hppa_cpu_initfn(Object *obj)
103{
104 CPUState *cs = CPU(obj);
105 HPPACPU *cpu = HPPA_CPU(obj);
106 CPUHPPAState *env = &cpu->env;
107
108 cs->env_ptr = env;
109 cpu_hppa_loaded_fr0(env);
110 set_snan_bit_is_one(true, &env->fp_status);
111
112 hppa_translate_init();
113}
114
115HPPACPU *cpu_hppa_init(const char *cpu_model)
116{
117 HPPACPU *cpu;
118
119 cpu = HPPA_CPU(object_new(TYPE_HPPA_CPU));
120
121 object_property_set_bool(OBJECT(cpu), true, "realized", NULL);
122
123 return cpu;
124}
125
126static void hppa_cpu_class_init(ObjectClass *oc, void *data)
127{
128 DeviceClass *dc = DEVICE_CLASS(oc);
129 CPUClass *cc = CPU_CLASS(oc);
130 HPPACPUClass *acc = HPPA_CPU_CLASS(oc);
131
132 acc->parent_realize = dc->realize;
133 dc->realize = hppa_cpu_realizefn;
134
135 cc->do_interrupt = hppa_cpu_do_interrupt;
136 cc->cpu_exec_interrupt = hppa_cpu_exec_interrupt;
137 cc->dump_state = hppa_cpu_dump_state;
138 cc->set_pc = hppa_cpu_set_pc;
139 cc->synchronize_from_tb = hppa_cpu_synchronize_from_tb;
140 cc->gdb_read_register = hppa_cpu_gdb_read_register;
141 cc->gdb_write_register = hppa_cpu_gdb_write_register;
142 cc->handle_mmu_fault = hppa_cpu_handle_mmu_fault;
143 cc->disas_set_info = hppa_cpu_disas_set_info;
144
145 cc->gdb_num_core_regs = 128;
146}
147
148static const TypeInfo hppa_cpu_type_info = {
149 .name = TYPE_HPPA_CPU,
150 .parent = TYPE_CPU,
151 .instance_size = sizeof(HPPACPU),
152 .instance_init = hppa_cpu_initfn,
153 .abstract = false,
154 .class_size = sizeof(HPPACPUClass),
155 .class_init = hppa_cpu_class_init,
156};
157
158static void hppa_cpu_register_types(void)
159{
160 type_register_static(&hppa_cpu_type_info);
161}
162
163type_init(hppa_cpu_register_types)
164