2012-04-03 20:48:12 +02:00
|
|
|
# -*- coding: utf-8 -*-
|
|
|
|
|
|
|
|
"""
|
2014-02-23 20:37:30 +01:00
|
|
|
trace/generated-tracers.dtrace (DTrace only).
|
2012-04-03 20:48:12 +02:00
|
|
|
"""
|
|
|
|
|
|
|
|
__author__ = "Lluís Vilanova <vilanova@ac.upc.edu>"
|
2014-02-23 20:37:30 +01:00
|
|
|
__copyright__ = "Copyright 2012-2014, Lluís Vilanova <vilanova@ac.upc.edu>"
|
2012-04-03 20:48:12 +02:00
|
|
|
__license__ = "GPL version 2 or (at your option) any later version"
|
|
|
|
|
|
|
|
__maintainer__ = "Stefan Hajnoczi"
|
2020-05-11 10:28:16 +02:00
|
|
|
__email__ = "stefanha@redhat.com"
|
2012-04-03 20:48:12 +02:00
|
|
|
|
|
|
|
|
|
|
|
from tracetool import out
|
2020-07-17 11:35:14 +02:00
|
|
|
from sys import platform
|
2012-04-03 20:48:12 +02:00
|
|
|
|
|
|
|
|
2014-08-14 12:39:23 +02:00
|
|
|
# Reserved keywords from
|
|
|
|
# https://wikis.oracle.com/display/DTrace/Types,+Operators+and+Expressions
|
|
|
|
RESERVED_WORDS = (
|
|
|
|
'auto', 'goto', 'sizeof', 'break', 'if', 'static', 'case', 'import',
|
|
|
|
'string', 'char', 'inline', 'stringof', 'const', 'int', 'struct',
|
|
|
|
'continue', 'long', 'switch', 'counter', 'offsetof', 'this',
|
|
|
|
'default', 'probe', 'translator', 'do', 'provider', 'typedef',
|
|
|
|
'double', 'register', 'union', 'else', 'restrict', 'unsigned',
|
|
|
|
'enum', 'return', 'void', 'extern', 'self', 'volatile', 'float',
|
|
|
|
'short', 'while', 'for', 'signed', 'xlate',
|
|
|
|
)
|
|
|
|
|
|
|
|
|
2016-10-04 15:35:59 +02:00
|
|
|
def generate(events, backend, group):
|
2014-02-23 20:37:40 +01:00
|
|
|
events = [e for e in events
|
|
|
|
if "disable" not in e.properties]
|
|
|
|
|
2019-03-21 18:08:31 +01:00
|
|
|
# SystemTap's dtrace(1) warns about empty "provider qemu {}" but is happy
|
|
|
|
# with an empty file. Avoid the warning.
|
2020-07-17 11:35:14 +02:00
|
|
|
# But dtrace on macOS can't deal with empty files.
|
|
|
|
if not events and platform != "darwin":
|
2019-03-21 18:08:31 +01:00
|
|
|
return
|
|
|
|
|
2014-02-23 20:37:40 +01:00
|
|
|
out('/* This file is autogenerated by tracetool, do not edit. */'
|
|
|
|
'',
|
|
|
|
'provider qemu {')
|
|
|
|
|
|
|
|
for e in events:
|
2014-08-14 12:39:23 +02:00
|
|
|
args = []
|
|
|
|
for type_, name in e.args:
|
2020-07-17 11:35:14 +02:00
|
|
|
if platform == "darwin":
|
|
|
|
# macOS dtrace accepts only C99 _Bool
|
|
|
|
if type_ == 'bool':
|
|
|
|
type_ = '_Bool'
|
|
|
|
if type_ == 'bool *':
|
|
|
|
type_ = '_Bool *'
|
|
|
|
# It converts int8_t * in probe points to char * in header
|
|
|
|
# files and introduces [-Wpointer-sign] warning.
|
|
|
|
# Avoid it by changing probe type to signed char * beforehand.
|
|
|
|
if type_ == 'int8_t *':
|
|
|
|
type_ = 'signed char *'
|
2014-08-14 12:39:23 +02:00
|
|
|
if name in RESERVED_WORDS:
|
|
|
|
name += '_'
|
|
|
|
args.append(type_ + ' ' + name)
|
2014-02-23 20:37:40 +01:00
|
|
|
|
|
|
|
# Define prototype for probe arguments
|
|
|
|
out('',
|
|
|
|
'probe %(name)s(%(args)s);',
|
|
|
|
name=e.name,
|
2014-08-14 12:39:23 +02:00
|
|
|
args=','.join(args))
|
2014-02-23 20:37:40 +01:00
|
|
|
|
|
|
|
out('',
|
|
|
|
'};')
|