|
@@ -1827,6 +1827,25 @@ sub reset_state {
|
|
|
$state = 0;
|
|
|
}
|
|
|
|
|
|
+sub tracepoint_munge($) {
|
|
|
+ my $file = shift;
|
|
|
+ my $tracepointname = 0;
|
|
|
+ my $tracepointargs = 0;
|
|
|
+
|
|
|
+ if($prototype =~ m/TRACE_EVENT\((.*?),/) {
|
|
|
+ $tracepointname = $1;
|
|
|
+ }
|
|
|
+ if($prototype =~ m/TP_PROTO\((.*?)\)/) {
|
|
|
+ $tracepointargs = $1;
|
|
|
+ }
|
|
|
+ if (($tracepointname eq 0) || ($tracepointargs eq 0)) {
|
|
|
+ print STDERR "Warning(${file}:$.): Unrecognized tracepoint format: \n".
|
|
|
+ "$prototype\n";
|
|
|
+ } else {
|
|
|
+ $prototype = "static inline void trace_$tracepointname($tracepointargs)";
|
|
|
+ }
|
|
|
+}
|
|
|
+
|
|
|
sub syscall_munge() {
|
|
|
my $void = 0;
|
|
|
|
|
@@ -1881,6 +1900,9 @@ sub process_state3_function($$) {
|
|
|
if ($prototype =~ /SYSCALL_DEFINE/) {
|
|
|
syscall_munge();
|
|
|
}
|
|
|
+ if ($prototype =~ /TRACE_EVENT/) {
|
|
|
+ tracepoint_munge($file);
|
|
|
+ }
|
|
|
dump_function($prototype, $file);
|
|
|
reset_state();
|
|
|
}
|