/var/lib/pcp/testsuite/569 is in pcp-testsuite 4.0.1-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
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 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 | #!/bin/sh
# PCP QA Test No. 569
# exercise pmprobe, and pv 679693 in particular
#
# Copyright (c) 1995-2002 Silicon Graphics, 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
status=1 # failure is the default!
trap "rm -f $tmp.*; exit \$status" 0 1 2 3 15
_filter()
{
sed \
-e '/^sample\.many\./d' \
-e '/^sample\.bigid/d' \
-e '/sample\.byte_/d' \
-e '/sample\.kbyte_/d' \
-e '/sample\.dynamic\.meta/d' \
-e '/sample\.datasize/d' \
-e '/sample\.darkness/d' \
-e '/sample\.scramble/d' \
-e '/^sample\.mirage/s/ [0-9].*/ NUMVAL VAL or INST .../' \
-e '/^sample\.dynamic\./s/ [0-9].*/ NUMVAL VAL or INST .../' \
-e '/sample\.wrap\./{
s/ -*[0-9][0-9]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.daemon_pid /{
s/ [0-9][0-9]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.dupnames\.daemon_pid /{
s/ [0-9][0-9]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.dupnames\.pid_daemon /{
s/ [0-9][0-9]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\..*\.write_me /{
s/ [0-9][0-9]*/ NUMBER/g
s/ ".*"/ "STRING"/g
s/ NUMBER/ 1/
}' \
-e '/sample\..*seconds /{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.colour /{
s/ \([0-9]\)/ X\1/
s/ [0-9][0-9.]*/ NUMBER/g
s/ X/ /
}' \
-e '/sample\.drift /{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.step/{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\..*pdu /{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.rapid /{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.dodgey\./{
s/ \([0-9]\)/ X\1/
s/ [0-9][0-9.]*/ NUMBER/g
s/ X/ /
}' \
-e '/sample\.magnitude /{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.scale_step\./{
s/ [0-9][0-9.]*/ NUMBER/g
s/ NUMBER/ 1/
}' \
-e '/sample\.lights /s/ ".*"/ "STRING"/g' \
-e '/sample\.dupnames.two.lights /s/ ".*"/ "STRING"/g' \
-e '/sample\.sysinfo 1/d' \
-e '/sample\.secret\.foo\.bar\.max\.redirect/{
s/ [0-9][0-9.]*.*/ NUMBER .../g
}' \
-e '/sample\.event\.records/s/\[.*/[RECORDS]/' \
-e '/sample\.event\.highres_records/s/\[.*/[RECORDS]/' \
-e '/sample\.event\.no_indom_records/s/\[.*/[RECORDS]/' \
-e '/sample\.event\.reset_highres/{
s/ \([0-9]\)/ X\1/
s/ [0-9][0-9.]*/ NUMBER/g
s/ X/ /
}' \
-e '/sample\.event\.reset/{
s/ \([0-9]\)/ X\1/
s/ [0-9][0-9.]*/ NUMBER/g
s/ X/ /
}' \
| $PCP_AWK_PROG '
( $1 == "sample.percontext.control.ctx" ||
$1 == "sample.percontext.control.active" ||
$1 == "sample.percontext.control.start" ||
$1 == "sample.percontext.control.end") &&
$3 ~ /^[0-9][0-9]*$/ { $3 = "NUMBER" }
{ print }' \
| fold -w160
}
# sample.negative.ctr.m_32 old value=-9999 new value=-1000
_filter_store()
{
sed \
-e 's/old value=[^ ]* /old value=OLD /' \
# end
}
echo "=== reset ==="
# set sample.negative metrics to known initial values
#
for m in m_32 m_64 m_float m_double
do
for sem in ctr instant discrete
do
pmstore sample.negative.$sem.$m -10000 | _filter_store
done
done
# real QA test starts here
for arg in '' -i -I -v -iI -iv -iIv
do
echo
echo "=== $arg ==="
pmprobe $arg sample \
| _filter
done
# success, all done
status=0
exit
|