blob: 12c576d548d1935b774e6d7419468e00ddaaeede [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
Paolo Bonzini7b1b5d12012-12-17 18:19:43 +010014#include "qapi/qmp/json-lexer.h"
15#include "qapi/qmp/json-parser.h"
16#include "qapi/qmp/json-streamer.h"
17#include "qapi/qmp/qjson.h"
18#include "qapi/qmp/qint.h"
19#include "qapi/qmp/qlist.h"
20#include "qapi/qmp/qbool.h"
21#include "qapi/qmp/qfloat.h"
22#include "qapi/qmp/qdict.h"
Anthony Liguorib4748b92009-11-11 10:42:41 -060023
24typedef struct JSONParsingState
25{
26 JSONMessageParser parser;
27 va_list *ap;
28 QObject *result;
29} JSONParsingState;
30
31static void parse_json(JSONMessageParser *parser, QList *tokens)
32{
33 JSONParsingState *s = container_of(parser, JSONParsingState, parser);
34 s->result = json_parser_parse(tokens, s->ap);
35}
36
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020037QObject *qobject_from_jsonv(const char *string, va_list *ap)
Anthony Liguorib4748b92009-11-11 10:42:41 -060038{
39 JSONParsingState state = {};
40
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020041 state.ap = ap;
42
Anthony Liguorib4748b92009-11-11 10:42:41 -060043 json_message_parser_init(&state.parser, parse_json);
44 json_message_parser_feed(&state.parser, string, strlen(string));
45 json_message_parser_flush(&state.parser);
46 json_message_parser_destroy(&state.parser);
47
48 return state.result;
49}
50
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020051QObject *qobject_from_json(const char *string)
52{
53 return qobject_from_jsonv(string, NULL);
54}
55
Luiz Capitulino668e3ca2010-02-08 17:01:27 -020056/*
57 * IMPORTANT: This function aborts on error, thus it must not
58 * be used with untrusted arguments.
59 */
Anthony Liguorib4748b92009-11-11 10:42:41 -060060QObject *qobject_from_jsonf(const char *string, ...)
61{
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020062 QObject *obj;
Anthony Liguorib4748b92009-11-11 10:42:41 -060063 va_list ap;
64
65 va_start(ap, string);
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020066 obj = qobject_from_jsonv(string, &ap);
Anthony Liguorib4748b92009-11-11 10:42:41 -060067 va_end(ap);
68
Luiz Capitulino668e3ca2010-02-08 17:01:27 -020069 assert(obj != NULL);
Luiz Capitulino8ff5a7d2009-11-18 23:05:24 -020070 return obj;
Anthony Liguorib4748b92009-11-11 10:42:41 -060071}
Anthony Liguori1fd825f2009-11-11 12:01:22 -060072
73typedef struct ToJsonIterState
74{
Daniel P. Berrange212b6002010-06-07 15:42:14 +010075 int indent;
76 int pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -060077 int count;
78 QString *str;
79} ToJsonIterState;
80
Daniel P. Berrange212b6002010-06-07 15:42:14 +010081static void to_json(const QObject *obj, QString *str, int pretty, int indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -060082
83static void to_json_dict_iter(const char *key, QObject *obj, void *opaque)
84{
85 ToJsonIterState *s = opaque;
86 QString *qkey;
Daniel P. Berrange212b6002010-06-07 15:42:14 +010087 int j;
Anthony Liguori1fd825f2009-11-11 12:01:22 -060088
Max Reitz4b585542014-11-21 10:29:59 +010089 if (s->count) {
90 qstring_append(s->str, s->pretty ? "," : ", ");
91 }
Daniel P. Berrange212b6002010-06-07 15:42:14 +010092
93 if (s->pretty) {
94 qstring_append(s->str, "\n");
95 for (j = 0 ; j < s->indent ; j++)
96 qstring_append(s->str, " ");
Anthony Liguori1fd825f2009-11-11 12:01:22 -060097 }
98
99 qkey = qstring_from_str(key);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100100 to_json(QOBJECT(qkey), s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600101 QDECREF(qkey);
102
103 qstring_append(s->str, ": ");
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100104 to_json(obj, s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600105 s->count++;
106}
107
108static void to_json_list_iter(QObject *obj, void *opaque)
109{
110 ToJsonIterState *s = opaque;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100111 int j;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600112
Max Reitz4b585542014-11-21 10:29:59 +0100113 if (s->count) {
114 qstring_append(s->str, s->pretty ? "," : ", ");
115 }
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100116
117 if (s->pretty) {
118 qstring_append(s->str, "\n");
119 for (j = 0 ; j < s->indent ; j++)
120 qstring_append(s->str, " ");
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600121 }
122
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100123 to_json(obj, s->str, s->pretty, s->indent);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600124 s->count++;
125}
126
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100127static void to_json(const QObject *obj, QString *str, int pretty, int indent)
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600128{
129 switch (qobject_type(obj)) {
130 case QTYPE_QINT: {
131 QInt *val = qobject_to_qint(obj);
132 char buffer[1024];
133
134 snprintf(buffer, sizeof(buffer), "%" PRId64, qint_get_int(val));
135 qstring_append(str, buffer);
136 break;
137 }
138 case QTYPE_QSTRING: {
139 QString *val = qobject_to_qstring(obj);
140 const char *ptr;
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200141 int cp;
142 char buf[16];
143 char *end;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600144
145 ptr = qstring_get_str(val);
146 qstring_append(str, "\"");
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600147
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200148 for (; *ptr; ptr = end) {
149 cp = mod_utf8_codepoint(ptr, 6, &end);
150 switch (cp) {
151 case '\"':
152 qstring_append(str, "\\\"");
153 break;
154 case '\\':
155 qstring_append(str, "\\\\");
156 break;
157 case '\b':
158 qstring_append(str, "\\b");
159 break;
160 case '\f':
161 qstring_append(str, "\\f");
162 break;
163 case '\n':
164 qstring_append(str, "\\n");
165 break;
166 case '\r':
167 qstring_append(str, "\\r");
168 break;
169 case '\t':
170 qstring_append(str, "\\t");
171 break;
172 default:
173 if (cp < 0) {
174 cp = 0xFFFD; /* replacement character */
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600175 }
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200176 if (cp > 0xFFFF) {
177 /* beyond BMP; need a surrogate pair */
178 snprintf(buf, sizeof(buf), "\\u%04X\\u%04X",
179 0xD800 + ((cp - 0x10000) >> 10),
180 0xDC00 + ((cp - 0x10000) & 0x3FF));
181 } else if (cp < 0x20 || cp >= 0x7F) {
182 snprintf(buf, sizeof(buf), "\\u%04X", cp);
183 } else {
184 buf[0] = cp;
185 buf[1] = 0;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600186 }
Markus Armbrustere2ec3f92013-04-11 18:07:21 +0200187 qstring_append(str, buf);
188 }
189 };
190
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600191 qstring_append(str, "\"");
192 break;
193 }
194 case QTYPE_QDICT: {
195 ToJsonIterState s;
196 QDict *val = qobject_to_qdict(obj);
197
198 s.count = 0;
199 s.str = str;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100200 s.indent = indent + 1;
201 s.pretty = pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600202 qstring_append(str, "{");
203 qdict_iter(val, to_json_dict_iter, &s);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100204 if (pretty) {
205 int j;
206 qstring_append(str, "\n");
207 for (j = 0 ; j < indent ; j++)
208 qstring_append(str, " ");
209 }
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600210 qstring_append(str, "}");
211 break;
212 }
213 case QTYPE_QLIST: {
214 ToJsonIterState s;
215 QList *val = qobject_to_qlist(obj);
216
217 s.count = 0;
218 s.str = str;
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100219 s.indent = indent + 1;
220 s.pretty = pretty;
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600221 qstring_append(str, "[");
222 qlist_iter(val, (void *)to_json_list_iter, &s);
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100223 if (pretty) {
224 int j;
225 qstring_append(str, "\n");
226 for (j = 0 ; j < indent ; j++)
227 qstring_append(str, " ");
228 }
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600229 qstring_append(str, "]");
230 break;
231 }
232 case QTYPE_QFLOAT: {
233 QFloat *val = qobject_to_qfloat(obj);
234 char buffer[1024];
235 int len;
236
237 len = snprintf(buffer, sizeof(buffer), "%f", qfloat_get_double(val));
238 while (len > 0 && buffer[len - 1] == '0') {
239 len--;
240 }
241
242 if (len && buffer[len - 1] == '.') {
243 buffer[len - 1] = 0;
244 } else {
245 buffer[len] = 0;
246 }
247
248 qstring_append(str, buffer);
249 break;
250 }
251 case QTYPE_QBOOL: {
252 QBool *val = qobject_to_qbool(obj);
253
254 if (qbool_get_int(val)) {
255 qstring_append(str, "true");
256 } else {
257 qstring_append(str, "false");
258 }
259 break;
260 }
Luiz Capitulino9f9daf92009-11-18 23:05:30 -0200261 case QTYPE_QERROR:
262 /* XXX: should QError be emitted? */
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600263 case QTYPE_NONE:
264 break;
Kevin Wolf69dd62d2013-07-08 16:14:21 +0200265 case QTYPE_MAX:
266 abort();
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600267 }
268}
269
270QString *qobject_to_json(const QObject *obj)
271{
272 QString *str = qstring_new();
273
Daniel P. Berrange212b6002010-06-07 15:42:14 +0100274 to_json(obj, str, 0, 0);
275
276 return str;
277}
278
279QString *qobject_to_json_pretty(const QObject *obj)
280{
281 QString *str = qstring_new();
282
283 to_json(obj, str, 1, 0);
Anthony Liguori1fd825f2009-11-11 12:01:22 -0600284
285 return str;
286}