blob: 9c614494f1fb502e8e67108d5360d1db661133fe [file] [log] [blame]
Michael Rothab02ab22011-07-19 14:50:37 -05001/*
2 * Core Definitions for QAPI/QMP Dispatch
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 LGPL, version 2.1 or later.
10 * See the COPYING.LIB file in the top-level directory.
11 *
12 */
13
Paolo Bonzini7b1b5d12012-12-17 18:19:43 +010014#include "qapi/qmp/types.h"
15#include "qapi/qmp/dispatch.h"
16#include "qapi/qmp/json-parser.h"
Luiz Capitulino93b91c52012-08-01 16:30:13 -030017#include "qapi-types.h"
Paolo Bonzini7b1b5d12012-12-17 18:19:43 +010018#include "qapi/error.h"
19#include "qapi/qmp/qerror.h"
Michael Rothab02ab22011-07-19 14:50:37 -050020
21static QDict *qmp_dispatch_check_obj(const QObject *request, Error **errp)
22{
23 const QDictEntry *ent;
24 const char *arg_name;
25 const QObject *arg_obj;
26 bool has_exec_key = false;
27 QDict *dict = NULL;
28
29 if (qobject_type(request) != QTYPE_QDICT) {
30 error_set(errp, QERR_QMP_BAD_INPUT_OBJECT,
31 "request is not a dictionary");
32 return NULL;
33 }
34
35 dict = qobject_to_qdict(request);
36
37 for (ent = qdict_first(dict); ent;
38 ent = qdict_next(dict, ent)) {
39 arg_name = qdict_entry_key(ent);
40 arg_obj = qdict_entry_value(ent);
41
42 if (!strcmp(arg_name, "execute")) {
43 if (qobject_type(arg_obj) != QTYPE_QSTRING) {
44 error_set(errp, QERR_QMP_BAD_INPUT_OBJECT_MEMBER, "execute",
45 "string");
46 return NULL;
47 }
48 has_exec_key = true;
49 } else if (strcmp(arg_name, "arguments")) {
50 error_set(errp, QERR_QMP_EXTRA_MEMBER, arg_name);
51 return NULL;
52 }
53 }
54
55 if (!has_exec_key) {
56 error_set(errp, QERR_QMP_BAD_INPUT_OBJECT, "execute");
57 return NULL;
58 }
59
60 return dict;
61}
62
63static QObject *do_qmp_dispatch(QObject *request, Error **errp)
64{
65 const char *command;
66 QDict *args, *dict;
67 QmpCommand *cmd;
68 QObject *ret = NULL;
69
70
71 dict = qmp_dispatch_check_obj(request, errp);
72 if (!dict || error_is_set(errp)) {
73 return NULL;
74 }
75
76 command = qdict_get_str(dict, "execute");
77 cmd = qmp_find_command(command);
78 if (cmd == NULL) {
79 error_set(errp, QERR_COMMAND_NOT_FOUND, command);
80 return NULL;
81 }
Michael Rothabd6cf62011-12-06 22:03:42 -060082 if (!cmd->enabled) {
Cole Robinsonf231b882014-03-21 19:42:26 -040083 error_setg(errp, "The command %s has been disabled for this instance",
84 command);
Michael Rothabd6cf62011-12-06 22:03:42 -060085 return NULL;
86 }
Michael Rothab02ab22011-07-19 14:50:37 -050087
88 if (!qdict_haskey(dict, "arguments")) {
89 args = qdict_new();
90 } else {
91 args = qdict_get_qdict(dict, "arguments");
92 QINCREF(args);
93 }
94
95 switch (cmd->type) {
96 case QCT_NORMAL:
97 cmd->fn(args, &ret, errp);
Luiz Capitulinod34b8672012-05-08 14:24:44 -030098 if (!error_is_set(errp)) {
99 if (cmd->options & QCO_NO_SUCCESS_RESP) {
100 g_assert(!ret);
101 } else if (!ret) {
102 ret = QOBJECT(qdict_new());
103 }
Michael Rothab02ab22011-07-19 14:50:37 -0500104 }
105 break;
106 }
107
108 QDECREF(args);
109
110 return ret;
111}
112
Luiz Capitulino93b91c52012-08-01 16:30:13 -0300113QObject *qmp_build_error_object(Error *errp)
114{
115 return qobject_from_jsonf("{ 'class': %s, 'desc': %s }",
116 ErrorClass_lookup[error_get_class(errp)],
117 error_get_pretty(errp));
118}
119
Michael Rothab02ab22011-07-19 14:50:37 -0500120QObject *qmp_dispatch(QObject *request)
121{
122 Error *err = NULL;
123 QObject *ret;
124 QDict *rsp;
125
126 ret = do_qmp_dispatch(request, &err);
127
128 rsp = qdict_new();
129 if (err) {
Luiz Capitulino93b91c52012-08-01 16:30:13 -0300130 qdict_put_obj(rsp, "error", qmp_build_error_object(err));
Michael Rothab02ab22011-07-19 14:50:37 -0500131 error_free(err);
132 } else if (ret) {
133 qdict_put_obj(rsp, "return", ret);
134 } else {
135 QDECREF(rsp);
136 return NULL;
137 }
138
139 return QOBJECT(rsp);
140}