修改内核路径

hc

2024-05-14 bedbef8ad3e75a304af6361af235302bcc61d06b

 kernel/tools/perf/scripts/perl/wakeup-latency.pl
..
..
@@ -1,6 +1,6 @@
1
1
 #!/usr/bin/perl -w
2
+# SPDX-License-Identifier: GPL-2.0-only
2
3
 # (c) 2009, Tom Zanussi <tzanussi@gmail.com>
3
-# Licensed under the terms of the GNU GPL License version 2
4
4
 
5
5
 # Display avg/min/max wakeup latency
6
6
 
..
..
@@ -28,7 +28,7 @@
28
28
 sub sched::sched_switch
29
29
 {
30
30
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
31
-	$common_pid, $common_comm,
31
+	$common_pid, $common_comm, $common_callchain,
32
32
 	$prev_comm, $prev_pid, $prev_prio, $prev_state, $next_comm, $next_pid,
33
33
 	$next_prio) = @_;
34
34
 
..
..
@@ -51,7 +51,7 @@
51
51
 sub sched::sched_wakeup
52
52
 {
53
53
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
54
-	$common_pid, $common_comm,
54
+	$common_pid, $common_comm, $common_callchain,
55
55
 	$comm, $pid, $prio, $success, $target_cpu) = @_;
56
56
 
57
57
     $last_wakeup{$target_cpu}{ts} = nsecs($common_secs, $common_nsecs);
..
..
@@ -101,7 +101,7 @@
101
101
 sub trace_unhandled
102
102
 {
103
103
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
104
-	$common_pid, $common_comm) = @_;
104
+	$common_pid, $common_comm, $common_callchain) = @_;
105
105
 
106
106
     $unhandled{$event_name}++;
107
107
 }