]>
git.proxmox.com Git - mirror_qemu.git/blob - scripts/qapi-types.py
4 # Copyright IBM, Corp. 2011
5 # Copyright (c) 2013-2015 Red Hat Inc.
8 # Anthony Liguori <aliguori@us.ibm.com>
9 # Markus Armbruster <armbru@redhat.com>
11 # This work is licensed under the terms of the GNU GPL, version 2.
12 # See the COPYING file in the top-level directory.
17 def gen_fwd_object_or_array(name
):
20 typedef struct %(c_name)s %(c_name)s;
25 def gen_array(name
, element_type
):
36 c_name
=c_name(name
), c_type
=element_type
.c_type())
39 def gen_struct_field(name
, typ
, optional
):
48 %(c_type)s %(c_name)s;
50 c_type
=typ
.c_type(), c_name
=c_name(name
))
54 def gen_struct_fields(local_members
, base
=None):
59 /* Members inherited from %(c_name)s: */
62 for memb
in base
.members
:
63 ret
+= gen_struct_field(memb
.name
, memb
.type, memb
.optional
)
68 for memb
in local_members
:
69 ret
+= gen_struct_field(memb
.name
, memb
.type, memb
.optional
)
73 def gen_struct(name
, base
, members
):
80 ret
+= gen_struct_fields(members
, base
)
82 # Make sure that all structs have at least one field; this avoids
83 # potential issues with attempting to malloc space for zero-length
84 # structs in C, and also incompatibility with C++ (where an empty
86 if not (base
and base
.members
) and not members
:
88 char qapi_dummy_field_for_empty_struct;
98 def gen_upcast(name
, base
):
99 # C makes const-correctness ugly. We have to cast away const to let
100 # this function work for both const and non-const obj.
103 static inline %(base)s *qapi_%(c_name)s_base(const %(c_name)s *obj)
105 return (%(base)s *)obj;
108 c_name
=c_name(name
), base
=base
.c_name())
111 def gen_alternate_qtypes_decl(name
):
114 extern const int %(c_name)s_qtypes[];
119 def gen_alternate_qtypes(name
, variants
):
122 const int %(c_name)s_qtypes[QTYPE_MAX] = {
126 for var
in variants
.variants
:
127 qtype
= var
.type.alternate_qtype()
131 [%(qtype)s] = %(enum_const)s,
134 enum_const
=c_enum_const(variants
.tag_member
.type.name
,
143 def gen_union(name
, base
, variants
):
150 ret
+= gen_struct_fields([], base
)
152 ret
+= gen_struct_field(variants
.tag_member
.name
,
153 variants
.tag_member
.type,
156 # FIXME: What purpose does data serve, besides preventing a union that
157 # has a branch named 'data'? We use it in qapi-visit.py to decide
158 # whether to bypass the switch statement if visiting the discriminator
159 # failed; but since we 0-initialize structs, and cannot tell what
160 # branch of the union is in use if the discriminator is invalid, there
161 # should not be any data leaks even without a data pointer. Or, if
162 # 'data' is merely added to guarantee we don't have an empty union,
163 # shouldn't we enforce that at .json parse time?
165 union { /* union tag is @%(c_name)s */
168 c_name
=c_name(variants
.tag_member
.name
))
170 for var
in variants
.variants
:
171 # Ugly special case for simple union TODO get rid of it
172 typ
= var
.simple_union_type() or var
.type
174 %(c_type)s %(c_name)s;
177 c_name
=c_name(var
.name
))
187 def gen_type_cleanup_decl(name
):
190 void qapi_free_%(c_name)s(%(c_name)s *obj);
196 def gen_type_cleanup(name
):
199 void qapi_free_%(c_name)s(%(c_name)s *obj)
201 QapiDeallocVisitor *qdv;
208 qdv = qapi_dealloc_visitor_new();
209 v = qapi_dealloc_get_visitor(qdv);
210 visit_type_%(c_name)s(v, &obj, NULL, NULL);
211 qapi_dealloc_visitor_cleanup(qdv);
218 class QAPISchemaGenTypeVisitor(QAPISchemaVisitor
):
226 def visit_begin(self
, schema
):
231 self
._btin
= guardstart('QAPI_TYPES_BUILTIN')
234 self
.decl
= self
._fwdecl
+ self
.decl
236 self
.defn
= self
._fwdefn
+ self
.defn
238 # To avoid header dependency hell, we always generate
239 # declarations for built-in types in our header files and
240 # simply guard them. See also do_builtins (command line
242 self
._btin
+= guardend('QAPI_TYPES_BUILTIN')
243 self
.decl
= self
._btin
+ self
.decl
246 def visit_needed(self
, entity
):
247 # Visit everything except implicit objects
248 return not (entity
.is_implicit() and
249 isinstance(entity
, QAPISchemaObjectType
))
251 def _gen_type_cleanup(self
, name
):
252 self
.decl
+= gen_type_cleanup_decl(name
)
253 self
.defn
+= gen_type_cleanup(name
)
255 def visit_enum_type(self
, name
, info
, values
, prefix
):
256 self
._fwdecl
+= gen_enum(name
, values
, prefix
)
257 self
._fwdefn
+= gen_enum_lookup(name
, values
, prefix
)
259 def visit_array_type(self
, name
, info
, element_type
):
260 if isinstance(element_type
, QAPISchemaBuiltinType
):
261 self
._btin
+= gen_fwd_object_or_array(name
)
262 self
._btin
+= gen_array(name
, element_type
)
263 self
._btin
+= gen_type_cleanup_decl(name
)
265 self
.defn
+= gen_type_cleanup(name
)
267 self
._fwdecl
+= gen_fwd_object_or_array(name
)
268 self
.decl
+= gen_array(name
, element_type
)
269 self
._gen
_type
_cleanup
(name
)
271 def visit_object_type(self
, name
, info
, base
, members
, variants
):
272 self
._fwdecl
+= gen_fwd_object_or_array(name
)
274 assert not members
# not implemented
275 self
.decl
+= gen_union(name
, base
, variants
)
277 self
.decl
+= gen_struct(name
, base
, members
)
279 self
.decl
+= gen_upcast(name
, base
)
280 self
._gen
_type
_cleanup
(name
)
282 def visit_alternate_type(self
, name
, info
, variants
):
283 self
._fwdecl
+= gen_fwd_object_or_array(name
)
284 self
._fwdefn
+= gen_alternate_qtypes(name
, variants
)
285 self
.decl
+= gen_union(name
, None, variants
)
286 self
.decl
+= gen_alternate_qtypes_decl(name
)
287 self
._gen
_type
_cleanup
(name
)
289 # If you link code generated from multiple schemata, you want only one
290 # instance of the code for built-in types. Generate it only when
291 # do_builtins, enabled by command line option -b. See also
292 # QAPISchemaGenTypeVisitor.visit_end().
295 (input_file
, output_dir
, do_c
, do_h
, prefix
, opts
) = \
296 parse_command_line("b", ["builtins"])
299 if o
in ("-b", "--builtins"):
304 * deallocation functions for schema-defined QAPI types
306 * Copyright IBM, Corp. 2011
309 * Anthony Liguori <aliguori@us.ibm.com>
310 * Michael Roth <mdroth@linux.vnet.ibm.com>
312 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
313 * See the COPYING.LIB file in the top-level directory.
319 * schema-defined QAPI types
321 * Copyright IBM, Corp. 2011
324 * Anthony Liguori <aliguori@us.ibm.com>
326 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
327 * See the COPYING.LIB file in the top-level directory.
332 (fdef
, fdecl
) = open_output(output_dir
, do_c
, do_h
, prefix
,
333 'qapi-types.c', 'qapi-types.h',
334 c_comment
, h_comment
)
337 #include "qapi/dealloc-visitor.h"
338 #include "%(prefix)sqapi-types.h"
339 #include "%(prefix)sqapi-visit.h"
343 fdecl
.write(mcgen('''
346 #include "qapi/qmp/qobject.h"
349 schema
= QAPISchema(input_file
)
350 gen
= QAPISchemaGenTypeVisitor()
353 fdecl
.write(gen
.decl
)
355 close_output(fdef
, fdecl
)