mirror of
https://github.com/Fishwaldo/linux-bl808.git
synced 2025-06-17 20:25:19 +00:00
perf script: Finish the rename from trace to script
The scripts have calls to 'perf trace' that need to be converted to 'perf script', do it.
This problem was introduced in 133dc4c
.
Reported-by: Torok Edwin <edwintorok@gmail.com>
Cc: Frederic Weisbecker <fweisbec@gmail.com>
Cc: Ingo Molnar <mingo@elte.hu>
Cc: Mike Galbraith <efault@gmx.de>
Cc: Paul Mackerras <paulus@samba.org>
Cc: Peter Zijlstra <peterz@infradead.org>
Cc: Stephane Eranian <eranian@google.com>
Cc: Tom Zanussi <tzanussi@gmail.com>
Cc: Torok Edwin <edwintorok@gmail.com>
LKML-Reference: <new-submission>
Signed-off-by: Arnaldo Carvalho de Melo <acme@redhat.com>
This commit is contained in:
parent
104db7ff1d
commit
765532c8aa
31 changed files with 35 additions and 51 deletions
|
@ -8,7 +8,7 @@
|
|||
|
||||
#line 1 "Context.xs"
|
||||
/*
|
||||
* Context.xs. XS interfaces for perf trace.
|
||||
* Context.xs. XS interfaces for perf script.
|
||||
*
|
||||
* Copyright (C) 2009 Tom Zanussi <tzanussi@gmail.com>
|
||||
*
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
* Context.xs. XS interfaces for perf trace.
|
||||
* Context.xs. XS interfaces for perf script.
|
||||
*
|
||||
* Copyright (C) 2009 Tom Zanussi <tzanussi@gmail.com>
|
||||
*
|
||||
|
@ -23,7 +23,7 @@
|
|||
#include "perl.h"
|
||||
#include "XSUB.h"
|
||||
#include "../../../perf.h"
|
||||
#include "../../../util/trace-event.h"
|
||||
#include "../../../util/script-event.h"
|
||||
|
||||
MODULE = Perf::Trace::Context PACKAGE = Perf::Trace::Context
|
||||
PROTOTYPES: ENABLE
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
Perf-Trace-Util version 0.01
|
||||
============================
|
||||
|
||||
This module contains utility functions for use with perf trace.
|
||||
This module contains utility functions for use with perf script.
|
||||
|
||||
Core.pm and Util.pm are pure Perl modules; Core.pm contains routines
|
||||
that the core perf support for Perl calls on and should always be
|
||||
|
@ -33,7 +33,7 @@ After you do that:
|
|||
|
||||
INSTALLATION
|
||||
|
||||
Building perf with perf trace Perl scripting should install this
|
||||
Building perf with perf script Perl scripting should install this
|
||||
module in the right place.
|
||||
|
||||
You should make sure libperl and ExtUtils/Embed.pm are installed first
|
||||
|
|
|
@ -34,7 +34,7 @@ Perf::Trace::Context - Perl extension for accessing functions in perf.
|
|||
|
||||
=head1 SEE ALSO
|
||||
|
||||
Perf (trace) documentation
|
||||
Perf (script) documentation
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
|
|
|
@ -163,7 +163,7 @@ sub dump_symbolic_fields
|
|||
__END__
|
||||
=head1 NAME
|
||||
|
||||
Perf::Trace::Core - Perl extension for perf trace
|
||||
Perf::Trace::Core - Perl extension for perf script
|
||||
|
||||
=head1 SYNOPSIS
|
||||
|
||||
|
@ -171,7 +171,7 @@ Perf::Trace::Core - Perl extension for perf trace
|
|||
|
||||
=head1 SEE ALSO
|
||||
|
||||
Perf (trace) documentation
|
||||
Perf (script) documentation
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
|
|
|
@ -65,7 +65,7 @@ sub clear_term
|
|||
__END__
|
||||
=head1 NAME
|
||||
|
||||
Perf::Trace::Util - Perl extension for perf trace
|
||||
Perf::Trace::Util - Perl extension for perf script
|
||||
|
||||
=head1 SYNOPSIS
|
||||
|
||||
|
@ -73,7 +73,7 @@ Perf::Trace::Util - Perl extension for perf trace
|
|||
|
||||
=head1 SEE ALSO
|
||||
|
||||
Perf (trace) documentation
|
||||
Perf (script) documentation
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
|
|
|
@ -7,4 +7,4 @@ if [ $# -gt 0 ] ; then
|
|||
shift
|
||||
fi
|
||||
fi
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/failed-syscalls.pl $comm
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/failed-syscalls.pl $comm
|
||||
|
|
|
@ -7,7 +7,4 @@ if [ $# -lt 1 ] ; then
|
|||
fi
|
||||
comm=$1
|
||||
shift
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/rw-by-file.pl $comm
|
||||
|
||||
|
||||
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/rw-by-file.pl $comm
|
||||
|
|
|
@ -1,6 +1,3 @@
|
|||
#!/bin/bash
|
||||
# description: system-wide r/w activity
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/rw-by-pid.pl
|
||||
|
||||
|
||||
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/rw-by-pid.pl
|
||||
|
|
|
@ -17,7 +17,4 @@ if [ "$n_args" -gt 0 ] ; then
|
|||
interval=$1
|
||||
shift
|
||||
fi
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/rwtop.pl $interval
|
||||
|
||||
|
||||
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/rwtop.pl $interval
|
||||
|
|
|
@ -1,6 +1,3 @@
|
|||
#!/bin/bash
|
||||
# description: system-wide min/max/avg wakeup latency
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/wakeup-latency.pl
|
||||
|
||||
|
||||
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/wakeup-latency.pl
|
||||
|
|
|
@ -1,7 +1,3 @@
|
|||
#!/bin/bash
|
||||
# description: workqueue stats (ins/exe/create/destroy)
|
||||
perf trace $@ -s "$PERF_EXEC_PATH"/scripts/perl/workqueue-stats.pl
|
||||
|
||||
|
||||
|
||||
|
||||
perf script $@ -s "$PERF_EXEC_PATH"/scripts/perl/workqueue-stats.pl
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
# perf trace event handlers, generated by perf trace -g perl
|
||||
# perf script event handlers, generated by perf script -g perl
|
||||
# (c) 2009, Tom Zanussi <tzanussi@gmail.com>
|
||||
# Licensed under the terms of the GNU GPL License version 2
|
||||
|
||||
|
|
|
@ -18,7 +18,7 @@ use lib "./Perf-Trace-Util/lib";
|
|||
use Perf::Trace::Core;
|
||||
use Perf::Trace::Util;
|
||||
|
||||
my $usage = "perf trace -s rw-by-file.pl <comm>\n";
|
||||
my $usage = "perf script -s rw-by-file.pl <comm>\n";
|
||||
|
||||
my $for_comm = shift or die $usage;
|
||||
|
||||
|
|
|
@ -10,7 +10,7 @@
|
|||
# workqueue:workqueue_destruction -e workqueue:workqueue_execution
|
||||
# -e workqueue:workqueue_insertion
|
||||
#
|
||||
# perf trace -p -s tools/perf/scripts/perl/workqueue-stats.pl
|
||||
# perf script -p -s tools/perf/scripts/perl/workqueue-stats.pl
|
||||
|
||||
use 5.010000;
|
||||
use strict;
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue