]> git.proxmox.com Git - mirror_qemu.git/blob - target/arm/monitor.c
Merge remote-tracking branch 'remotes/ehabkost-gl/tags/machine-next-pull-request...
[mirror_qemu.git] / target / arm / monitor.c
1 /*
2 * QEMU monitor.c for ARM.
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a copy
5 * of this software and associated documentation files (the "Software"), to deal
6 * in the Software without restriction, including without limitation the rights
7 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
8 * copies of the Software, and to permit persons to whom the Software is
9 * furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice shall be included in
12 * all copies or substantial portions of the Software.
13 *
14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
17 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
18 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
19 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
20 * THE SOFTWARE.
21 */
22
23 #include "qemu/osdep.h"
24 #include "hw/boards.h"
25 #include "kvm_arm.h"
26 #include "qapi/error.h"
27 #include "qapi/visitor.h"
28 #include "qapi/qobject-input-visitor.h"
29 #include "qapi/qapi-commands-machine-target.h"
30 #include "qapi/qapi-commands-misc-target.h"
31 #include "qapi/qmp/qerror.h"
32 #include "qapi/qmp/qdict.h"
33 #include "qom/qom-qobject.h"
34
35 static GICCapability *gic_cap_new(int version)
36 {
37 GICCapability *cap = g_new0(GICCapability, 1);
38 cap->version = version;
39 /* by default, support none */
40 cap->emulated = false;
41 cap->kernel = false;
42 return cap;
43 }
44
45 static inline void gic_cap_kvm_probe(GICCapability *v2, GICCapability *v3)
46 {
47 #ifdef CONFIG_KVM
48 int fdarray[3];
49
50 if (!kvm_arm_create_scratch_host_vcpu(NULL, fdarray, NULL)) {
51 return;
52 }
53
54 /* Test KVM GICv2 */
55 if (kvm_device_supported(fdarray[1], KVM_DEV_TYPE_ARM_VGIC_V2)) {
56 v2->kernel = true;
57 }
58
59 /* Test KVM GICv3 */
60 if (kvm_device_supported(fdarray[1], KVM_DEV_TYPE_ARM_VGIC_V3)) {
61 v3->kernel = true;
62 }
63
64 kvm_arm_destroy_scratch_host_vcpu(fdarray);
65 #endif
66 }
67
68 GICCapabilityList *qmp_query_gic_capabilities(Error **errp)
69 {
70 GICCapabilityList *head = NULL;
71 GICCapability *v2 = gic_cap_new(2), *v3 = gic_cap_new(3);
72
73 v2->emulated = true;
74 v3->emulated = true;
75
76 gic_cap_kvm_probe(v2, v3);
77
78 QAPI_LIST_PREPEND(head, v2);
79 QAPI_LIST_PREPEND(head, v3);
80
81 return head;
82 }
83
84 QEMU_BUILD_BUG_ON(ARM_MAX_VQ > 16);
85
86 /*
87 * These are cpu model features we want to advertise. The order here
88 * matters as this is the order in which qmp_query_cpu_model_expansion
89 * will attempt to set them. If there are dependencies between features,
90 * then the order that considers those dependencies must be used.
91 */
92 static const char *cpu_model_advertised_features[] = {
93 "aarch64", "pmu", "sve",
94 "sve128", "sve256", "sve384", "sve512",
95 "sve640", "sve768", "sve896", "sve1024", "sve1152", "sve1280",
96 "sve1408", "sve1536", "sve1664", "sve1792", "sve1920", "sve2048",
97 "kvm-no-adjvtime", "kvm-steal-time",
98 NULL
99 };
100
101 CpuModelExpansionInfo *qmp_query_cpu_model_expansion(CpuModelExpansionType type,
102 CpuModelInfo *model,
103 Error **errp)
104 {
105 CpuModelExpansionInfo *expansion_info;
106 const QDict *qdict_in = NULL;
107 QDict *qdict_out;
108 ObjectClass *oc;
109 Object *obj;
110 const char *name;
111 int i;
112
113 if (type != CPU_MODEL_EXPANSION_TYPE_FULL) {
114 error_setg(errp, "The requested expansion type is not supported");
115 return NULL;
116 }
117
118 if (!kvm_enabled() && !strcmp(model->name, "host")) {
119 error_setg(errp, "The CPU type '%s' requires KVM", model->name);
120 return NULL;
121 }
122
123 oc = cpu_class_by_name(TYPE_ARM_CPU, model->name);
124 if (!oc) {
125 error_setg(errp, "The CPU type '%s' is not a recognized ARM CPU type",
126 model->name);
127 return NULL;
128 }
129
130 if (kvm_enabled()) {
131 bool supported = false;
132
133 if (!strcmp(model->name, "host") || !strcmp(model->name, "max")) {
134 /* These are kvmarm's recommended cpu types */
135 supported = true;
136 } else if (current_machine->cpu_type) {
137 const char *cpu_type = current_machine->cpu_type;
138 int len = strlen(cpu_type) - strlen(ARM_CPU_TYPE_SUFFIX);
139
140 if (strlen(model->name) == len &&
141 !strncmp(model->name, cpu_type, len)) {
142 /* KVM is enabled and we're using this type, so it works. */
143 supported = true;
144 }
145 }
146 if (!supported) {
147 error_setg(errp, "We cannot guarantee the CPU type '%s' works "
148 "with KVM on this host", model->name);
149 return NULL;
150 }
151 }
152
153 if (model->props) {
154 qdict_in = qobject_to(QDict, model->props);
155 if (!qdict_in) {
156 error_setg(errp, QERR_INVALID_PARAMETER_TYPE, "props", "dict");
157 return NULL;
158 }
159 }
160
161 obj = object_new(object_class_get_name(oc));
162
163 if (qdict_in) {
164 Visitor *visitor;
165 Error *err = NULL;
166
167 visitor = qobject_input_visitor_new(model->props);
168 if (!visit_start_struct(visitor, NULL, NULL, 0, errp)) {
169 visit_free(visitor);
170 object_unref(obj);
171 return NULL;
172 }
173
174 i = 0;
175 while ((name = cpu_model_advertised_features[i++]) != NULL) {
176 if (qdict_get(qdict_in, name)) {
177 if (!object_property_set(obj, name, visitor, &err)) {
178 break;
179 }
180 }
181 }
182
183 if (!err) {
184 visit_check_struct(visitor, &err);
185 }
186 if (!err) {
187 arm_cpu_finalize_features(ARM_CPU(obj), &err);
188 }
189 visit_end_struct(visitor, NULL);
190 visit_free(visitor);
191 if (err) {
192 object_unref(obj);
193 error_propagate(errp, err);
194 return NULL;
195 }
196 } else {
197 arm_cpu_finalize_features(ARM_CPU(obj), &error_abort);
198 }
199
200 expansion_info = g_new0(CpuModelExpansionInfo, 1);
201 expansion_info->model = g_malloc0(sizeof(*expansion_info->model));
202 expansion_info->model->name = g_strdup(model->name);
203
204 qdict_out = qdict_new();
205
206 i = 0;
207 while ((name = cpu_model_advertised_features[i++]) != NULL) {
208 ObjectProperty *prop = object_property_find(obj, name);
209 if (prop) {
210 QObject *value;
211
212 assert(prop->get);
213 value = object_property_get_qobject(obj, name, &error_abort);
214
215 qdict_put_obj(qdict_out, name, value);
216 }
217 }
218
219 if (!qdict_size(qdict_out)) {
220 qobject_unref(qdict_out);
221 } else {
222 expansion_info->model->props = QOBJECT(qdict_out);
223 expansion_info->model->has_props = true;
224 }
225
226 object_unref(obj);
227
228 return expansion_info;
229 }