]>
git.proxmox.com Git - qemu.git/blob - scripts/qapi-visit.py
2 # QAPI visitor generator
4 # Copyright IBM, Corp. 2011
7 # Anthony Liguori <aliguori@us.ibm.com>
8 # Michael Roth <mdroth@linux.vnet.ibm.com>
10 # This work is licensed under the terms of the GNU GPLv2.
11 # See the COPYING.LIB file in the top-level directory.
13 from ordereddict
import OrderedDict
20 def generate_visit_struct_body(field_prefix
, members
):
23 field_prefix
= field_prefix
+ "."
24 for argname
, argentry
, optional
, structured
in parse_args(members
):
27 visit_start_optional(m, (obj && *obj) ? &(*obj)->%(c_prefix)shas_%(c_name)s : NULL, "%(name)s", errp);
28 if ((*obj)->%(prefix)shas_%(c_name)s) {
30 c_prefix
=c_var(field_prefix
), prefix
=field_prefix
,
31 c_name
=c_var(argname
), name
=argname
)
36 visit_start_struct(m, NULL, "", "%(name)s", 0, errp);
39 ret
+= generate_visit_struct_body(field_prefix
+ argname
, argentry
)
41 visit_end_struct(m, errp);
45 visit_type_%(type)s(m, (obj && *obj) ? &(*obj)->%(c_prefix)s%(c_name)s : NULL, "%(name)s", errp);
47 c_prefix
=c_var(field_prefix
), prefix
=field_prefix
,
48 type=type_name(argentry
), c_name
=c_var(argname
),
55 visit_end_optional(m, errp);
59 def generate_visit_struct(name
, members
):
62 void visit_type_%(name)s(Visitor *m, %(name)s ** obj, const char *name, Error **errp)
64 visit_start_struct(m, (void **)obj, "%(name)s", name, sizeof(%(name)s), errp);
68 ret
+= generate_visit_struct_body("", members
)
72 visit_end_struct(m, errp);
77 def generate_visit_list(name
, members
):
80 void visit_type_%(name)sList(Visitor *m, %(name)sList ** obj, const char *name, Error **errp)
82 GenericList *i, **head = (GenericList **)obj;
84 visit_start_list(m, name, errp);
86 for (*head = i = visit_next_list(m, head, errp); i; i = visit_next_list(m, &i, errp)) {
87 %(name)sList *native_i = (%(name)sList *)i;
88 visit_type_%(name)s(m, &native_i->value, NULL, errp);
91 visit_end_list(m, errp);
96 def generate_visit_enum(name
, members
):
99 void visit_type_%(name)s(Visitor *m, %(name)s * obj, const char *name, Error **errp)
101 visit_type_enum(m, (int *)obj, %(name)s_lookup, "%(name)s", name, errp);
106 def generate_visit_union(name
, members
):
107 ret
= generate_visit_enum('%sKind' % name
, members
.keys())
111 void visit_type_%(name)s(Visitor *m, %(name)s ** obj, const char *name, Error **errp)
115 visit_start_struct(m, (void **)obj, "%(name)s", name, sizeof(%(name)s), &err);
116 visit_type_%(name)sKind(m, &(*obj)->kind, "type", &err);
118 error_propagate(errp, err);
121 switch ((*obj)->kind) {
127 case %(abbrev)s_KIND_%(enum)s:
128 visit_type_%(c_type)s(m, &(*obj)->%(c_name)s, "data", errp);
131 abbrev
= de_camel_case(name
).upper(),
132 enum
= de_camel_case(key
).upper(),
141 visit_end_struct(m, errp);
147 def generate_declaration(name
, members
, genlist
=True):
150 void visit_type_%(name)s(Visitor *m, %(name)s ** obj, const char *name, Error **errp);
156 void visit_type_%(name)sList(Visitor *m, %(name)sList ** obj, const char *name, Error **errp);
162 def generate_decl_enum(name
, members
, genlist
=True):
165 void visit_type_%(name)s(Visitor *m, %(name)s * obj, const char *name, Error **errp);
170 opts
, args
= getopt
.gnu_getopt(sys
.argv
[1:], "chp:o:",
171 ["source", "header", "prefix=", "output-dir="])
172 except getopt
.GetoptError
, err
:
178 c_file
= 'qapi-visit.c'
179 h_file
= 'qapi-visit.h'
185 if o
in ("-p", "--prefix"):
187 elif o
in ("-o", "--output-dir"):
189 elif o
in ("-c", "--source"):
191 elif o
in ("-h", "--header"):
194 if not do_c
and not do_h
:
198 c_file
= output_dir
+ prefix
+ c_file
199 h_file
= output_dir
+ prefix
+ h_file
202 os
.makedirs(output_dir
)
204 if e
.errno
!= errno
.EEXIST
:
207 def maybe_open(really
, name
, opt
):
209 return open(name
, opt
)
212 return StringIO
.StringIO()
214 fdef
= maybe_open(do_c
, c_file
, 'w')
215 fdecl
= maybe_open(do_h
, h_file
, 'w')
218 /* THIS FILE IS AUTOMATICALLY GENERATED, DO NOT MODIFY */
221 * schema-defined QAPI visitor functions
223 * Copyright IBM, Corp. 2011
226 * Anthony Liguori <aliguori@us.ibm.com>
228 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
229 * See the COPYING.LIB file in the top-level directory.
233 #include "%(header)s"
235 header
=basename(h_file
)))
237 fdecl
.write(mcgen('''
238 /* THIS FILE IS AUTOMATICALLY GENERATED, DO NOT MODIFY */
241 * schema-defined QAPI visitor function
243 * Copyright IBM, Corp. 2011
246 * Anthony Liguori <aliguori@us.ibm.com>
248 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
249 * See the COPYING.LIB file in the top-level directory.
256 #include "qapi/qapi-visit-core.h"
257 #include "%(prefix)sqapi-types.h"
259 prefix
=prefix
, guard
=guardname(h_file
)))
261 exprs
= parse_schema(sys
.stdin
)
264 if expr
.has_key('type'):
265 ret
= generate_visit_struct(expr
['type'], expr
['data'])
266 ret
+= generate_visit_list(expr
['type'], expr
['data'])
269 ret
= generate_declaration(expr
['type'], expr
['data'])
271 elif expr
.has_key('union'):
272 ret
= generate_visit_union(expr
['union'], expr
['data'])
273 ret
+= generate_visit_list(expr
['union'], expr
['data'])
276 ret
= generate_decl_enum('%sKind' % expr
['union'], expr
['data'].keys())
277 ret
+= generate_declaration(expr
['union'], expr
['data'])
279 elif expr
.has_key('enum'):
280 ret
= generate_visit_enum(expr
['enum'], expr
['data'])
283 ret
= generate_decl_enum(expr
['enum'], expr
['data'])