1#!/bin/sh 2# perf record tests 3# SPDX-License-Identifier: GPL-2.0 4 5set -e 6 7err=0 8perfdata=$(mktemp /tmp/__perf_test.perf.data.XXXXX) 9 10cleanup() { 11 rm -f ${perfdata} 12 rm -f ${perfdata}.old 13 trap - exit term int 14} 15 16trap_cleanup() { 17 cleanup 18 exit 1 19} 20trap trap_cleanup exit term int 21 22test_per_thread() { 23 echo "Basic --per-thread mode test" 24 if ! perf record -e instructions:u -o ${perfdata} --quiet true 2> /dev/null 25 then 26 echo "Per-thread record [Skipped instructions:u not supported]" 27 if [ $err -ne 1 ] 28 then 29 err=2 30 fi 31 return 32 fi 33 if ! perf record -e instructions:u --per-thread -o ${perfdata} true 2> /dev/null 34 then 35 echo "Per-thread record of instructions:u [Failed]" 36 err=1 37 return 38 fi 39 if ! perf report -i ${perfdata} -q | egrep -q true 40 then 41 echo "Per-thread record [Failed missing output]" 42 err=1 43 return 44 fi 45 echo "Basic --per-thread mode test [Success]" 46} 47 48test_register_capture() { 49 echo "Register capture test" 50 if ! perf list | egrep -q 'br_inst_retired.near_call' 51 then 52 echo "Register capture test [Skipped missing instruction]" 53 if [ $err -ne 1 ] 54 then 55 err=2 56 fi 57 return 58 fi 59 if ! perf record --intr-regs=\? 2>&1 | egrep -q 'available registers: AX BX CX DX SI DI BP SP IP FLAGS CS SS R8 R9 R10 R11 R12 R13 R14 R15' 60 then 61 echo "Register capture test [Skipped missing registers]" 62 return 63 fi 64 if ! perf record -o - --intr-regs=di,r8,dx,cx -e br_inst_retired.near_call:p \ 65 -c 1000 --per-thread true 2> /dev/null \ 66 | perf script -F ip,sym,iregs -i - 2> /dev/null \ 67 | egrep -q "DI:" 68 then 69 echo "Register capture test [Failed missing output]" 70 err=1 71 return 72 fi 73 echo "Register capture test [Success]" 74} 75 76test_per_thread 77test_register_capture 78 79cleanup 80exit $err 81