1 | /* |
2 | * QLit literal qobject |
3 | * |
4 | * Copyright IBM, Corp. 2009 |
5 | * Copyright (c) 2013, 2015, 2017 Red Hat Inc. |
6 | * |
7 | * Authors: |
8 | * Anthony Liguori <aliguori@us.ibm.com> |
9 | * Markus Armbruster <armbru@redhat.com> |
10 | * Marc-André Lureau <marcandre.lureau@redhat.com> |
11 | * |
12 | * This work is licensed under the terms of the GNU LGPL, version 2.1 or later. |
13 | * See the COPYING.LIB file in the top-level directory. |
14 | */ |
15 | |
16 | #include "qemu/osdep.h" |
17 | |
18 | #include "qapi/qmp/qlit.h" |
19 | #include "qapi/qmp/qbool.h" |
20 | #include "qapi/qmp/qlist.h" |
21 | #include "qapi/qmp/qnum.h" |
22 | #include "qapi/qmp/qdict.h" |
23 | #include "qapi/qmp/qstring.h" |
24 | #include "qapi/qmp/qnull.h" |
25 | |
26 | static bool qlit_equal_qdict(const QLitObject *lhs, const QDict *qdict) |
27 | { |
28 | int i; |
29 | |
30 | for (i = 0; lhs->value.qdict[i].key; i++) { |
31 | QObject *obj = qdict_get(qdict, lhs->value.qdict[i].key); |
32 | |
33 | if (!qlit_equal_qobject(&lhs->value.qdict[i].value, obj)) { |
34 | return false; |
35 | } |
36 | } |
37 | |
38 | /* Note: the literal qdict must not contain duplicates, this is |
39 | * considered a programming error and it isn't checked here. */ |
40 | if (qdict_size(qdict) != i) { |
41 | return false; |
42 | } |
43 | |
44 | return true; |
45 | } |
46 | |
47 | static bool qlit_equal_qlist(const QLitObject *lhs, const QList *qlist) |
48 | { |
49 | QListEntry *e; |
50 | int i = 0; |
51 | |
52 | QLIST_FOREACH_ENTRY(qlist, e) { |
53 | QObject *obj = qlist_entry_obj(e); |
54 | |
55 | if (!qlit_equal_qobject(&lhs->value.qlist[i], obj)) { |
56 | return false; |
57 | } |
58 | i++; |
59 | } |
60 | |
61 | return !e && lhs->value.qlist[i].type == QTYPE_NONE; |
62 | } |
63 | |
64 | bool qlit_equal_qobject(const QLitObject *lhs, const QObject *rhs) |
65 | { |
66 | if (!rhs || lhs->type != qobject_type(rhs)) { |
67 | return false; |
68 | } |
69 | |
70 | switch (lhs->type) { |
71 | case QTYPE_QBOOL: |
72 | return lhs->value.qbool == qbool_get_bool(qobject_to(QBool, rhs)); |
73 | case QTYPE_QNUM: |
74 | return lhs->value.qnum == qnum_get_int(qobject_to(QNum, rhs)); |
75 | case QTYPE_QSTRING: |
76 | return (strcmp(lhs->value.qstr, |
77 | qstring_get_str(qobject_to(QString, rhs))) == 0); |
78 | case QTYPE_QDICT: |
79 | return qlit_equal_qdict(lhs, qobject_to(QDict, rhs)); |
80 | case QTYPE_QLIST: |
81 | return qlit_equal_qlist(lhs, qobject_to(QList, rhs)); |
82 | case QTYPE_QNULL: |
83 | return true; |
84 | default: |
85 | break; |
86 | } |
87 | |
88 | return false; |
89 | } |
90 | |
91 | QObject *qobject_from_qlit(const QLitObject *qlit) |
92 | { |
93 | switch (qlit->type) { |
94 | case QTYPE_QNULL: |
95 | return QOBJECT(qnull()); |
96 | case QTYPE_QNUM: |
97 | return QOBJECT(qnum_from_int(qlit->value.qnum)); |
98 | case QTYPE_QSTRING: |
99 | return QOBJECT(qstring_from_str(qlit->value.qstr)); |
100 | case QTYPE_QDICT: { |
101 | QDict *qdict = qdict_new(); |
102 | QLitDictEntry *e; |
103 | |
104 | for (e = qlit->value.qdict; e->key; e++) { |
105 | qdict_put_obj(qdict, e->key, qobject_from_qlit(&e->value)); |
106 | } |
107 | return QOBJECT(qdict); |
108 | } |
109 | case QTYPE_QLIST: { |
110 | QList *qlist = qlist_new(); |
111 | QLitObject *e; |
112 | |
113 | for (e = qlit->value.qlist; e->type != QTYPE_NONE; e++) { |
114 | qlist_append_obj(qlist, qobject_from_qlit(e)); |
115 | } |
116 | return QOBJECT(qlist); |
117 | } |
118 | case QTYPE_QBOOL: |
119 | return QOBJECT(qbool_from_bool(qlit->value.qbool)); |
120 | default: |
121 | assert(0); |
122 | } |
123 | |
124 | return NULL; |
125 | } |
126 | |