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