| #!/bin/bash | |
| # perf stat tests | |
| # SPDX-License-Identifier: GPL-2.0 | |
| set -e | |
| err=0 | |
| test_default_stat() { | |
| echo "Basic stat command test" | |
| if ! perf stat true 2>&1 | grep -E -q "Performance counter stats for 'true':" | |
| then | |
| echo "Basic stat command test [Failed]" | |
| err=1 | |
| return | |
| fi | |
| echo "Basic stat command test [Success]" | |
| } | |
| test_stat_record_report() { | |
| echo "stat record and report test" | |
| if ! perf stat record -o - true | perf stat report -i - 2>&1 | \ | |
| grep -E -q "Performance counter stats for 'pipe':" | |
| then | |
| echo "stat record and report test [Failed]" | |
| err=1 | |
| return | |
| fi | |
| echo "stat record and report test [Success]" | |
| } | |
| test_stat_record_script() { | |
| echo "stat record and script test" | |
| if ! perf stat record -o - true | perf script -i - 2>&1 | \ | |
| grep -E -q "CPU[[:space:]]+THREAD[[:space:]]+VAL[[:space:]]+ENA[[:space:]]+RUN[[:space:]]+TIME[[:space:]]+EVENT" | |
| then | |
| echo "stat record and script test [Failed]" | |
| err=1 | |
| return | |
| fi | |
| echo "stat record and script test [Success]" | |
| } | |
| test_stat_repeat_weak_groups() { | |
| echo "stat repeat weak groups test" | |
| if ! perf stat -e '{cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles}' \ | |
| true 2>&1 | grep -q 'seconds time elapsed' | |
| then | |
| echo "stat repeat weak groups test [Skipped event parsing failed]" | |
| return | |
| fi | |
| if ! perf stat -r2 -e '{cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles,cycles}:W' \ | |
| true > /dev/null 2>&1 | |
| then | |
| echo "stat repeat weak groups test [Failed]" | |
| err=1 | |
| return | |
| fi | |
| echo "stat repeat weak groups test [Success]" | |
| } | |
| test_topdown_groups() { | |
| # Topdown events must be grouped with the slots event first. Test that | |
| # parse-events reorders this. | |
| echo "Topdown event group test" | |
| if ! perf stat -e '{slots,topdown-retiring}' true > /dev/null 2>&1 | |
| then | |
| echo "Topdown event group test [Skipped event parsing failed]" | |
| return | |
| fi | |
| td_err=0 | |
| do_topdown_group_test() { | |
| events=$1 | |
| failure=$2 | |
| if perf stat -e "$events" true 2>&1 | grep -E -q "<not supported>" | |
| then | |
| echo "Topdown event group test [Failed $failure for '$events']" | |
| td_err=1 | |
| return | |
| fi | |
| } | |
| do_topdown_group_test "{slots,topdown-retiring}" "events not supported" | |
| do_topdown_group_test "{instructions,r400,r8000}" "raw format slots not reordered first" | |
| filler_events=("instructions" "cycles" | |
| "context-switches" "faults") | |
| for ((i = 0; i < ${#filler_events[@]}; i+=2)) | |
| do | |
| filler1=${filler_events[i]} | |
| filler2=${filler_events[i+1]} | |
| do_topdown_group_test "$filler1,topdown-retiring,slots" \ | |
| "slots not reordered first in no-group case" | |
| do_topdown_group_test "slots,$filler1,topdown-retiring" \ | |
| "topdown metrics event not reordered in no-group case" | |
| do_topdown_group_test "{$filler1,topdown-retiring,slots}" \ | |
| "slots not reordered first in single group case" | |
| do_topdown_group_test "{$filler1,slots},topdown-retiring" \ | |
| "topdown metrics event not move into slots group" | |
| do_topdown_group_test "topdown-retiring,{$filler1,slots}" \ | |
| "topdown metrics event not move into slots group last" | |
| do_topdown_group_test "{$filler1,slots},{topdown-retiring}" \ | |
| "topdown metrics group not merge into slots group" | |
| do_topdown_group_test "{topdown-retiring},{$filler1,slots}" \ | |
| "topdown metrics group not merge into slots group last" | |
| do_topdown_group_test "{$filler1,slots},$filler2,topdown-retiring" \ | |
| "non-adjacent topdown metrics group not move into slots group" | |
| do_topdown_group_test "$filler2,topdown-retiring,{$filler1,slots}" \ | |
| "non-adjacent topdown metrics group not move into slots group last" | |
| do_topdown_group_test "{$filler1,slots},{$filler2,topdown-retiring}" \ | |
| "metrics group not merge into slots group" | |
| do_topdown_group_test "{$filler1,topdown-retiring},{$filler2,slots}" \ | |
| "metrics group not merge into slots group last" | |
| done | |
| if test "$td_err" -eq 0 | |
| then | |
| echo "Topdown event group test [Success]" | |
| else | |
| err="$td_err" | |
| fi | |
| } | |
| test_topdown_weak_groups() { | |
| # Weak groups break if the perf_event_open of multiple grouped events | |
| # fails. Breaking a topdown group causes the events to fail. Test a very large | |
| # grouping to see that the topdown events aren't broken out. | |
| echo "Topdown weak groups test" | |
| ok_grouping="{slots,topdown-bad-spec,topdown-be-bound,topdown-fe-bound,topdown-retiring},branch-instructions,branch-misses,bus-cycles,cache-misses,cache-references,cpu-cycles,instructions,mem-loads,mem-stores,ref-cycles,cache-misses,cache-references" | |
| if ! perf stat --no-merge -e "$ok_grouping" true > /dev/null 2>&1 | |
| then | |
| echo "Topdown weak groups test [Skipped event parsing failed]" | |
| return | |
| fi | |
| group_needs_break="{slots,topdown-bad-spec,topdown-be-bound,topdown-fe-bound,topdown-retiring,branch-instructions,branch-misses,bus-cycles,cache-misses,cache-references,cpu-cycles,instructions,mem-loads,mem-stores,ref-cycles,cache-misses,cache-references}:W" | |
| if perf stat --no-merge -e "$group_needs_break" true 2>&1 | grep -E -q "<not supported>" | |
| then | |
| echo "Topdown weak groups test [Failed events not supported]" | |
| err=1 | |
| return | |
| fi | |
| echo "Topdown weak groups test [Success]" | |
| } | |
| test_cputype() { | |
| # Test --cputype argument. | |
| echo "cputype test" | |
| # Bogus PMU should fail. | |
| if perf stat --cputype="123" -e instructions true > /dev/null 2>&1 | |
| then | |
| echo "cputype test [Bogus PMU didn't fail]" | |
| err=1 | |
| return | |
| fi | |
| # Find a known PMU for cputype. | |
| pmu="" | |
| devs="/sys/bus/event_source/devices" | |
| for i in $devs/cpu $devs/cpu_atom $devs/armv8_pmuv3_0 $devs/armv8_cortex_* | |
| do | |
| i_base=$(basename "$i") | |
| if test -d "$i" | |
| then | |
| pmu="$i_base" | |
| break | |
| fi | |
| if perf stat -e "$i_base/instructions/" true > /dev/null 2>&1 | |
| then | |
| pmu="$i_base" | |
| break | |
| fi | |
| done | |
| if test "x$pmu" = "x" | |
| then | |
| echo "cputype test [Skipped known PMU not found]" | |
| return | |
| fi | |
| # Test running with cputype produces output. | |
| if ! perf stat --cputype="$pmu" -e instructions true 2>&1 | grep -E -q "instructions" | |
| then | |
| echo "cputype test [Failed count missed with given filter]" | |
| err=1 | |
| return | |
| fi | |
| echo "cputype test [Success]" | |
| } | |
| test_hybrid() { | |
| # Test the default stat command on hybrid devices opens one cycles event for | |
| # each CPU type. | |
| echo "hybrid test" | |
| # Count the number of core PMUs, assume minimum of 1 | |
| pmus=$(ls /sys/bus/event_source/devices/*/cpus 2>/dev/null | wc -l) | |
| if [ "$pmus" -lt 1 ] | |
| then | |
| pmus=1 | |
| fi | |
| # Run default Perf stat | |
| cycles_events=$(perf stat -- true 2>&1 | grep -E "/cycles/[uH]*| cycles[:uH]* " -c) | |
| # The expectation is that default output will have a cycles events on each | |
| # hybrid PMU. In situations with no cycles PMU events, like virtualized, this | |
| # can fall back to task-clock and so the end count may be 0. Fail if neither | |
| # condition holds. | |
| if [ "$pmus" -ne "$cycles_events" ] && [ "0" -ne "$cycles_events" ] | |
| then | |
| echo "hybrid test [Found $pmus PMUs but $cycles_events cycles events. Failed]" | |
| err=1 | |
| return | |
| fi | |
| echo "hybrid test [Success]" | |
| } | |
| test_default_stat | |
| test_stat_record_report | |
| test_stat_record_script | |
| test_stat_repeat_weak_groups | |
| test_topdown_groups | |
| test_topdown_weak_groups | |
| test_cputype | |
| test_hybrid | |
| exit $err |