blob: e1ce75651cc5b28a3d4c89750a3a54765b287217 [file] [log] [blame]
Anthony Liguorib4748b92009-11-11 10:42:41 -06001/*
2 * QObject JSON integration
3 *
4 * Copyright IBM, Corp. 2009
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
Peter Maydellf2ad72b2016-01-29 17:50:01 +000014#include "qemu/osdep.h"
Markus Armbruster99dbfd12017-02-28 22:26:54 +010015#include "qapi/error.h"
Paolo Bonzini7b1b5d12012-12-17 18:19:43 +010016#include "qapi/qmp/json-lexer.h"
17#include "qapi/qmp/json-parser.h"
18#include "qapi/qmp/json-streamer.h"
19#include "qapi/qmp/qjson.h"
Markus Armbruster6b673952018-02-01 12:18:35 +010020#include "qapi/qmp/qbool.h"
Markus Armbruster452fcdb2018-02-01 12:18:39 +010021#include "qapi/qmp/qdict.h"
Markus Armbruster47e6b292018-02-01 12:18:38 +010022#include "qapi/qmp/qlist.h"
Markus Armbruster15280c32018-02-01 12:18:36 +010023#include "qapi/qmp/qnum.h"
Markus Armbrusterfc81fa12018-02-01 12:18:40 +010024#include "qapi/qmp/qstring.h"
Veronia Bahaaf348b6d2016-03-20 19:16:19 +020025#include "qemu/unicode.h"
Anthony Liguorib4748b92009-11-11 10:42:41 -060026
27typedef struct JSONParsingState
28{
29 JSONMessageParser parser;
30 va_list *ap;
31 QObject *result;
Markus Armbruster99dbfd12017-02-28 22:26:54 +010032 Error *err;
Anthony Liguorib4748b92009-11-11 10:42:41 -060033} JSONParsingState;
34
Paolo Bonzini95385fe2015-11-25 22:23:31 +010035static void parse_json(JSONMessageParser *parser, GQueue *tokens)
Anthony Liguorib4748b92009-11-11 10:42:41 -060036{
37 JSONParsingState *s = container_of(parser, JSONParsingState, parser);
Markus Armbruster99dbfd12017-02-28 22:26:54 +010038
39 s->result = json_parser_parse_err(tokens, s->ap, &s->err);
Anthony Liguorib4748b92009-11-11 10:42:41 -060040}
41
Markus Armbruster99dbfd12017-02-28 22:26:54 +010042QObject *qobject_from_jsonv(const char *string, va_list *ap, Error **errp)
Anthony Liguorib4748b92009-11-11 10:42:41 -060043{
44 JSONParsingState state = {};
45
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020046 state.ap = ap;
47
Anthony Liguorib4748b92009-11-11 10:42:41 -060048 json_message_parser_init(&state.parser, parse_json);
49 json_message_parser_feed(&state.parser, string, strlen(string));
50 json_message_parser_flush(&state.parser);
51 json_message_parser_destroy(&state.parser);
52
Markus Armbruster99dbfd12017-02-28 22:26:54 +010053 error_propagate(errp, state.err);
Anthony Liguorib4748b92009-11-11 10:42:41 -060054 return state.result;
55}
56
Markus Armbruster57348c22017-02-28 22:26:58 +010057QObject *qobject_from_json(const char *string, Error **errp)
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020058{
Markus Armbruster57348c22017-02-28 22:26:58 +010059 return qobject_from_jsonv(string, NULL, errp);
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020060}
61
Luiz Capitulino668e3ca2010-02-08 17:01:27 -020062/*
63 * IMPORTANT: This function aborts on error, thus it must not
64 * be used with untrusted arguments.
65 */
Anthony Liguorib4748b92009-11-11 10:42:41 -060066QObject *qobject_from_jsonf(const char *string, ...)
67{
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020068 QObject *obj;
Anthony Liguorib4748b92009-11-11 10:42:41 -060069 va_list ap;
70
71 va_start(ap, string);
Markus Armbrusterea5ef5c2017-02-28 22:26:56 +010072 obj = qobject_from_jsonv(string, &ap, &error_abort);
Anthony Liguorib4748b92009-11-11 10:42:41 -060073 va_end(ap);
74
Luiz Capitulino668e3ca2010-02-08 17:01:27 -020075 assert(obj != NULL);
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020076 return obj;
Anthony Liguorib4748b92009-11-11 10:42:41 -060077}
Anthony Liguori1fd825f2009-11-11 12:01:22 -060078
79typedef struct ToJsonIterState
80{
Daniel P. Berrange212b6002010-06-07 15:42:14 +010081 int indent;
82 int pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -060083 int count;
84 QString *str;
85} ToJsonIterState;
86
Daniel P. Berrange212b6002010-06-07 15:42:14 +010087static void to_json(const QObject *obj, QString *str, int pretty, int indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -060088
89static void to_json_dict_iter(const char *key, QObject *obj, void *opaque)
90{
91 ToJsonIterState *s = opaque;
92 QString *qkey;
Daniel P. Berrange212b6002010-06-07 15:42:14 +010093 int j;
Anthony Liguori1fd825f2009-11-11 12:01:22 -060094
Max Reitz4b585542014-11-21 10:29:59 +010095 if (s->count) {
96 qstring_append(s->str, s->pretty ? "," : ", ");
97 }
Daniel P. Berrange212b6002010-06-07 15:42:14 +010098
99 if (s->pretty) {
100 qstring_append(s->str, "\n");
101 for (j = 0 ; j < s->indent ; j++)
102 qstring_append(s->str, " ");
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600103 }
104
105 qkey = qstring_from_str(key);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100106 to_json(QOBJECT(qkey), s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600107 QDECREF(qkey);
108
109 qstring_append(s->str, ": ");
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100110 to_json(obj, s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600111 s->count++;
112}
113
114static void to_json_list_iter(QObject *obj, void *opaque)
115{
116 ToJsonIterState *s = opaque;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100117 int j;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600118
Max Reitz4b585542014-11-21 10:29:59 +0100119 if (s->count) {
120 qstring_append(s->str, s->pretty ? "," : ", ");
121 }
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100122
123 if (s->pretty) {
124 qstring_append(s->str, "\n");
125 for (j = 0 ; j < s->indent ; j++)
126 qstring_append(s->str, " ");
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600127 }
128
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100129 to_json(obj, s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600130 s->count++;
131}
132
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100133static void to_json(const QObject *obj, QString *str, int pretty, int indent)
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600134{
135 switch (qobject_type(obj)) {
Markus Armbruster481b0022015-04-29 15:35:05 -0600136 case QTYPE_QNULL:
137 qstring_append(str, "null");
138 break;
Marc-André Lureau01b2ffc2017-06-07 20:35:58 +0400139 case QTYPE_QNUM: {
140 QNum *val = qobject_to_qnum(obj);
141 char *buffer = qnum_to_string(val);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600142 qstring_append(str, buffer);
Marc-André Lureau01b2ffc2017-06-07 20:35:58 +0400143 g_free(buffer);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600144 break;
145 }
146 case QTYPE_QSTRING: {
147 QString *val = qobject_to_qstring(obj);
148 const char *ptr;
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200149 int cp;
150 char buf[16];
151 char *end;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600152
153 ptr = qstring_get_str(val);
154 qstring_append(str, "\"");
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600155
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200156 for (; *ptr; ptr = end) {
157 cp = mod_utf8_codepoint(ptr, 6, &end);
158 switch (cp) {
159 case '\"':
160 qstring_append(str, "\\\"");
161 break;
162 case '\\':
163 qstring_append(str, "\\\\");
164 break;
165 case '\b':
166 qstring_append(str, "\\b");
167 break;
168 case '\f':
169 qstring_append(str, "\\f");
170 break;
171 case '\n':
172 qstring_append(str, "\\n");
173 break;
174 case '\r':
175 qstring_append(str, "\\r");
176 break;
177 case '\t':
178 qstring_append(str, "\\t");
179 break;
180 default:
181 if (cp < 0) {
182 cp = 0xFFFD; /* replacement character */
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600183 }
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200184 if (cp > 0xFFFF) {
185 /* beyond BMP; need a surrogate pair */
186 snprintf(buf, sizeof(buf), "\\u%04X\\u%04X",
187 0xD800 + ((cp - 0x10000) >> 10),
188 0xDC00 + ((cp - 0x10000) & 0x3FF));
189 } else if (cp < 0x20 || cp >= 0x7F) {
190 snprintf(buf, sizeof(buf), "\\u%04X", cp);
191 } else {
192 buf[0] = cp;
193 buf[1] = 0;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600194 }
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200195 qstring_append(str, buf);
196 }
197 };
198
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600199 qstring_append(str, "\"");
200 break;
201 }
202 case QTYPE_QDICT: {
203 ToJsonIterState s;
204 QDict *val = qobject_to_qdict(obj);
205
206 s.count = 0;
207 s.str = str;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100208 s.indent = indent + 1;
209 s.pretty = pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600210 qstring_append(str, "{");
211 qdict_iter(val, to_json_dict_iter, &s);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100212 if (pretty) {
213 int j;
214 qstring_append(str, "\n");
215 for (j = 0 ; j < indent ; j++)
216 qstring_append(str, " ");
217 }
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600218 qstring_append(str, "}");
219 break;
220 }
221 case QTYPE_QLIST: {
222 ToJsonIterState s;
223 QList *val = qobject_to_qlist(obj);
224
225 s.count = 0;
226 s.str = str;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100227 s.indent = indent + 1;
228 s.pretty = pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600229 qstring_append(str, "[");
230 qlist_iter(val, (void *)to_json_list_iter, &s);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100231 if (pretty) {
232 int j;
233 qstring_append(str, "\n");
234 for (j = 0 ; j < indent ; j++)
235 qstring_append(str, " ");
236 }
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600237 qstring_append(str, "]");
238 break;
239 }
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600240 case QTYPE_QBOOL: {
241 QBool *val = qobject_to_qbool(obj);
242
Eric Blakefc48ffc2015-05-15 16:24:59 -0600243 if (qbool_get_bool(val)) {
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600244 qstring_append(str, "true");
245 } else {
246 qstring_append(str, "false");
247 }
248 break;
249 }
Markus Armbrustera7c31812015-04-29 15:35:04 -0600250 default:
Kevin Wolf69dd62d2013-07-08 16:14:21 +0200251 abort();
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600252 }
253}
254
255QString *qobject_to_json(const QObject *obj)
256{
257 QString *str = qstring_new();
258
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100259 to_json(obj, str, 0, 0);
260
261 return str;
262}
263
264QString *qobject_to_json_pretty(const QObject *obj)
265{
266 QString *str = qstring_new();
267
268 to_json(obj, str, 1, 0);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600269
270 return str;
271}