diff options
Diffstat (limited to 'script/perf-get-opts.bash')
| -rwxr-xr-x | script/perf-get-opts.bash | 215 |
1 files changed, 215 insertions, 0 deletions
diff --git a/script/perf-get-opts.bash b/script/perf-get-opts.bash new file mode 100755 index 0000000000000..8fe6c8cb76a21 --- /dev/null +++ b/script/perf-get-opts.bash @@ -0,0 +1,215 @@ +#! /bin/bash +# +# Copyright (c) 2015-2019, Intel Corporation +# +# Redistribution and use in source and binary forms, with or without +# modification, are permitted provided that the following conditions are met: +# +# * Redistributions of source code must retain the above copyright notice, +# this list of conditions and the following disclaimer. +# * Redistributions in binary form must reproduce the above copyright notice, +# this list of conditions and the following disclaimer in the documentation +# and/or other materials provided with the distribution. +# * Neither the name of Intel Corporation nor the names of its contributors +# may be used to endorse or promote products derived from this software +# without specific prior written permission. +# +# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" +# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE +# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR +# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF +# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS +# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN +# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) +# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE +# POSSIBILITY OF SUCH DAMAGE. + +set -e + +prog=`basename $0` +master="" +kcore="" +sysroot="" + +usage() { + cat <<EOF +usage: $prog [<options>] <perf.data-file> + +Create --pevent options for ptdump and ptxed based on <perf.data-file> +and previously generated <perf.data-file>-sideband*.pevent files. + +When tracing ring-0, use perf-with-kcore and supply the path to kcore_dir +using the -k option. + +options: + -h this text + -m <file> set <file> as the master sideband file (current: $master) + -k <dir> set the kcore directory to <dir> (current: $kcore) + -s <dir> set the sysroot directory to <dir> (current: $sysroot) + +<perf.data-file> defaults to perf.data. +EOF +} + +while getopts "hm:k:s:" opt; do + case $opt in + h) + usage + exit 0 + ;; + m) + master="$OPTARG" + ;; + k) + kcore="$OPTARG" + ;; + s) + sysroot="$OPTARG" + ;; + esac +done + +shift $(($OPTIND-1)) + + +if [[ $# == 0 ]]; then + file="perf.data" +elif [[ $# == 1 ]]; then + file="$1" + shift +else + usage + exit 1 +fi + + +perf script --header-only -i $file | \ + gawk -F'[ ,]' -- ' + /^# cpuid : / { + vendor = $4 + family = strtonum($5) + model = strtonum($6) + stepping = strtonum($7) + + if (vendor == "GenuineIntel") { + printf(" --cpu %d/%d/%d", family, model, stepping) + } + } +' + +perf script --no-itrace -i $file -D | \ + grep -A18 -e PERF_RECORD_AUXTRACE_INFO | \ + gawk -F' ' -- ' + /^ *Time Shift/ { printf(" --pevent:time-shift %s", $NF) } + /^ *Time Muliplier/ { printf(" --pevent:time-mult %s", $NF) } + /^ *Time Multiplier/ { printf(" --pevent:time-mult %s", $NF) } + /^ *Time Zero/ { printf(" --pevent:time-zero %s", $NF) } + /^ *TSC:CTC numerator/ { printf(" --cpuid-0x15.ebx %s", $NF) } + /^ *TSC:CTC denominator/ { printf(" --cpuid-0x15.eax %s", $NF) } + /^ *Max non-turbo ratio/ { printf(" --nom-freq %s", $NF) } +' + +gawk_sample_type() { + echo $1 | gawk -- ' + BEGIN { RS = "[|\n]" } + /^TID$/ { config += 0x00002 } + /^TIME$/ { config += 0x00004 } + /^ID$/ { config += 0x00040 } + /^CPU$/ { config += 0x00080 } + /^STREAM$/ { config += 0x00200 } + /^IDENTIFIER$/ { config += 0x10000 } + END { + if (config != 0) { + printf(" --pevent:sample-type 0x%x", config) + } + } +' +} + +attr_sample_types=$(perf evlist -v -i $file | gawk -F' ' -- ' + BEGIN { RS = "," } + /sample_type/ { print $2 } +' | sort | uniq) + +for attr in $attr_sample_types; do + # We assume at most one attr with and at most one attr without CPU + # + if [[ $(echo $attr | grep -e CPU) ]]; then + gawk_sample_type $attr + else + gawk_sample_type $attr + fi +done + +perf evlist -v -i $file | grep intel_pt | gawk -F' ' -- ' + BEGIN { RS = "," } + /config/ { + config = strtonum($2) + mtc_freq = and(rshift(config, 14), 0xf) + + printf(" --mtc-freq 0x%x", mtc_freq) + } +' + +if [[ -n "$sysroot" ]]; then + echo -n " --pevent:sysroot $sysroot" + + if [[ -r "$sysroot/vdso/vdso-x64.so" ]]; then + echo -n " --pevent:vdso-x64 $sysroot/vdso/vdso-x64.so" + fi + + if [[ -r "$sysroot/vdso/vdso-x32.so" ]]; then + echo -n " --pevent:vdso-x32 $sysroot/vdso/vdso-x32.so" + fi + + if [[ -r "$sysroot/vdso/vdso-ia32.so" ]]; then + echo -n " --pevent:vdso-ia32 $sysroot/vdso/vdso-ia32.so" + fi +fi + +if [[ -n "$kcore" ]]; then + if [[ ! -d "$kcore" ]]; then + echo "$prog: kcore_dir '$kcore' is not a directory." + exit 1 + fi + + if [[ ! -r "$kcore/kcore" ]]; then + echo "$prog: 'kcore' not found in '$kcore' or not readable." + exit 1 + fi + + echo -n " --pevent:kcore $kcore/kcore" + + if [[ ! -r "$kcore/kallsyms" ]]; then + echo "$prog: 'kallsyms' not found in '$kcore' or not readable." + exit 1 + fi + + cat "$kcore/kallsyms" | \ + gawk -M -- ' + function update_kernel_start(vaddr) { + if (vaddr < kernel_start) { + kernel_start = vaddr + } + } + + BEGIN { kernel_start = 0xffffffffffffffff } + /^[0-9a-f]+ T _text$/ { update_kernel_start(strtonum("0x" $1)) } + /^[0-9a-f]+ T _stext$/ { update_kernel_start(strtonum("0x" $1)) } + END { + if (kernel_start < 0xffffffffffffffff) { + printf(" --pevent:kernel-start 0x%x", kernel_start) + } + } + ' +fi + +for sbfile in $(ls -1 "$(basename $file)"-sideband*.pevent 2>/dev/null); do + if [[ -z "$master" || "$sbfile" == "$master" ]]; then + echo -n " --pevent:primary $sbfile" + else + echo -n " --pevent:secondary $sbfile" + fi +done |