1 # -*- coding: utf-8 -*-
5 # Copyright (c) 2015-2019 Red Hat Inc.
8 # Markus Armbruster <armbru@redhat.com>
9 # Marc-André Lureau <marcandre.lureau@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.
14 from contextlib
import contextmanager
39 from .source
import QAPISourceInfo
42 def gen_special_features(features
: Sequence
[QAPISchemaFeature
]) -> str:
43 special_features
= [f
"1u << QAPI_{feat.name.upper()}"
44 for feat
in features
if feat
.is_special()]
45 return ' | '.join(special_features
) or '0'
49 def __init__(self
, fname
: str):
54 def preamble_add(self
, text
: str) -> None:
55 self
._preamble
+= text
57 def add(self
, text
: str) -> None:
60 def get_content(self
) -> str:
61 return self
._top
() + self
._preamble
+ self
._body
+ self
._bottom
()
63 def _top(self
) -> str:
64 # pylint: disable=no-self-use
67 def _bottom(self
) -> str:
68 # pylint: disable=no-self-use
71 def write(self
, output_dir
: str) -> None:
72 # Include paths starting with ../ are used to reuse modules of the main
73 # schema in specialised schemas. Don't overwrite the files that are
74 # already generated for the main schema.
75 if self
.fname
.startswith('../'):
77 pathname
= os
.path
.join(output_dir
, self
.fname
)
78 odir
= os
.path
.dirname(pathname
)
81 os
.makedirs(odir
, exist_ok
=True)
83 # use os.open for O_CREAT to create and read a non-existant file
84 fd
= os
.open(pathname
, os
.O_RDWR | os
.O_CREAT
, 0o666)
85 with os
.fdopen(fd
, 'r+', encoding
='utf-8') as fp
:
86 text
= self
.get_content()
87 oldtext
= fp
.read(len(text
) + 1)
94 def _wrap_ifcond(ifcond
: QAPISchemaIfCond
, before
: str, after
: str) -> str:
96 return after
# suppress empty #if ... #endif
98 assert after
.startswith(before
)
100 added
= after
[len(before
):]
104 out
+= ifcond
.gen_if()
106 out
+= ifcond
.gen_endif()
110 def build_params(arg_type
: Optional
[QAPISchemaObjectType
],
112 extra
: Optional
[str] = None) -> str:
117 ret
+= '%s arg' % arg_type
.c_param_type()
120 assert not arg_type
.variants
121 for memb
in arg_type
.members
:
125 ret
+= 'bool has_%s, ' % c_name(memb
.name
)
126 ret
+= '%s %s' % (memb
.type.c_param_type(),
130 return ret
if ret
else 'void'
133 class QAPIGenCCode(QAPIGen
):
134 def __init__(self
, fname
: str):
135 super().__init
__(fname
)
136 self
._start
_if
: Optional
[Tuple
[QAPISchemaIfCond
, str, str]] = None
138 def start_if(self
, ifcond
: QAPISchemaIfCond
) -> None:
139 assert self
._start
_if
is None
140 self
._start
_if
= (ifcond
, self
._body
, self
._preamble
)
142 def end_if(self
) -> None:
143 assert self
._start
_if
is not None
144 self
._body
= _wrap_ifcond(self
._start
_if
[0],
145 self
._start
_if
[1], self
._body
)
146 self
._preamble
= _wrap_ifcond(self
._start
_if
[0],
147 self
._start
_if
[2], self
._preamble
)
148 self
._start
_if
= None
150 def get_content(self
) -> str:
151 assert self
._start
_if
is None
152 return super().get_content()
155 class QAPIGenC(QAPIGenCCode
):
156 def __init__(self
, fname
: str, blurb
: str, pydoc
: str):
157 super().__init
__(fname
)
159 self
._copyright
= '\n * '.join(re
.findall(r
'^Copyright .*', pydoc
,
162 def _top(self
) -> str:
164 /* AUTOMATICALLY GENERATED, DO NOT MODIFY */
171 * This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
172 * See the COPYING.LIB file in the top-level directory.
176 blurb
=self
._blurb
, copyright
=self
._copyright
)
178 def _bottom(self
) -> str:
181 /* Dummy declaration to prevent empty .o file */
182 char qapi_dummy_%(name)s;
184 name
=c_fname(self
.fname
))
187 class QAPIGenH(QAPIGenC
):
188 def _top(self
) -> str:
189 return super()._top
() + guardstart(self
.fname
)
191 def _bottom(self
) -> str:
192 return guardend(self
.fname
)
195 class QAPIGenTrace(QAPIGen
):
196 def _top(self
) -> str:
197 return super()._top
() + '# AUTOMATICALLY GENERATED, DO NOT MODIFY\n\n'
201 def ifcontext(ifcond
: QAPISchemaIfCond
, *args
: QAPIGenCCode
) -> Iterator
[None]:
203 A with-statement context manager that wraps with `start_if()` / `end_if()`.
205 :param ifcond: A sequence of conditionals, passed to `start_if()`.
206 :param args: any number of `QAPIGenCCode`.
210 with ifcontext(ifcond, self._genh, self._genc):
211 modify self._genh and self._genc ...
213 Is equivalent to calling::
215 self._genh.start_if(ifcond)
216 self._genc.start_if(ifcond)
217 modify self._genh and self._genc ...
228 class QAPISchemaMonolithicCVisitor(QAPISchemaVisitor
):
234 self
._prefix
= prefix
236 self
._genc
= QAPIGenC(self
._prefix
+ self
._what
+ '.c',
238 self
._genh
= QAPIGenH(self
._prefix
+ self
._what
+ '.h',
241 def write(self
, output_dir
: str) -> None:
242 self
._genc
.write(output_dir
)
243 self
._genh
.write(output_dir
)
246 class QAPISchemaModularCVisitor(QAPISchemaVisitor
):
251 builtin_blurb
: Optional
[str],
253 gen_tracing
: bool = False):
254 self
._prefix
= prefix
256 self
._user
_blurb
= user_blurb
257 self
._builtin
_blurb
= builtin_blurb
259 self
._current
_module
: Optional
[str] = None
260 self
._module
: Dict
[str, Tuple
[QAPIGenC
, QAPIGenH
,
261 Optional
[QAPIGenTrace
]]] = {}
262 self
._main
_module
: Optional
[str] = None
263 self
._gen
_tracing
= gen_tracing
266 def _genc(self
) -> QAPIGenC
:
267 assert self
._current
_module
is not None
268 return self
._module
[self
._current
_module
][0]
271 def _genh(self
) -> QAPIGenH
:
272 assert self
._current
_module
is not None
273 return self
._module
[self
._current
_module
][1]
276 def _gen_trace_events(self
) -> QAPIGenTrace
:
277 assert self
._gen
_tracing
278 assert self
._current
_module
is not None
279 gent
= self
._module
[self
._current
_module
][2]
280 assert gent
is not None
284 def _module_dirname(name
: str) -> str:
285 if QAPISchemaModule
.is_user_module(name
):
286 return os
.path
.dirname(name
)
289 def _module_basename(self
, what
: str, name
: str) -> str:
290 ret
= '' if QAPISchemaModule
.is_builtin_module(name
) else self
._prefix
291 if QAPISchemaModule
.is_user_module(name
):
292 basename
= os
.path
.basename(name
)
294 if name
!= self
._main
_module
:
295 ret
+= '-' + os
.path
.splitext(basename
)[0]
297 assert QAPISchemaModule
.is_system_module(name
)
298 ret
+= re
.sub(r
'-', '-' + name
[2:] + '-', what
)
301 def _module_filename(self
, what
: str, name
: str) -> str:
302 return os
.path
.join(self
._module
_dirname
(name
),
303 self
._module
_basename
(what
, name
))
305 def _add_module(self
, name
: str, blurb
: str) -> None:
306 if QAPISchemaModule
.is_user_module(name
):
307 if self
._main
_module
is None:
308 self
._main
_module
= name
309 basename
= self
._module
_filename
(self
._what
, name
)
310 genc
= QAPIGenC(basename
+ '.c', blurb
, self
._pydoc
)
311 genh
= QAPIGenH(basename
+ '.h', blurb
, self
._pydoc
)
313 gent
: Optional
[QAPIGenTrace
] = None
314 if self
._gen
_tracing
:
315 gent
= QAPIGenTrace(basename
+ '.trace-events')
317 self
._module
[name
] = (genc
, genh
, gent
)
318 self
._current
_module
= name
321 def _temp_module(self
, name
: str) -> Iterator
[None]:
322 old_module
= self
._current
_module
323 self
._current
_module
= name
325 self
._current
_module
= old_module
327 def write(self
, output_dir
: str, opt_builtins
: bool = False) -> None:
328 for name
, (genc
, genh
, gent
) in self
._module
.items():
329 if QAPISchemaModule
.is_builtin_module(name
) and not opt_builtins
:
331 genc
.write(output_dir
)
332 genh
.write(output_dir
)
334 gent
.write(output_dir
)
336 def _begin_builtin_module(self
) -> None:
339 def _begin_user_module(self
, name
: str) -> None:
342 def visit_module(self
, name
: str) -> None:
343 if QAPISchemaModule
.is_builtin_module(name
):
344 if self
._builtin
_blurb
:
345 self
._add
_module
(name
, self
._builtin
_blurb
)
346 self
._begin
_builtin
_module
()
348 # The built-in module has not been created. No code may
350 self
._current
_module
= None
352 assert QAPISchemaModule
.is_user_module(name
)
353 self
._add
_module
(name
, self
._user
_blurb
)
354 self
._begin
_user
_module
(name
)
356 def visit_include(self
, name
: str, info
: Optional
[QAPISourceInfo
]) -> None:
357 relname
= os
.path
.relpath(self
._module
_filename
(self
._what
, name
),
358 os
.path
.dirname(self
._genh
.fname
))
359 self
._genh
.preamble_add(mcgen('''
360 #include "%(relname)s.h"