]>
Commit | Line | Data |
---|---|---|
48a32bed AL |
1 | /* |
2 | * QEMU Management Protocol | |
3 | * | |
4 | * Copyright IBM, Corp. 2011 | |
5 | * | |
6 | * Authors: | |
7 | * Anthony Liguori <aliguori@us.ibm.com> | |
8 | * | |
9 | * This work is licensed under the terms of the GNU GPL, version 2. See | |
10 | * the COPYING file in the top-level directory. | |
11 | * | |
6b620ca3 PB |
12 | * Contributions after 2012-01-13 are licensed under the terms of the |
13 | * GNU GPL, version 2 or (at your option) any later version. | |
48a32bed AL |
14 | */ |
15 | ||
d38ea87a | 16 | #include "qemu/osdep.h" |
f348b6d1 | 17 | #include "qemu/cutils.h" |
a0b1a66e | 18 | #include "monitor/monitor.h" |
9c17d615 | 19 | #include "sysemu/sysemu.h" |
48a32bed | 20 | #include "qmp-commands.h" |
dccfcd0e | 21 | #include "sysemu/char.h" |
fbf796fd LC |
22 | #include "ui/qemu-spice.h" |
23 | #include "ui/vnc.h" | |
9c17d615 PB |
24 | #include "sysemu/kvm.h" |
25 | #include "sysemu/arch_init.h" | |
b4b12c62 | 26 | #include "hw/qdev.h" |
9c17d615 | 27 | #include "sysemu/blockdev.h" |
373340b2 | 28 | #include "sysemu/block-backend.h" |
14cccb61 | 29 | #include "qom/qom-qobject.h" |
cc7a8ea7 | 30 | #include "qapi/qmp/qerror.h" |
cff8b2c6 PB |
31 | #include "qapi/qmp/qobject.h" |
32 | #include "qapi/qmp-input-visitor.h" | |
69ca3ea5 | 33 | #include "hw/boards.h" |
269e09f3 | 34 | #include "qom/object_interfaces.h" |
6f2e2730 | 35 | #include "hw/mem/pc-dimm.h" |
02419bcb | 36 | #include "hw/acpi/acpi_dev_interface.h" |
48a32bed AL |
37 | |
38 | NameInfo *qmp_query_name(Error **errp) | |
39 | { | |
40 | NameInfo *info = g_malloc0(sizeof(*info)); | |
41 | ||
42 | if (qemu_name) { | |
43 | info->has_name = true; | |
44 | info->name = g_strdup(qemu_name); | |
45 | } | |
46 | ||
47 | return info; | |
48 | } | |
b9c15f16 | 49 | |
7daecb30 | 50 | VersionInfo *qmp_query_version(Error **errp) |
b9c15f16 | 51 | { |
4752cdbb | 52 | VersionInfo *info = g_new0(VersionInfo, 1); |
b9c15f16 | 53 | const char *version = QEMU_VERSION; |
d4ba8cb0 CT |
54 | const char *tmp; |
55 | int err; | |
b9c15f16 | 56 | |
4752cdbb | 57 | info->qemu = g_new0(VersionTriple, 1); |
d4ba8cb0 CT |
58 | err = qemu_strtoll(version, &tmp, 10, &info->qemu->major); |
59 | assert(err == 0); | |
b9c15f16 | 60 | tmp++; |
d4ba8cb0 CT |
61 | |
62 | err = qemu_strtoll(tmp, &tmp, 10, &info->qemu->minor); | |
63 | assert(err == 0); | |
b9c15f16 | 64 | tmp++; |
d4ba8cb0 CT |
65 | |
66 | err = qemu_strtoll(tmp, &tmp, 10, &info->qemu->micro); | |
67 | assert(err == 0); | |
b9c15f16 LC |
68 | info->package = g_strdup(QEMU_PKGVERSION); |
69 | ||
70 | return info; | |
71 | } | |
292a2602 LC |
72 | |
73 | KvmInfo *qmp_query_kvm(Error **errp) | |
74 | { | |
75 | KvmInfo *info = g_malloc0(sizeof(*info)); | |
76 | ||
77 | info->enabled = kvm_enabled(); | |
78 | info->present = kvm_available(); | |
79 | ||
80 | return info; | |
81 | } | |
82 | ||
efab767e LC |
83 | UuidInfo *qmp_query_uuid(Error **errp) |
84 | { | |
85 | UuidInfo *info = g_malloc0(sizeof(*info)); | |
86 | char uuid[64]; | |
87 | ||
88 | snprintf(uuid, sizeof(uuid), UUID_FMT, qemu_uuid[0], qemu_uuid[1], | |
89 | qemu_uuid[2], qemu_uuid[3], qemu_uuid[4], qemu_uuid[5], | |
90 | qemu_uuid[6], qemu_uuid[7], qemu_uuid[8], qemu_uuid[9], | |
91 | qemu_uuid[10], qemu_uuid[11], qemu_uuid[12], qemu_uuid[13], | |
92 | qemu_uuid[14], qemu_uuid[15]); | |
93 | ||
94 | info->UUID = g_strdup(uuid); | |
95 | return info; | |
96 | } | |
97 | ||
7daecb30 | 98 | void qmp_quit(Error **errp) |
7a7f325e LC |
99 | { |
100 | no_shutdown = 0; | |
101 | qemu_system_shutdown_request(); | |
102 | } | |
103 | ||
5f158f21 LC |
104 | void qmp_stop(Error **errp) |
105 | { | |
65d64f36 PX |
106 | /* if there is a dump in background, we should wait until the dump |
107 | * finished */ | |
108 | if (dump_in_progress()) { | |
109 | error_setg(errp, "There is a dump in process, please wait."); | |
110 | return; | |
111 | } | |
112 | ||
1e998146 PB |
113 | if (runstate_check(RUN_STATE_INMIGRATE)) { |
114 | autostart = 0; | |
115 | } else { | |
116 | vm_stop(RUN_STATE_PAUSED); | |
117 | } | |
5f158f21 LC |
118 | } |
119 | ||
38d22653 LC |
120 | void qmp_system_reset(Error **errp) |
121 | { | |
122 | qemu_system_reset_request(); | |
123 | } | |
5bc465e4 LC |
124 | |
125 | void qmp_system_powerdown(Error **erp) | |
126 | { | |
127 | qemu_system_powerdown_request(); | |
128 | } | |
755f1968 LC |
129 | |
130 | void qmp_cpu(int64_t index, Error **errp) | |
131 | { | |
132 | /* Just do nothing */ | |
133 | } | |
2b54aa87 | 134 | |
69ca3ea5 IM |
135 | void qmp_cpu_add(int64_t id, Error **errp) |
136 | { | |
0056ae24 MA |
137 | MachineClass *mc; |
138 | ||
139 | mc = MACHINE_GET_CLASS(current_machine); | |
958db90c MA |
140 | if (mc->hot_add_cpu) { |
141 | mc->hot_add_cpu(id, errp); | |
69ca3ea5 IM |
142 | } else { |
143 | error_setg(errp, "Not supported"); | |
144 | } | |
145 | } | |
146 | ||
2b54aa87 LC |
147 | #ifndef CONFIG_VNC |
148 | /* If VNC support is enabled, the "true" query-vnc command is | |
149 | defined in the VNC subsystem */ | |
150 | VncInfo *qmp_query_vnc(Error **errp) | |
151 | { | |
c6bd8c70 | 152 | error_setg(errp, QERR_FEATURE_DISABLED, "vnc"); |
2b54aa87 LC |
153 | return NULL; |
154 | }; | |
89db2177 LY |
155 | |
156 | VncInfo2List *qmp_query_vnc_servers(Error **errp) | |
157 | { | |
c6bd8c70 | 158 | error_setg(errp, QERR_FEATURE_DISABLED, "vnc"); |
89db2177 LY |
159 | return NULL; |
160 | }; | |
2b54aa87 | 161 | #endif |
d1f29646 LC |
162 | |
163 | #ifndef CONFIG_SPICE | |
ad0ec14b MA |
164 | /* |
165 | * qmp-commands.hx ensures that QMP command query-spice exists only | |
166 | * #ifdef CONFIG_SPICE. Necessary for an accurate query-commands | |
167 | * result. However, the QAPI schema is blissfully unaware of that, | |
168 | * and the QAPI code generator happily generates a dead | |
7fad30f0 MA |
169 | * qmp_marshal_query_spice() that calls qmp_query_spice(). Provide it |
170 | * one, or else linking fails. FIXME Educate the QAPI schema on | |
171 | * CONFIG_SPICE. | |
ad0ec14b | 172 | */ |
d1f29646 LC |
173 | SpiceInfo *qmp_query_spice(Error **errp) |
174 | { | |
ad0ec14b | 175 | abort(); |
d1f29646 LC |
176 | }; |
177 | #endif | |
e42e818b | 178 | |
e42e818b LC |
179 | void qmp_cont(Error **errp) |
180 | { | |
4d2855a3 | 181 | Error *local_err = NULL; |
373340b2 | 182 | BlockBackend *blk; |
ab31979a | 183 | BlockDriverState *bs; |
88be7b4b | 184 | BdrvNextIterator it; |
e42e818b | 185 | |
65d64f36 PX |
186 | /* if there is a dump in background, we should wait until the dump |
187 | * finished */ | |
188 | if (dump_in_progress()) { | |
189 | error_setg(errp, "There is a dump in process, please wait."); | |
190 | return; | |
191 | } | |
192 | ||
ede085b3 | 193 | if (runstate_needs_reset()) { |
f231b88d | 194 | error_setg(errp, "Resetting the Virtual Machine is required"); |
e42e818b | 195 | return; |
ad02b96a LC |
196 | } else if (runstate_check(RUN_STATE_SUSPENDED)) { |
197 | return; | |
e42e818b LC |
198 | } |
199 | ||
373340b2 HR |
200 | for (blk = blk_next(NULL); blk; blk = blk_next(blk)) { |
201 | blk_iostatus_reset(blk); | |
ab31979a | 202 | } |
7c8eece4 | 203 | |
88be7b4b | 204 | for (bs = bdrv_first(&it); bs; bs = bdrv_next(&it)) { |
4d2855a3 MA |
205 | bdrv_add_key(bs, NULL, &local_err); |
206 | if (local_err) { | |
207 | error_propagate(errp, local_err); | |
ab31979a MA |
208 | return; |
209 | } | |
e42e818b LC |
210 | } |
211 | ||
76b1c7fe KW |
212 | /* Continuing after completed migration. Images have been inactivated to |
213 | * allow the destination to take control. Need to get control back now. */ | |
214 | if (runstate_check(RUN_STATE_FINISH_MIGRATE) || | |
215 | runstate_check(RUN_STATE_POSTMIGRATE)) | |
216 | { | |
217 | bdrv_invalidate_cache_all(&local_err); | |
218 | if (local_err) { | |
219 | error_propagate(errp, local_err); | |
220 | return; | |
221 | } | |
222 | } | |
223 | ||
1e998146 PB |
224 | if (runstate_check(RUN_STATE_INMIGRATE)) { |
225 | autostart = 1; | |
226 | } else { | |
227 | vm_start(); | |
228 | } | |
e42e818b | 229 | } |
b4b12c62 | 230 | |
9b9df25a GH |
231 | void qmp_system_wakeup(Error **errp) |
232 | { | |
233 | qemu_system_wakeup_request(QEMU_WAKEUP_REASON_OTHER); | |
234 | } | |
235 | ||
57c9fafe | 236 | ObjectPropertyInfoList *qmp_qom_list(const char *path, Error **errp) |
b4b12c62 | 237 | { |
57c9fafe | 238 | Object *obj; |
b4b12c62 | 239 | bool ambiguous = false; |
57c9fafe AL |
240 | ObjectPropertyInfoList *props = NULL; |
241 | ObjectProperty *prop; | |
7746abd8 | 242 | ObjectPropertyIterator iter; |
b4b12c62 | 243 | |
57c9fafe AL |
244 | obj = object_resolve_path(path, &ambiguous); |
245 | if (obj == NULL) { | |
79772087 MT |
246 | if (ambiguous) { |
247 | error_setg(errp, "Path '%s' is ambiguous", path); | |
248 | } else { | |
75158ebb MA |
249 | error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND, |
250 | "Device '%s' not found", path); | |
79772087 | 251 | } |
b4b12c62 AL |
252 | return NULL; |
253 | } | |
254 | ||
7746abd8 DB |
255 | object_property_iter_init(&iter, obj); |
256 | while ((prop = object_property_iter_next(&iter))) { | |
57c9fafe | 257 | ObjectPropertyInfoList *entry = g_malloc0(sizeof(*entry)); |
b4b12c62 | 258 | |
57c9fafe | 259 | entry->value = g_malloc0(sizeof(ObjectPropertyInfo)); |
b4b12c62 AL |
260 | entry->next = props; |
261 | props = entry; | |
262 | ||
263 | entry->value->name = g_strdup(prop->name); | |
264 | entry->value->type = g_strdup(prop->type); | |
265 | } | |
266 | ||
267 | return props; | |
268 | } | |
eb6e8ea5 | 269 | |
6eb3937e MA |
270 | void qmp_qom_set(const char *path, const char *property, QObject *value, |
271 | Error **errp) | |
eb6e8ea5 | 272 | { |
57c9fafe | 273 | Object *obj; |
eb6e8ea5 | 274 | |
57c9fafe AL |
275 | obj = object_resolve_path(path, NULL); |
276 | if (!obj) { | |
485febc6 | 277 | error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND, |
75158ebb | 278 | "Device '%s' not found", path); |
485febc6 | 279 | return; |
eb6e8ea5 AL |
280 | } |
281 | ||
485febc6 | 282 | object_property_set_qobject(obj, value, property, errp); |
eb6e8ea5 AL |
283 | } |
284 | ||
6eb3937e | 285 | QObject *qmp_qom_get(const char *path, const char *property, Error **errp) |
eb6e8ea5 | 286 | { |
57c9fafe | 287 | Object *obj; |
eb6e8ea5 | 288 | |
57c9fafe AL |
289 | obj = object_resolve_path(path, NULL); |
290 | if (!obj) { | |
485febc6 | 291 | error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND, |
75158ebb | 292 | "Device '%s' not found", path); |
6eb3937e | 293 | return NULL; |
eb6e8ea5 AL |
294 | } |
295 | ||
6eb3937e | 296 | return object_property_get_qobject(obj, property, errp); |
eb6e8ea5 | 297 | } |
fbf796fd LC |
298 | |
299 | void qmp_set_password(const char *protocol, const char *password, | |
300 | bool has_connected, const char *connected, Error **errp) | |
301 | { | |
302 | int disconnect_if_connected = 0; | |
303 | int fail_if_connected = 0; | |
304 | int rc; | |
305 | ||
306 | if (has_connected) { | |
307 | if (strcmp(connected, "fail") == 0) { | |
308 | fail_if_connected = 1; | |
309 | } else if (strcmp(connected, "disconnect") == 0) { | |
310 | disconnect_if_connected = 1; | |
311 | } else if (strcmp(connected, "keep") == 0) { | |
312 | /* nothing */ | |
313 | } else { | |
c6bd8c70 | 314 | error_setg(errp, QERR_INVALID_PARAMETER, "connected"); |
fbf796fd LC |
315 | return; |
316 | } | |
317 | } | |
318 | ||
319 | if (strcmp(protocol, "spice") == 0) { | |
b25d81ba | 320 | if (!qemu_using_spice(errp)) { |
fbf796fd LC |
321 | return; |
322 | } | |
323 | rc = qemu_spice_set_passwd(password, fail_if_connected, | |
324 | disconnect_if_connected); | |
325 | if (rc != 0) { | |
c6bd8c70 | 326 | error_setg(errp, QERR_SET_PASSWD_FAILED); |
fbf796fd LC |
327 | } |
328 | return; | |
329 | } | |
330 | ||
331 | if (strcmp(protocol, "vnc") == 0) { | |
332 | if (fail_if_connected || disconnect_if_connected) { | |
333 | /* vnc supports "connected=keep" only */ | |
c6bd8c70 | 334 | error_setg(errp, QERR_INVALID_PARAMETER, "connected"); |
fbf796fd LC |
335 | return; |
336 | } | |
337 | /* Note that setting an empty password will not disable login through | |
338 | * this interface. */ | |
339 | rc = vnc_display_password(NULL, password); | |
340 | if (rc < 0) { | |
c6bd8c70 | 341 | error_setg(errp, QERR_SET_PASSWD_FAILED); |
fbf796fd LC |
342 | } |
343 | return; | |
344 | } | |
345 | ||
c6bd8c70 | 346 | error_setg(errp, QERR_INVALID_PARAMETER, "protocol"); |
fbf796fd | 347 | } |
9ad5372d LC |
348 | |
349 | void qmp_expire_password(const char *protocol, const char *whenstr, | |
350 | Error **errp) | |
351 | { | |
352 | time_t when; | |
353 | int rc; | |
354 | ||
355 | if (strcmp(whenstr, "now") == 0) { | |
356 | when = 0; | |
357 | } else if (strcmp(whenstr, "never") == 0) { | |
358 | when = TIME_MAX; | |
359 | } else if (whenstr[0] == '+') { | |
360 | when = time(NULL) + strtoull(whenstr+1, NULL, 10); | |
361 | } else { | |
362 | when = strtoull(whenstr, NULL, 10); | |
363 | } | |
364 | ||
365 | if (strcmp(protocol, "spice") == 0) { | |
b25d81ba | 366 | if (!qemu_using_spice(errp)) { |
9ad5372d LC |
367 | return; |
368 | } | |
369 | rc = qemu_spice_set_pw_expire(when); | |
370 | if (rc != 0) { | |
c6bd8c70 | 371 | error_setg(errp, QERR_SET_PASSWD_FAILED); |
9ad5372d LC |
372 | } |
373 | return; | |
374 | } | |
375 | ||
376 | if (strcmp(protocol, "vnc") == 0) { | |
377 | rc = vnc_display_pw_expire(NULL, when); | |
378 | if (rc != 0) { | |
c6bd8c70 | 379 | error_setg(errp, QERR_SET_PASSWD_FAILED); |
9ad5372d LC |
380 | } |
381 | return; | |
382 | } | |
383 | ||
c6bd8c70 | 384 | error_setg(errp, QERR_INVALID_PARAMETER, "protocol"); |
9ad5372d | 385 | } |
270b243f | 386 | |
333a96ec | 387 | #ifdef CONFIG_VNC |
270b243f LC |
388 | void qmp_change_vnc_password(const char *password, Error **errp) |
389 | { | |
390 | if (vnc_display_password(NULL, password) < 0) { | |
c6bd8c70 | 391 | error_setg(errp, QERR_SET_PASSWD_FAILED); |
270b243f LC |
392 | } |
393 | } | |
333a96ec | 394 | |
007fcd3e | 395 | static void qmp_change_vnc_listen(const char *target, Error **errp) |
333a96ec | 396 | { |
4db14629 GH |
397 | QemuOptsList *olist = qemu_find_opts("vnc"); |
398 | QemuOpts *opts; | |
399 | ||
400 | if (strstr(target, "id=")) { | |
401 | error_setg(errp, "id not supported"); | |
402 | return; | |
403 | } | |
404 | ||
405 | opts = qemu_opts_find(olist, "default"); | |
406 | if (opts) { | |
407 | qemu_opts_del(opts); | |
408 | } | |
70b94331 | 409 | opts = vnc_parse(target, errp); |
f7801c5c GA |
410 | if (!opts) { |
411 | return; | |
412 | } | |
413 | ||
4db14629 | 414 | vnc_display_open("default", errp); |
333a96ec LC |
415 | } |
416 | ||
417 | static void qmp_change_vnc(const char *target, bool has_arg, const char *arg, | |
418 | Error **errp) | |
419 | { | |
420 | if (strcmp(target, "passwd") == 0 || strcmp(target, "password") == 0) { | |
421 | if (!has_arg) { | |
c6bd8c70 | 422 | error_setg(errp, QERR_MISSING_PARAMETER, "password"); |
333a96ec LC |
423 | } else { |
424 | qmp_change_vnc_password(arg, errp); | |
425 | } | |
426 | } else { | |
427 | qmp_change_vnc_listen(target, errp); | |
428 | } | |
429 | } | |
430 | #else | |
431 | void qmp_change_vnc_password(const char *password, Error **errp) | |
432 | { | |
c6bd8c70 | 433 | error_setg(errp, QERR_FEATURE_DISABLED, "vnc"); |
333a96ec LC |
434 | } |
435 | static void qmp_change_vnc(const char *target, bool has_arg, const char *arg, | |
436 | Error **errp) | |
437 | { | |
c6bd8c70 | 438 | error_setg(errp, QERR_FEATURE_DISABLED, "vnc"); |
333a96ec LC |
439 | } |
440 | #endif /* !CONFIG_VNC */ | |
441 | ||
442 | void qmp_change(const char *device, const char *target, | |
7daecb30 | 443 | bool has_arg, const char *arg, Error **errp) |
333a96ec LC |
444 | { |
445 | if (strcmp(device, "vnc") == 0) { | |
7daecb30 | 446 | qmp_change_vnc(target, has_arg, arg, errp); |
333a96ec | 447 | } else { |
39ff43d9 HR |
448 | qmp_blockdev_change_medium(device, target, has_arg, arg, false, 0, |
449 | errp); | |
333a96ec LC |
450 | } |
451 | } | |
5eeee3fa AL |
452 | |
453 | static void qom_list_types_tramp(ObjectClass *klass, void *data) | |
454 | { | |
455 | ObjectTypeInfoList *e, **pret = data; | |
456 | ObjectTypeInfo *info; | |
457 | ||
458 | info = g_malloc0(sizeof(*info)); | |
459 | info->name = g_strdup(object_class_get_name(klass)); | |
460 | ||
461 | e = g_malloc0(sizeof(*e)); | |
462 | e->value = info; | |
463 | e->next = *pret; | |
464 | *pret = e; | |
465 | } | |
466 | ||
467 | ObjectTypeInfoList *qmp_qom_list_types(bool has_implements, | |
468 | const char *implements, | |
469 | bool has_abstract, | |
470 | bool abstract, | |
471 | Error **errp) | |
472 | { | |
473 | ObjectTypeInfoList *ret = NULL; | |
474 | ||
475 | object_class_foreach(qom_list_types_tramp, implements, abstract, &ret); | |
476 | ||
477 | return ret; | |
478 | } | |
1daa31b9 | 479 | |
f4eb32b5 SH |
480 | /* Return a DevicePropertyInfo for a qdev property. |
481 | * | |
482 | * If a qdev property with the given name does not exist, use the given default | |
483 | * type. If the qdev property info should not be shown, return NULL. | |
484 | * | |
485 | * The caller must free the return value. | |
486 | */ | |
487 | static DevicePropertyInfo *make_device_property_info(ObjectClass *klass, | |
488 | const char *name, | |
07d09c58 GA |
489 | const char *default_type, |
490 | const char *description) | |
f4eb32b5 SH |
491 | { |
492 | DevicePropertyInfo *info; | |
493 | Property *prop; | |
494 | ||
495 | do { | |
496 | for (prop = DEVICE_CLASS(klass)->props; prop && prop->name; prop++) { | |
497 | if (strcmp(name, prop->name) != 0) { | |
498 | continue; | |
499 | } | |
500 | ||
501 | /* | |
502 | * TODO Properties without a parser are just for dirty hacks. | |
503 | * qdev_prop_ptr is the only such PropertyInfo. It's marked | |
504 | * for removal. This conditional should be removed along with | |
505 | * it. | |
506 | */ | |
507 | if (!prop->info->set) { | |
508 | return NULL; /* no way to set it, don't show */ | |
509 | } | |
510 | ||
511 | info = g_malloc0(sizeof(*info)); | |
512 | info->name = g_strdup(prop->name); | |
07d09c58 GA |
513 | info->type = g_strdup(prop->info->name); |
514 | info->has_description = !!prop->info->description; | |
515 | info->description = g_strdup(prop->info->description); | |
f4eb32b5 SH |
516 | return info; |
517 | } | |
518 | klass = object_class_get_parent(klass); | |
519 | } while (klass != object_class_by_name(TYPE_DEVICE)); | |
520 | ||
521 | /* Not a qdev property, use the default type */ | |
522 | info = g_malloc0(sizeof(*info)); | |
523 | info->name = g_strdup(name); | |
524 | info->type = g_strdup(default_type); | |
07d09c58 GA |
525 | info->has_description = !!description; |
526 | info->description = g_strdup(description); | |
527 | ||
f4eb32b5 SH |
528 | return info; |
529 | } | |
530 | ||
1daa31b9 AL |
531 | DevicePropertyInfoList *qmp_device_list_properties(const char *typename, |
532 | Error **errp) | |
533 | { | |
534 | ObjectClass *klass; | |
f4eb32b5 SH |
535 | Object *obj; |
536 | ObjectProperty *prop; | |
7746abd8 | 537 | ObjectPropertyIterator iter; |
1daa31b9 AL |
538 | DevicePropertyInfoList *prop_list = NULL; |
539 | ||
540 | klass = object_class_by_name(typename); | |
541 | if (klass == NULL) { | |
75158ebb MA |
542 | error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND, |
543 | "Device '%s' not found", typename); | |
1daa31b9 AL |
544 | return NULL; |
545 | } | |
546 | ||
547 | klass = object_class_dynamic_cast(klass, TYPE_DEVICE); | |
548 | if (klass == NULL) { | |
c6bd8c70 | 549 | error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "name", TYPE_DEVICE); |
1daa31b9 AL |
550 | return NULL; |
551 | } | |
552 | ||
edb1523d MA |
553 | if (object_class_is_abstract(klass)) { |
554 | error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "name", | |
555 | "non-abstract device type"); | |
556 | return NULL; | |
557 | } | |
558 | ||
4c315c27 MA |
559 | if (DEVICE_CLASS(klass)->cannot_destroy_with_object_finalize_yet) { |
560 | error_setg(errp, "Can't list properties of device '%s'", typename); | |
561 | return NULL; | |
562 | } | |
563 | ||
f4eb32b5 | 564 | obj = object_new(typename); |
1daa31b9 | 565 | |
7746abd8 DB |
566 | object_property_iter_init(&iter, obj); |
567 | while ((prop = object_property_iter_next(&iter))) { | |
f4eb32b5 SH |
568 | DevicePropertyInfo *info; |
569 | DevicePropertyInfoList *entry; | |
570 | ||
571 | /* Skip Object and DeviceState properties */ | |
572 | if (strcmp(prop->name, "type") == 0 || | |
573 | strcmp(prop->name, "realized") == 0 || | |
574 | strcmp(prop->name, "hotpluggable") == 0 || | |
4115dd65 | 575 | strcmp(prop->name, "hotplugged") == 0 || |
f4eb32b5 SH |
576 | strcmp(prop->name, "parent_bus") == 0) { |
577 | continue; | |
578 | } | |
1daa31b9 | 579 | |
f4eb32b5 SH |
580 | /* Skip legacy properties since they are just string versions of |
581 | * properties that we already list. | |
582 | */ | |
583 | if (strstart(prop->name, "legacy-", NULL)) { | |
584 | continue; | |
585 | } | |
1daa31b9 | 586 | |
07d09c58 GA |
587 | info = make_device_property_info(klass, prop->name, prop->type, |
588 | prop->description); | |
f4eb32b5 SH |
589 | if (!info) { |
590 | continue; | |
1daa31b9 | 591 | } |
f4eb32b5 SH |
592 | |
593 | entry = g_malloc0(sizeof(*entry)); | |
594 | entry->value = info; | |
595 | entry->next = prop_list; | |
596 | prop_list = entry; | |
597 | } | |
598 | ||
599 | object_unref(obj); | |
1daa31b9 AL |
600 | |
601 | return prop_list; | |
602 | } | |
e4e31c63 | 603 | |
76b64a7a AL |
604 | CpuDefinitionInfoList *qmp_query_cpu_definitions(Error **errp) |
605 | { | |
606 | return arch_query_cpu_definitions(errp); | |
607 | } | |
608 | ||
b224e5e2 LC |
609 | void qmp_add_client(const char *protocol, const char *fdname, |
610 | bool has_skipauth, bool skipauth, bool has_tls, bool tls, | |
611 | Error **errp) | |
612 | { | |
613 | CharDriverState *s; | |
614 | int fd; | |
615 | ||
616 | fd = monitor_get_fd(cur_mon, fdname, errp); | |
617 | if (fd < 0) { | |
618 | return; | |
619 | } | |
620 | ||
621 | if (strcmp(protocol, "spice") == 0) { | |
b25d81ba | 622 | if (!qemu_using_spice(errp)) { |
b224e5e2 LC |
623 | close(fd); |
624 | return; | |
625 | } | |
626 | skipauth = has_skipauth ? skipauth : false; | |
627 | tls = has_tls ? tls : false; | |
628 | if (qemu_spice_display_add_client(fd, skipauth, tls) < 0) { | |
629 | error_setg(errp, "spice failed to add client"); | |
630 | close(fd); | |
631 | } | |
632 | return; | |
633 | #ifdef CONFIG_VNC | |
634 | } else if (strcmp(protocol, "vnc") == 0) { | |
635 | skipauth = has_skipauth ? skipauth : false; | |
636 | vnc_display_add_client(NULL, fd, skipauth); | |
637 | return; | |
638 | #endif | |
639 | } else if ((s = qemu_chr_find(protocol)) != NULL) { | |
640 | if (qemu_chr_add_client(s, fd) < 0) { | |
641 | error_setg(errp, "failed to add client"); | |
642 | close(fd); | |
643 | return; | |
644 | } | |
645 | return; | |
646 | } | |
647 | ||
648 | error_setg(errp, "protocol '%s' is invalid", protocol); | |
649 | close(fd); | |
650 | } | |
ab2d0531 | 651 | |
cff8b2c6 | 652 | |
6eb3937e MA |
653 | void qmp_object_add(const char *type, const char *id, |
654 | bool has_props, QObject *props, Error **errp) | |
cff8b2c6 | 655 | { |
cff8b2c6 | 656 | const QDict *pdict = NULL; |
cff8b2c6 | 657 | QmpInputVisitor *qiv; |
90998d58 | 658 | Object *obj; |
cff8b2c6 PB |
659 | |
660 | if (props) { | |
661 | pdict = qobject_to_qdict(props); | |
662 | if (!pdict) { | |
485febc6 MA |
663 | error_setg(errp, QERR_INVALID_PARAMETER_TYPE, "props", "dict"); |
664 | return; | |
cff8b2c6 PB |
665 | } |
666 | } | |
667 | ||
240f64b6 | 668 | qiv = qmp_input_visitor_new(props, true); |
90998d58 DB |
669 | obj = user_creatable_add_type(type, id, pdict, |
670 | qmp_input_get_visitor(qiv), errp); | |
cff8b2c6 | 671 | qmp_input_visitor_cleanup(qiv); |
90998d58 DB |
672 | if (obj) { |
673 | object_unref(obj); | |
674 | } | |
cff8b2c6 PB |
675 | } |
676 | ||
ab2d0531 PB |
677 | void qmp_object_del(const char *id, Error **errp) |
678 | { | |
90998d58 | 679 | user_creatable_del(id, errp); |
ab2d0531 | 680 | } |
6f2e2730 IM |
681 | |
682 | MemoryDeviceInfoList *qmp_query_memory_devices(Error **errp) | |
683 | { | |
684 | MemoryDeviceInfoList *head = NULL; | |
685 | MemoryDeviceInfoList **prev = &head; | |
686 | ||
687 | qmp_pc_dimm_device_list(qdev_get_machine(), &prev); | |
688 | ||
689 | return head; | |
690 | } | |
02419bcb IM |
691 | |
692 | ACPIOSTInfoList *qmp_query_acpi_ospm_status(Error **errp) | |
693 | { | |
694 | bool ambig; | |
695 | ACPIOSTInfoList *head = NULL; | |
696 | ACPIOSTInfoList **prev = &head; | |
697 | Object *obj = object_resolve_path_type("", TYPE_ACPI_DEVICE_IF, &ambig); | |
698 | ||
699 | if (obj) { | |
700 | AcpiDeviceIfClass *adevc = ACPI_DEVICE_IF_GET_CLASS(obj); | |
701 | AcpiDeviceIf *adev = ACPI_DEVICE_IF(obj); | |
702 | ||
703 | adevc->ospm_status(adev, &prev); | |
704 | } else { | |
705 | error_setg(errp, "command is not supported, missing ACPI device"); | |
706 | } | |
707 | ||
708 | return head; | |
709 | } |