修改内核路径

hc

2024-05-14 bedbef8ad3e75a304af6361af235302bcc61d06b

 kernel/tools/perf/scripts/perl/rwtop.pl
..
..
@@ -1,6 +1,6 @@
1
1
 #!/usr/bin/perl -w
2
+# SPDX-License-Identifier: GPL-2.0-only
2
3
 # (c) 2010, Tom Zanussi <tzanussi@gmail.com>
3
-# Licensed under the terms of the GNU GPL License version 2
4
4
 
5
5
 # read/write top
6
6
 #
..
..
@@ -35,7 +35,7 @@
35
35
 sub syscalls::sys_exit_read
36
36
 {
37
37
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
38
-	$common_pid, $common_comm,
38
+	$common_pid, $common_comm, $common_callchain,
39
39
 	$nr, $ret) = @_;
40
40
 
41
41
     print_check();
..
..
@@ -53,7 +53,7 @@
53
53
 sub syscalls::sys_enter_read
54
54
 {
55
55
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
56
-	$common_pid, $common_comm,
56
+	$common_pid, $common_comm, $common_callchain,
57
57
 	$nr, $fd, $buf, $count) = @_;
58
58
 
59
59
     print_check();
..
..
@@ -66,7 +66,7 @@
66
66
 sub syscalls::sys_exit_write
67
67
 {
68
68
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
69
-	$common_pid, $common_comm,
69
+	$common_pid, $common_comm, $common_callchain,
70
70
 	$nr, $ret) = @_;
71
71
 
72
72
     print_check();
..
..
@@ -79,7 +79,7 @@
79
79
 sub syscalls::sys_enter_write
80
80
 {
81
81
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
82
-	$common_pid, $common_comm,
82
+	$common_pid, $common_comm, $common_callchain,
83
83
 	$nr, $fd, $buf, $count) = @_;
84
84
 
85
85
     print_check();
..
..
@@ -197,7 +197,7 @@
197
197
 sub trace_unhandled
198
198
 {
199
199
     my ($event_name, $context, $common_cpu, $common_secs, $common_nsecs,
200
-	$common_pid, $common_comm) = @_;
200
+	$common_pid, $common_comm, $common_callchain) = @_;
201
201
 
202
202
     $unhandled{$event_name}++;
203
203
 }