4 * Copyright (C) 2012-2016 Red Hat, Inc.
5 * Copyright IBM, Corp. 2011
8 * Michael Roth <mdroth@linux.vnet.ibm.com>
10 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
11 * See the COPYING.LIB file in the top-level directory.
15 #include "qemu/osdep.h"
16 #include "qapi/dealloc-visitor.h"
17 #include "qemu/queue.h"
18 #include "qemu-common.h"
19 #include "qapi/qmp/types.h"
20 #include "qapi/visitor-impl.h"
22 typedef struct StackEntry
26 QTAILQ_ENTRY(StackEntry
) node
;
29 struct QapiDeallocVisitor
32 QTAILQ_HEAD(, StackEntry
) stack
;
35 static QapiDeallocVisitor
*to_qov(Visitor
*v
)
37 return container_of(v
, QapiDeallocVisitor
, visitor
);
40 static void qapi_dealloc_push(QapiDeallocVisitor
*qov
, void *value
)
42 StackEntry
*e
= g_malloc0(sizeof(*e
));
46 /* see if we're just pushing a list head tracker */
48 e
->is_list_head
= true;
50 QTAILQ_INSERT_HEAD(&qov
->stack
, e
, node
);
53 static void *qapi_dealloc_pop(QapiDeallocVisitor
*qov
)
55 StackEntry
*e
= QTAILQ_FIRST(&qov
->stack
);
57 QTAILQ_REMOVE(&qov
->stack
, e
, node
);
63 static void qapi_dealloc_start_struct(Visitor
*v
, const char *name
, void **obj
,
64 size_t unused
, Error
**errp
)
66 QapiDeallocVisitor
*qov
= to_qov(v
);
67 qapi_dealloc_push(qov
, obj
);
70 static void qapi_dealloc_end_struct(Visitor
*v
, Error
**errp
)
72 QapiDeallocVisitor
*qov
= to_qov(v
);
73 void **obj
= qapi_dealloc_pop(qov
);
79 static void qapi_dealloc_start_implicit_struct(Visitor
*v
,
84 QapiDeallocVisitor
*qov
= to_qov(v
);
85 qapi_dealloc_push(qov
, obj
);
88 static void qapi_dealloc_end_implicit_struct(Visitor
*v
)
90 QapiDeallocVisitor
*qov
= to_qov(v
);
91 void **obj
= qapi_dealloc_pop(qov
);
97 static void qapi_dealloc_start_list(Visitor
*v
, const char *name
, Error
**errp
)
99 QapiDeallocVisitor
*qov
= to_qov(v
);
100 qapi_dealloc_push(qov
, NULL
);
103 static GenericList
*qapi_dealloc_next_list(Visitor
*v
, GenericList
**listp
)
105 GenericList
*list
= *listp
;
106 QapiDeallocVisitor
*qov
= to_qov(v
);
107 StackEntry
*e
= QTAILQ_FIRST(&qov
->stack
);
109 if (e
&& e
->is_list_head
) {
110 e
->is_list_head
= false;
123 static void qapi_dealloc_end_list(Visitor
*v
)
125 QapiDeallocVisitor
*qov
= to_qov(v
);
126 void *obj
= qapi_dealloc_pop(qov
);
127 assert(obj
== NULL
); /* should've been list head tracker with no payload */
130 static void qapi_dealloc_type_str(Visitor
*v
, const char *name
, char **obj
,
138 static void qapi_dealloc_type_int64(Visitor
*v
, const char *name
, int64_t *obj
,
143 static void qapi_dealloc_type_uint64(Visitor
*v
, const char *name
,
144 uint64_t *obj
, Error
**errp
)
148 static void qapi_dealloc_type_bool(Visitor
*v
, const char *name
, bool *obj
,
153 static void qapi_dealloc_type_number(Visitor
*v
, const char *name
, double *obj
,
158 static void qapi_dealloc_type_anything(Visitor
*v
, const char *name
,
159 QObject
**obj
, Error
**errp
)
162 qobject_decref(*obj
);
166 static void qapi_dealloc_type_enum(Visitor
*v
, const char *name
, int *obj
,
167 const char * const strings
[], Error
**errp
)
171 /* If there's no data present, the dealloc visitor has nothing to free.
172 * Thus, indicate to visitor code that the subsequent union fields can
173 * be skipped. This is not an error condition, since the cleanup of the
174 * rest of an object can continue unhindered, so leave errp unset in
177 * NOTE: In cases where we're attempting to deallocate an object that
178 * may have missing fields, the field indicating the union type may
179 * be missing. In such a case, it's possible we don't have enough
180 * information to differentiate data_present == false from a case where
181 * data *is* present but happens to be a scalar with a value of 0.
182 * This is okay, since in the case of the dealloc visitor there's no
183 * work that needs to done in either situation.
185 * The current inability in QAPI code to more thoroughly verify a union
186 * type in such cases will likely need to be addressed if we wish to
187 * implement this interface for other types of visitors in the future,
190 static bool qapi_dealloc_start_union(Visitor
*v
, bool data_present
,
196 Visitor
*qapi_dealloc_get_visitor(QapiDeallocVisitor
*v
)
201 void qapi_dealloc_visitor_cleanup(QapiDeallocVisitor
*v
)
206 QapiDeallocVisitor
*qapi_dealloc_visitor_new(void)
208 QapiDeallocVisitor
*v
;
210 v
= g_malloc0(sizeof(*v
));
212 v
->visitor
.start_struct
= qapi_dealloc_start_struct
;
213 v
->visitor
.end_struct
= qapi_dealloc_end_struct
;
214 v
->visitor
.start_implicit_struct
= qapi_dealloc_start_implicit_struct
;
215 v
->visitor
.end_implicit_struct
= qapi_dealloc_end_implicit_struct
;
216 v
->visitor
.start_list
= qapi_dealloc_start_list
;
217 v
->visitor
.next_list
= qapi_dealloc_next_list
;
218 v
->visitor
.end_list
= qapi_dealloc_end_list
;
219 v
->visitor
.type_enum
= qapi_dealloc_type_enum
;
220 v
->visitor
.type_int64
= qapi_dealloc_type_int64
;
221 v
->visitor
.type_uint64
= qapi_dealloc_type_uint64
;
222 v
->visitor
.type_bool
= qapi_dealloc_type_bool
;
223 v
->visitor
.type_str
= qapi_dealloc_type_str
;
224 v
->visitor
.type_number
= qapi_dealloc_type_number
;
225 v
->visitor
.type_any
= qapi_dealloc_type_anything
;
226 v
->visitor
.start_union
= qapi_dealloc_start_union
;
228 QTAILQ_INIT(&v
->stack
);