1 /*
2 * i386 CPUID, CPU class, definitions, models: sysemu-only code
3 *
4 * Copyright (c) 2003 Fabrice Bellard
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.1 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 "cpu.h"
22 #include "qapi/error.h"
23 #include "qapi/qapi-visit-run-state.h"
24 #include "qapi/qmp/qdict.h"
25 #include "qapi/qobject-input-visitor.h"
26 #include "qom/qom-qobject.h"
27 #include "qapi/qapi-commands-machine-target.h"
28
29 #include "cpu-internal.h"
30
31 /* Return a QDict containing keys for all properties that can be included
32 * in static expansion of CPU models. All properties set by x86_cpu_load_model()
33 * must be included in the dictionary.
34 */
x86_cpu_static_props(void)35 static QDict *x86_cpu_static_props(void)
36 {
37 FeatureWord w;
38 int i;
39 static const char *props[] = {
40 "min-level",
41 "min-xlevel",
42 "family",
43 "model",
44 "stepping",
45 "model-id",
46 "vendor",
47 "lmce",
48 NULL,
49 };
50 static QDict *d;
51
52 if (d) {
53 return d;
54 }
55
56 d = qdict_new();
57 for (i = 0; props[i]; i++) {
58 qdict_put_null(d, props[i]);
59 }
60
61 for (w = 0; w < FEATURE_WORDS; w++) {
62 FeatureWordInfo *fi = &feature_word_info[w];
63 int bit;
64 for (bit = 0; bit < 64; bit++) {
65 if (!fi->feat_names[bit]) {
66 continue;
67 }
68 qdict_put_null(d, fi->feat_names[bit]);
69 }
70 }
71
72 return d;
73 }
74
75 /* Add an entry to @props dict, with the value for property. */
x86_cpu_expand_prop(X86CPU * cpu,QDict * props,const char * prop)76 static void x86_cpu_expand_prop(X86CPU *cpu, QDict *props, const char *prop)
77 {
78 QObject *value = object_property_get_qobject(OBJECT(cpu), prop,
79 &error_abort);
80
81 qdict_put_obj(props, prop, value);
82 }
83
84 /* Convert CPU model data from X86CPU object to a property dictionary
85 * that can recreate exactly the same CPU model.
86 */
x86_cpu_to_dict(X86CPU * cpu,QDict * props)87 static void x86_cpu_to_dict(X86CPU *cpu, QDict *props)
88 {
89 QDict *sprops = x86_cpu_static_props();
90 const QDictEntry *e;
91
92 for (e = qdict_first(sprops); e; e = qdict_next(sprops, e)) {
93 const char *prop = qdict_entry_key(e);
94 x86_cpu_expand_prop(cpu, props, prop);
95 }
96 }
97
98 /* Convert CPU model data from X86CPU object to a property dictionary
99 * that can recreate exactly the same CPU model, including every
100 * writable QOM property.
101 */
x86_cpu_to_dict_full(X86CPU * cpu,QDict * props)102 static void x86_cpu_to_dict_full(X86CPU *cpu, QDict *props)
103 {
104 ObjectPropertyIterator iter;
105 ObjectProperty *prop;
106
107 object_property_iter_init(&iter, OBJECT(cpu));
108 while ((prop = object_property_iter_next(&iter))) {
109 /* skip read-only or write-only properties */
110 if (!prop->get || !prop->set) {
111 continue;
112 }
113
114 /* "hotplugged" is the only property that is configurable
115 * on the command-line but will be set differently on CPUs
116 * created using "-cpu ... -smp ..." and by CPUs created
117 * on the fly by x86_cpu_from_model() for querying. Skip it.
118 */
119 if (!strcmp(prop->name, "hotplugged")) {
120 continue;
121 }
122 x86_cpu_expand_prop(cpu, props, prop->name);
123 }
124 }
125
object_apply_props(Object * obj,QObject * props,const char * props_arg_name,Error ** errp)126 static void object_apply_props(Object *obj, QObject *props,
127 const char *props_arg_name, Error **errp)
128 {
129 Visitor *visitor;
130 QDict *qdict;
131 const QDictEntry *prop;
132
133 visitor = qobject_input_visitor_new(props);
134 if (!visit_start_struct(visitor, props_arg_name, NULL, 0, errp)) {
135 visit_free(visitor);
136 return;
137 }
138
139 qdict = qobject_to(QDict, props);
140 for (prop = qdict_first(qdict); prop; prop = qdict_next(qdict, prop)) {
141 if (!object_property_set(obj, qdict_entry_key(prop),
142 visitor, errp)) {
143 goto out;
144 }
145 }
146
147 visit_check_struct(visitor, errp);
148 out:
149 visit_end_struct(visitor, NULL);
150 visit_free(visitor);
151 }
152
153 /* Create X86CPU object according to model+props specification */
x86_cpu_from_model(const char * model,QObject * props,const char * props_arg_name,Error ** errp)154 static X86CPU *x86_cpu_from_model(const char *model, QObject *props,
155 const char *props_arg_name, Error **errp)
156 {
157 X86CPU *xc = NULL;
158 X86CPUClass *xcc;
159 Error *err = NULL;
160
161 xcc = X86_CPU_CLASS(cpu_class_by_name(TYPE_X86_CPU, model));
162 if (xcc == NULL) {
163 error_setg(&err, "CPU model '%s' not found", model);
164 goto out;
165 }
166
167 xc = X86_CPU(object_new_with_class(OBJECT_CLASS(xcc)));
168 if (props) {
169 object_apply_props(OBJECT(xc), props, props_arg_name, &err);
170 if (err) {
171 goto out;
172 }
173 }
174
175 x86_cpu_expand_features(xc, &err);
176 if (err) {
177 goto out;
178 }
179
180 out:
181 if (err) {
182 error_propagate(errp, err);
183 object_unref(OBJECT(xc));
184 xc = NULL;
185 }
186 return xc;
187 }
188
189 CpuModelExpansionInfo *
qmp_query_cpu_model_expansion(CpuModelExpansionType type,CpuModelInfo * model,Error ** errp)190 qmp_query_cpu_model_expansion(CpuModelExpansionType type,
191 CpuModelInfo *model,
192 Error **errp)
193 {
194 X86CPU *xc = NULL;
195 Error *err = NULL;
196 CpuModelExpansionInfo *ret = g_new0(CpuModelExpansionInfo, 1);
197 QDict *props = NULL;
198 const char *base_name;
199
200 xc = x86_cpu_from_model(model->name, model->props, "model.props", &err);
201 if (err) {
202 goto out;
203 }
204
205 props = qdict_new();
206 ret->model = g_new0(CpuModelInfo, 1);
207 ret->model->props = QOBJECT(props);
208
209 switch (type) {
210 case CPU_MODEL_EXPANSION_TYPE_STATIC:
211 /* Static expansion will be based on "base" only */
212 base_name = "base";
213 x86_cpu_to_dict(xc, props);
214 break;
215 case CPU_MODEL_EXPANSION_TYPE_FULL:
216 /* As we don't return every single property, full expansion needs
217 * to keep the original model name+props, and add extra
218 * properties on top of that.
219 */
220 base_name = model->name;
221 x86_cpu_to_dict_full(xc, props);
222 break;
223 default:
224 error_setg(&err, "Unsupported expansion type");
225 goto out;
226 }
227
228 x86_cpu_to_dict(xc, props);
229
230 ret->model->name = g_strdup(base_name);
231
232 out:
233 object_unref(OBJECT(xc));
234 if (err) {
235 error_propagate(errp, err);
236 qapi_free_CpuModelExpansionInfo(ret);
237 ret = NULL;
238 }
239 return ret;
240 }
241
cpu_clear_apic_feature(CPUX86State * env)242 void cpu_clear_apic_feature(CPUX86State *env)
243 {
244 env->features[FEAT_1_EDX] &= ~CPUID_APIC;
245 }
246
cpu_set_apic_feature(CPUX86State * env)247 void cpu_set_apic_feature(CPUX86State *env)
248 {
249 env->features[FEAT_1_EDX] |= CPUID_APIC;
250 }
251
cpu_has_x2apic_feature(CPUX86State * env)252 bool cpu_has_x2apic_feature(CPUX86State *env)
253 {
254 return env->features[FEAT_1_ECX] & CPUID_EXT_X2APIC;
255 }
256
cpu_is_bsp(X86CPU * cpu)257 bool cpu_is_bsp(X86CPU *cpu)
258 {
259 return cpu_get_apic_base(cpu->apic_state) & MSR_IA32_APICBASE_BSP;
260 }
261
262 /* TODO: remove me, when reset over QOM tree is implemented */
x86_cpu_machine_reset_cb(void * opaque)263 void x86_cpu_machine_reset_cb(void *opaque)
264 {
265 X86CPU *cpu = opaque;
266 cpu_reset(CPU(cpu));
267 }
268
x86_cpu_get_crash_info(CPUState * cs)269 GuestPanicInformation *x86_cpu_get_crash_info(CPUState *cs)
270 {
271 X86CPU *cpu = X86_CPU(cs);
272 CPUX86State *env = &cpu->env;
273 GuestPanicInformation *panic_info = NULL;
274
275 if (hyperv_feat_enabled(cpu, HYPERV_FEAT_CRASH)) {
276 panic_info = g_new0(GuestPanicInformation, 1);
277
278 panic_info->type = GUEST_PANIC_INFORMATION_TYPE_HYPER_V;
279
280 assert(HV_CRASH_PARAMS >= 5);
281 panic_info->u.hyper_v.arg1 = env->msr_hv_crash_params[0];
282 panic_info->u.hyper_v.arg2 = env->msr_hv_crash_params[1];
283 panic_info->u.hyper_v.arg3 = env->msr_hv_crash_params[2];
284 panic_info->u.hyper_v.arg4 = env->msr_hv_crash_params[3];
285 panic_info->u.hyper_v.arg5 = env->msr_hv_crash_params[4];
286 }
287
288 return panic_info;
289 }
x86_cpu_get_crash_info_qom(Object * obj,Visitor * v,const char * name,void * opaque,Error ** errp)290 void x86_cpu_get_crash_info_qom(Object *obj, Visitor *v,
291 const char *name, void *opaque,
292 Error **errp)
293 {
294 CPUState *cs = CPU(obj);
295 GuestPanicInformation *panic_info;
296
297 if (!cs->crash_occurred) {
298 error_setg(errp, "No crash occurred");
299 return;
300 }
301
302 panic_info = x86_cpu_get_crash_info(cs);
303 if (panic_info == NULL) {
304 error_setg(errp, "No crash information");
305 return;
306 }
307
308 visit_type_GuestPanicInformation(v, "crash-information", &panic_info,
309 errp);
310 qapi_free_GuestPanicInformation(panic_info);
311 }
312