mirror of
https://github.com/adulau/aha.git
synced 2024-12-28 11:46:19 +00:00
perf trace: Add a scripts/perl/bin for perf trace shell scripts
To capture the relevant events for a given Perl script and to avoid having to continually remember and type in long command-lines, add a scripts/perl/bin directory containing two simple shell scripts for each Perl script, one for recording and one for processing/display. For example, to record perf data for the rw-by-pid.pl script, run scripts/perl/bin/rw-by-pid-record and to actually run the script and display the output run scripts/perl/bin/rw-by-pid-report. Signed-off-by: Tom Zanussi <tzanussi@gmail.com> Cc: fweisbec@gmail.com Cc: rostedt@goodmis.org Cc: anton@samba.org Cc: hch@infradead.org LKML-Reference: <1259133352-23685-8-git-send-email-tzanussi@gmail.com> Signed-off-by: Ingo Molnar <mingo@elte.hu>
This commit is contained in:
parent
89fbf0b8a0
commit
1ae4a97125
10 changed files with 45 additions and 0 deletions
7
tools/perf/scripts/perl/bin/check-perf-trace-record
Normal file
7
tools/perf/scripts/perl/bin/check-perf-trace-record
Normal file
|
@ -0,0 +1,7 @@
|
|||
#!/bin/bash
|
||||
perf record -c 1 -f -a -M -R -e kmem:kmalloc -e irq:softirq_entry
|
||||
|
||||
|
||||
|
||||
|
||||
|
5
tools/perf/scripts/perl/bin/check-perf-trace-report
Normal file
5
tools/perf/scripts/perl/bin/check-perf-trace-report
Normal file
|
@ -0,0 +1,5 @@
|
|||
#!/bin/bash
|
||||
perf trace -s ~/libexec/perf-core/scripts/perl/check-perf-trace.pl
|
||||
|
||||
|
||||
|
2
tools/perf/scripts/perl/bin/rw-by-file-record
Normal file
2
tools/perf/scripts/perl/bin/rw-by-file-record
Normal file
|
@ -0,0 +1,2 @@
|
|||
#!/bin/bash
|
||||
perf record -c 1 -f -a -M -R -e syscalls:sys_enter_read -e syscalls:sys_enter_write
|
5
tools/perf/scripts/perl/bin/rw-by-file-report
Normal file
5
tools/perf/scripts/perl/bin/rw-by-file-report
Normal file
|
@ -0,0 +1,5 @@
|
|||
#!/bin/bash
|
||||
perf trace -s ~/libexec/perf-core/scripts/perl/rw-by-file.pl
|
||||
|
||||
|
||||
|
2
tools/perf/scripts/perl/bin/rw-by-pid-record
Normal file
2
tools/perf/scripts/perl/bin/rw-by-pid-record
Normal file
|
@ -0,0 +1,2 @@
|
|||
#!/bin/bash
|
||||
perf record -c 1 -f -a -M -R -e syscalls:sys_enter_read -e syscalls:sys_exit_read -e syscalls:sys_enter_write -e syscalls:sys_exit_write
|
5
tools/perf/scripts/perl/bin/rw-by-pid-report
Normal file
5
tools/perf/scripts/perl/bin/rw-by-pid-report
Normal file
|
@ -0,0 +1,5 @@
|
|||
#!/bin/bash
|
||||
perf trace -s ~/libexec/perf-core/scripts/perl/rw-by-pid.pl
|
||||
|
||||
|
||||
|
6
tools/perf/scripts/perl/bin/wakeup-latency-record
Normal file
6
tools/perf/scripts/perl/bin/wakeup-latency-record
Normal file
|
@ -0,0 +1,6 @@
|
|||
#!/bin/bash
|
||||
perf record -c 1 -f -a -M -R -e sched:sched_switch -e sched:sched_wakeup
|
||||
|
||||
|
||||
|
||||
|
5
tools/perf/scripts/perl/bin/wakeup-latency-report
Normal file
5
tools/perf/scripts/perl/bin/wakeup-latency-report
Normal file
|
@ -0,0 +1,5 @@
|
|||
#!/bin/bash
|
||||
perf trace -s ~/libexec/perf-core/scripts/perl/wakeup-latency.pl
|
||||
|
||||
|
||||
|
2
tools/perf/scripts/perl/bin/workqueue-stats-record
Normal file
2
tools/perf/scripts/perl/bin/workqueue-stats-record
Normal file
|
@ -0,0 +1,2 @@
|
|||
#!/bin/bash
|
||||
perf record -c 1 -f -a -M -R -e workqueue:workqueue_creation -e workqueue:workqueue_destruction -e workqueue:workqueue_execution -e workqueue:workqueue_insertion
|
6
tools/perf/scripts/perl/bin/workqueue-stats-report
Normal file
6
tools/perf/scripts/perl/bin/workqueue-stats-report
Normal file
|
@ -0,0 +1,6 @@
|
|||
#!/bin/bash
|
||||
perf trace -s ~/libexec/perf-core/scripts/perl/workqueue-stats.pl
|
||||
|
||||
|
||||
|
||||
|
Loading…
Reference in a new issue