2 * Core Definitions for QAPI/QMP Dispatch
4 * Copyright IBM, Corp. 2011
7 * Anthony Liguori <aliguori@us.ibm.com>
9 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
10 * See the COPYING.LIB file in the top-level directory.
14 #include "qemu/osdep.h"
15 #include "qapi/error.h"
16 #include "qapi/qmp/types.h"
17 #include "qapi/qmp/dispatch.h"
18 #include "qapi/qmp/json-parser.h"
19 #include "qapi/qmp/qjson.h"
20 #include "qapi-types.h"
21 #include "qapi/qmp/qerror.h"
23 static QDict
*qmp_dispatch_check_obj(const QObject
*request
, Error
**errp
)
25 const QDictEntry
*ent
;
27 const QObject
*arg_obj
;
28 bool has_exec_key
= false;
31 if (qobject_type(request
) != QTYPE_QDICT
) {
32 error_setg(errp
, QERR_QMP_BAD_INPUT_OBJECT
,
33 "request is not a dictionary");
37 dict
= qobject_to_qdict(request
);
39 for (ent
= qdict_first(dict
); ent
;
40 ent
= qdict_next(dict
, ent
)) {
41 arg_name
= qdict_entry_key(ent
);
42 arg_obj
= qdict_entry_value(ent
);
44 if (!strcmp(arg_name
, "execute")) {
45 if (qobject_type(arg_obj
) != QTYPE_QSTRING
) {
46 error_setg(errp
, QERR_QMP_BAD_INPUT_OBJECT_MEMBER
, "execute",
51 } else if (strcmp(arg_name
, "arguments")) {
52 error_setg(errp
, QERR_QMP_EXTRA_MEMBER
, arg_name
);
58 error_setg(errp
, QERR_QMP_BAD_INPUT_OBJECT
, "execute");
65 static QObject
*do_qmp_dispatch(QObject
*request
, Error
**errp
)
67 Error
*local_err
= NULL
;
73 dict
= qmp_dispatch_check_obj(request
, errp
);
78 command
= qdict_get_str(dict
, "execute");
79 cmd
= qmp_find_command(command
);
81 error_set(errp
, ERROR_CLASS_COMMAND_NOT_FOUND
,
82 "The command %s has not been found", command
);
86 error_setg(errp
, "The command %s has been disabled for this instance",
91 if (!qdict_haskey(dict
, "arguments")) {
94 args
= qdict_get_qdict(dict
, "arguments");
98 cmd
->fn(args
, &ret
, &local_err
);
100 error_propagate(errp
, local_err
);
101 } else if (cmd
->options
& QCO_NO_SUCCESS_RESP
) {
104 ret
= QOBJECT(qdict_new());
112 QObject
*qmp_build_error_object(Error
*err
)
114 return qobject_from_jsonf("{ 'class': %s, 'desc': %s }",
115 QapiErrorClass_lookup
[error_get_class(err
)],
116 error_get_pretty(err
));
119 QObject
*qmp_dispatch(QObject
*request
)
125 ret
= do_qmp_dispatch(request
, &err
);
129 qdict_put_obj(rsp
, "error", qmp_build_error_object(err
));
132 qdict_put_obj(rsp
, "return", ret
);