1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
#!/bin/sh
# PCP QA Test No. 789
# pmdapapi native metrics test
#
# Copyright (c) 2014 Red Hat Inc. All Rights Reserved.
#
seq=`basename $0`
echo "QA output created by $seq"
# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check
[ -d $PCP_PMDAS_DIR/papi ] || _notrun "PAPI PMDA is not installed"
$sudo rm -rf $tmp.* $seq.full
trap "cd $here; $sudo rm -rf $tmp.*; exit \$status" 0 1 2 3 15
_filter_papi_errors()
{
sed \
-e '/pfm_find_full_event(.*): event not found./d' \
-e '/events in papi_events.csv were not valid./d' \
# end
}
_filter()
{
sed \
-e "s,$PCP_PMDAS_DIR,PCP_PMDAS_DIR,g" \
-e 's/value [0-9][0-9]*/value NUMBER/' \
-e 's/TOT_INS(5): [0-9][0-9]*/TOT_INS(5) NUMBER/' \
-e 's/TOT_INS(-1): [0-9][0-9]*/TOT_INS(-1) NUMBER/' \
-e 's/0x[0-9a-f]*/ADDR/g' \
-e 's/[0-2][0-9]:00:00.000/TIME/' \
-e 's/126.0.[0-9][0-9]*/126.0.NUMBER/' \
-e "s,$tmp,TMP," \
| _filter_papi_errors
}
# vars and checks
papirootpmns=$PCP_PMDAS_DIR/papi/root
pipepmda=$PCP_PMDAS_DIR/papi/pmdapapi
# check if papi PMDA is going to work on this platform
_check_papi
_check_papi_native
echo "=== Daemon PMDA papi native events test ==="
$sudo TERM=ansi dbpmda -n $papirootpmns -ie <<EOF | _filter
open pipe $pipepmda -d 126 -l $tmp.log
getdesc on
attr "username" "root"
attr 11 "0"
store papi.control.enable "perf.CYCLES"
fetch papi.system.perf.CYCLES
store papi.control.disable "perf.CYCLES"
EOF
# success, all done
status=0
exit
|
