1 #include "qemu/osdep.h"
3 #include "qemu/cutils.h"
4 #include "qapi/error.h"
5 #include "qapi/qapi-commands-qom.h"
6 #include "qapi/qapi-visit-qom.h"
7 #include "qapi/qmp/qdict.h"
8 #include "qapi/qmp/qerror.h"
9 #include "qapi/qmp/qjson.h"
10 #include "qapi/qobject-input-visitor.h"
11 #include "qapi/qobject-output-visitor.h"
12 #include "qom/object_interfaces.h"
13 #include "qemu/help_option.h"
15 #include "qemu/module.h"
16 #include "qemu/option.h"
17 #include "qemu/qemu-print.h"
18 #include "qapi/opts-visitor.h"
19 #include "qemu/config-file.h"
21 bool user_creatable_complete(UserCreatable
*uc
, Error
**errp
)
23 UserCreatableClass
*ucc
= USER_CREATABLE_GET_CLASS(uc
);
27 ucc
->complete(uc
, &err
);
28 error_propagate(errp
, err
);
33 bool user_creatable_can_be_deleted(UserCreatable
*uc
)
36 UserCreatableClass
*ucc
= USER_CREATABLE_GET_CLASS(uc
);
38 if (ucc
->can_be_deleted
) {
39 return ucc
->can_be_deleted(uc
);
45 static void object_set_properties_from_qdict(Object
*obj
, const QDict
*qdict
,
46 Visitor
*v
, Error
**errp
)
50 if (!visit_start_struct(v
, NULL
, NULL
, 0, errp
)) {
53 for (e
= qdict_first(qdict
); e
; e
= qdict_next(qdict
, e
)) {
54 if (!object_property_set(obj
, e
->key
, v
, errp
)) {
58 visit_check_struct(v
, errp
);
60 visit_end_struct(v
, NULL
);
63 void object_set_properties_from_keyval(Object
*obj
, const QDict
*qdict
,
64 bool from_json
, Error
**errp
)
68 v
= qobject_input_visitor_new(QOBJECT(qdict
));
70 v
= qobject_input_visitor_new_keyval(QOBJECT(qdict
));
72 object_set_properties_from_qdict(obj
, qdict
, v
, errp
);
76 Object
*user_creatable_add_type(const char *type
, const char *id
,
78 Visitor
*v
, Error
**errp
)
83 Error
*local_err
= NULL
;
85 if (id
!= NULL
&& !id_wellformed(id
)) {
86 error_setg(errp
, QERR_INVALID_PARAMETER_VALUE
, "id", "an identifier");
87 error_append_hint(errp
, "Identifiers consist of letters, digits, "
88 "'-', '.', '_', starting with a letter.\n");
92 klass
= object_class_by_name(type
);
94 error_setg(errp
, "invalid object type: %s", type
);
98 if (!object_class_dynamic_cast(klass
, TYPE_USER_CREATABLE
)) {
99 error_setg(errp
, "object type '%s' isn't supported by object-add",
104 if (object_class_is_abstract(klass
)) {
105 error_setg(errp
, "object type '%s' is abstract", type
);
110 obj
= object_new(type
);
111 object_set_properties_from_qdict(obj
, qdict
, v
, &local_err
);
117 object_property_try_add_child(object_get_objects_root(),
118 id
, obj
, &local_err
);
124 if (!user_creatable_complete(USER_CREATABLE(obj
), &local_err
)) {
126 object_property_del(object_get_objects_root(), id
);
132 error_propagate(errp
, local_err
);
139 void user_creatable_add_qapi(ObjectOptions
*options
, Error
**errp
)
146 v
= qobject_output_visitor_new(&qobj
);
147 visit_type_ObjectOptions(v
, NULL
, &options
, &error_abort
);
148 visit_complete(v
, &qobj
);
151 props
= qobject_to(QDict
, qobj
);
152 qdict_del(props
, "qom-type");
153 qdict_del(props
, "id");
155 v
= qobject_input_visitor_new(QOBJECT(props
));
156 obj
= user_creatable_add_type(ObjectType_str(options
->qom_type
),
157 options
->id
, props
, v
, errp
);
163 char *object_property_help(const char *name
, const char *type
,
164 QObject
*defval
, const char *description
)
166 GString
*str
= g_string_new(NULL
);
168 g_string_append_printf(str
, " %s=<%s>", name
, type
);
169 if (description
|| defval
) {
171 g_string_append_printf(str
, "%*s", 24 - (int)str
->len
, "");
173 g_string_append(str
, " - ");
176 g_string_append(str
, description
);
179 g_autofree
char *def_json
= g_string_free(qobject_to_json(defval
),
181 g_string_append_printf(str
, " (default: %s)", def_json
);
184 return g_string_free(str
, false);
187 static void user_creatable_print_types(void)
191 qemu_printf("List of user creatable objects:\n");
192 list
= object_class_get_list_sorted(TYPE_USER_CREATABLE
, false);
193 for (l
= list
; l
!= NULL
; l
= l
->next
) {
194 ObjectClass
*oc
= OBJECT_CLASS(l
->data
);
195 qemu_printf(" %s\n", object_class_get_name(oc
));
200 bool type_print_class_properties(const char *type
)
203 ObjectPropertyIterator iter
;
204 ObjectProperty
*prop
;
208 klass
= object_class_by_name(type
);
213 array
= g_ptr_array_new();
214 object_class_property_iter_init(&iter
, klass
);
215 while ((prop
= object_property_iter_next(&iter
))) {
220 g_ptr_array_add(array
,
221 object_property_help(prop
->name
, prop
->type
,
222 prop
->defval
, prop
->description
));
224 g_ptr_array_sort(array
, (GCompareFunc
)qemu_pstrcmp0
);
225 if (array
->len
> 0) {
226 qemu_printf("%s options:\n", type
);
228 qemu_printf("There are no options for %s.\n", type
);
230 for (i
= 0; i
< array
->len
; i
++) {
231 qemu_printf("%s\n", (char *)array
->pdata
[i
]);
233 g_ptr_array_set_free_func(array
, g_free
);
234 g_ptr_array_free(array
, true);
238 bool user_creatable_print_help(const char *type
, QemuOpts
*opts
)
240 if (is_help_option(type
)) {
241 user_creatable_print_types();
245 if (qemu_opt_has_help_opt(opts
)) {
246 return type_print_class_properties(type
);
252 static void user_creatable_print_help_from_qdict(QDict
*args
)
254 const char *type
= qdict_get_try_str(args
, "qom-type");
256 if (!type
|| !type_print_class_properties(type
)) {
257 user_creatable_print_types();
261 ObjectOptions
*user_creatable_parse_str(const char *optarg
, Error
**errp
)
267 ObjectOptions
*options
;
269 if (optarg
[0] == '{') {
270 obj
= qobject_from_json(optarg
, errp
);
274 v
= qobject_input_visitor_new(obj
);
276 QDict
*args
= keyval_parse(optarg
, "qom-type", &help
, errp
);
281 user_creatable_print_help_from_qdict(args
);
287 v
= qobject_input_visitor_new_keyval(obj
);
290 visit_type_ObjectOptions(v
, NULL
, &options
, errp
);
297 bool user_creatable_add_from_str(const char *optarg
, Error
**errp
)
300 ObjectOptions
*options
;
302 options
= user_creatable_parse_str(optarg
, errp
);
307 user_creatable_add_qapi(options
, errp
);
308 qapi_free_ObjectOptions(options
);
312 void user_creatable_process_cmdline(const char *optarg
)
314 if (!user_creatable_add_from_str(optarg
, &error_fatal
)) {
315 /* Help was printed */
320 bool user_creatable_del(const char *id
, Error
**errp
)
322 QemuOptsList
*opts_list
;
326 container
= object_get_objects_root();
327 obj
= object_resolve_path_component(container
, id
);
329 error_setg(errp
, "object '%s' not found", id
);
333 if (!user_creatable_can_be_deleted(USER_CREATABLE(obj
))) {
334 error_setg(errp
, "object '%s' is in use, can not be deleted", id
);
339 * if object was defined on the command-line, remove its corresponding
342 opts_list
= qemu_find_opts_err("object", NULL
);
344 qemu_opts_del(qemu_opts_find(opts_list
, id
));
347 object_unparent(obj
);
351 void user_creatable_cleanup(void)
353 object_unparent(object_get_objects_root());
356 static void register_types(void)
358 static const TypeInfo uc_interface_info
= {
359 .name
= TYPE_USER_CREATABLE
,
360 .parent
= TYPE_INTERFACE
,
361 .class_size
= sizeof(UserCreatableClass
),
364 type_register_static(&uc_interface_info
);
367 type_init(register_types
)