2019-06-19 23:10:39 +03:00
|
|
|
/*
|
|
|
|
* HMP commands related to QOM
|
|
|
|
*
|
|
|
|
* This work is licensed under the terms of the GNU GPL, version 2 or
|
|
|
|
* later. See the COPYING file in the top-level directory.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "qemu/osdep.h"
|
|
|
|
#include "hw/qdev-core.h"
|
|
|
|
#include "monitor/hmp.h"
|
|
|
|
#include "monitor/monitor.h"
|
|
|
|
#include "qapi/error.h"
|
|
|
|
#include "qapi/qapi-commands-qom.h"
|
|
|
|
#include "qapi/qmp/qdict.h"
|
2020-05-20 18:11:07 +03:00
|
|
|
#include "qapi/qmp/qjson.h"
|
|
|
|
#include "qapi/qmp/qstring.h"
|
2019-06-19 23:10:39 +03:00
|
|
|
#include "qom/object.h"
|
|
|
|
|
|
|
|
void hmp_qom_list(Monitor *mon, const QDict *qdict)
|
|
|
|
{
|
|
|
|
const char *path = qdict_get_try_str(qdict, "path");
|
|
|
|
ObjectPropertyInfoList *list;
|
|
|
|
Error *err = NULL;
|
|
|
|
|
|
|
|
if (path == NULL) {
|
|
|
|
monitor_printf(mon, "/\n");
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
list = qmp_qom_list(path, &err);
|
|
|
|
if (err == NULL) {
|
|
|
|
ObjectPropertyInfoList *start = list;
|
|
|
|
while (list != NULL) {
|
|
|
|
ObjectPropertyInfo *value = list->value;
|
|
|
|
|
|
|
|
monitor_printf(mon, "%s (%s)\n",
|
|
|
|
value->name, value->type);
|
|
|
|
list = list->next;
|
|
|
|
}
|
|
|
|
qapi_free_ObjectPropertyInfoList(start);
|
|
|
|
}
|
2019-12-05 20:46:18 +03:00
|
|
|
hmp_handle_error(mon, err);
|
2019-06-19 23:10:39 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
void hmp_qom_set(Monitor *mon, const QDict *qdict)
|
|
|
|
{
|
2020-06-10 10:51:53 +03:00
|
|
|
const bool json = qdict_get_try_bool(qdict, "json", false);
|
2019-06-19 23:10:39 +03:00
|
|
|
const char *path = qdict_get_str(qdict, "path");
|
|
|
|
const char *property = qdict_get_str(qdict, "property");
|
|
|
|
const char *value = qdict_get_str(qdict, "value");
|
|
|
|
Error *err = NULL;
|
2020-05-20 18:11:08 +03:00
|
|
|
|
2020-06-10 10:51:53 +03:00
|
|
|
if (!json) {
|
|
|
|
Object *obj = object_resolve_path(path, NULL);
|
|
|
|
|
|
|
|
if (!obj) {
|
|
|
|
error_set(&err, ERROR_CLASS_DEVICE_NOT_FOUND,
|
|
|
|
"Device '%s' not found", path);
|
|
|
|
} else {
|
qom: Put name parameter before value / visitor parameter
The object_property_set_FOO() setters take property name and value in
an unusual order:
void object_property_set_FOO(Object *obj, FOO_TYPE value,
const char *name, Error **errp)
Having to pass value before name feels grating. Swap them.
Same for object_property_set(), object_property_get(), and
object_property_parse().
Convert callers with this Coccinelle script:
@@
identifier fun = {
object_property_get, object_property_parse, object_property_set_str,
object_property_set_link, object_property_set_bool,
object_property_set_int, object_property_set_uint, object_property_set,
object_property_set_qobject
};
expression obj, v, name, errp;
@@
- fun(obj, v, name, errp)
+ fun(obj, name, v, errp)
Chokes on hw/arm/musicpal.c's lcd_refresh() with the unhelpful error
message "no position information". Convert that one manually.
Fails to convert hw/arm/armsse.c, because Coccinelle gets confused by
ARMSSE being used both as typedef and function-like macro there.
Convert manually.
Fails to convert hw/rx/rx-gdbsim.c, because Coccinelle gets confused
by RXCPU being used both as typedef and function-like macro there.
Convert manually. The other files using RXCPU that way don't need
conversion.
Signed-off-by: Markus Armbruster <armbru@redhat.com>
Reviewed-by: Eric Blake <eblake@redhat.com>
Reviewed-by: Vladimir Sementsov-Ogievskiy <vsementsov@virtuozzo.com>
Message-Id: <20200707160613.848843-27-armbru@redhat.com>
[Straightforwad conflict with commit 2336172d9b "audio: set default
value for pcspk.iobase property" resolved]
2020-07-07 19:05:54 +03:00
|
|
|
object_property_parse(obj, property, value, &err);
|
2020-06-10 10:51:53 +03:00
|
|
|
}
|
|
|
|
} else {
|
|
|
|
QObject *obj = qobject_from_json(value, &err);
|
|
|
|
|
|
|
|
if (!err) {
|
|
|
|
qmp_qom_set(path, property, obj, &err);
|
|
|
|
}
|
2019-06-19 23:10:39 +03:00
|
|
|
}
|
2020-05-20 18:11:08 +03:00
|
|
|
|
2019-12-05 20:46:18 +03:00
|
|
|
hmp_handle_error(mon, err);
|
2019-06-19 23:10:39 +03:00
|
|
|
}
|
|
|
|
|
2020-05-20 18:11:07 +03:00
|
|
|
void hmp_qom_get(Monitor *mon, const QDict *qdict)
|
|
|
|
{
|
|
|
|
const char *path = qdict_get_str(qdict, "path");
|
|
|
|
const char *property = qdict_get_str(qdict, "property");
|
|
|
|
Error *err = NULL;
|
|
|
|
QObject *obj = qmp_qom_get(path, property, &err);
|
|
|
|
|
|
|
|
if (err == NULL) {
|
|
|
|
QString *str = qobject_to_json_pretty(obj);
|
|
|
|
monitor_printf(mon, "%s\n", qstring_get_str(str));
|
|
|
|
qobject_unref(str);
|
|
|
|
}
|
|
|
|
|
2020-06-03 10:03:38 +03:00
|
|
|
qobject_unref(obj);
|
2020-05-20 18:11:07 +03:00
|
|
|
hmp_handle_error(mon, err);
|
|
|
|
}
|
|
|
|
|
2019-06-19 23:10:39 +03:00
|
|
|
typedef struct QOMCompositionState {
|
|
|
|
Monitor *mon;
|
|
|
|
int indent;
|
|
|
|
} QOMCompositionState;
|
|
|
|
|
|
|
|
static void print_qom_composition(Monitor *mon, Object *obj, int indent);
|
|
|
|
|
2020-05-27 11:47:54 +03:00
|
|
|
static int qom_composition_compare(const void *a, const void *b, void *ignore)
|
2019-06-19 23:10:39 +03:00
|
|
|
{
|
2020-07-14 19:02:00 +03:00
|
|
|
return g_strcmp0(object_get_canonical_path_component(a),
|
|
|
|
object_get_canonical_path_component(b));
|
2020-05-27 11:47:54 +03:00
|
|
|
}
|
2019-06-19 23:10:39 +03:00
|
|
|
|
2020-05-27 11:47:54 +03:00
|
|
|
static int insert_qom_composition_child(Object *obj, void *opaque)
|
|
|
|
{
|
|
|
|
GQueue *children = opaque;
|
2019-06-19 23:10:39 +03:00
|
|
|
|
2020-05-27 11:47:54 +03:00
|
|
|
g_queue_insert_sorted(children, obj, qom_composition_compare, NULL);
|
2019-06-19 23:10:39 +03:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
static void print_qom_composition(Monitor *mon, Object *obj, int indent)
|
|
|
|
{
|
2020-07-14 19:02:00 +03:00
|
|
|
const char *name;
|
2020-05-27 11:47:54 +03:00
|
|
|
GQueue children;
|
|
|
|
Object *child;
|
2019-06-19 23:10:39 +03:00
|
|
|
|
|
|
|
if (obj == object_get_root()) {
|
2020-07-14 19:02:00 +03:00
|
|
|
name = "";
|
2019-06-19 23:10:39 +03:00
|
|
|
} else {
|
|
|
|
name = object_get_canonical_path_component(obj);
|
|
|
|
}
|
|
|
|
monitor_printf(mon, "%*s/%s (%s)\n", indent, "", name,
|
|
|
|
object_get_typename(obj));
|
2020-05-27 11:47:54 +03:00
|
|
|
|
|
|
|
g_queue_init(&children);
|
|
|
|
object_child_foreach(obj, insert_qom_composition_child, &children);
|
|
|
|
while ((child = g_queue_pop_head(&children))) {
|
|
|
|
print_qom_composition(mon, child, indent + 2);
|
|
|
|
}
|
2019-06-19 23:10:39 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
void hmp_info_qom_tree(Monitor *mon, const QDict *dict)
|
|
|
|
{
|
|
|
|
const char *path = qdict_get_try_str(dict, "path");
|
|
|
|
Object *obj;
|
|
|
|
bool ambiguous = false;
|
|
|
|
|
|
|
|
if (path) {
|
|
|
|
obj = object_resolve_path(path, &ambiguous);
|
|
|
|
if (!obj) {
|
|
|
|
monitor_printf(mon, "Path '%s' could not be resolved.\n", path);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
if (ambiguous) {
|
|
|
|
monitor_printf(mon, "Warning: Path '%s' is ambiguous.\n", path);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
obj = qdev_get_machine();
|
|
|
|
}
|
|
|
|
print_qom_composition(mon, obj, 0);
|
|
|
|
}
|