blob: e1321f1a0a7e99ef52ab841dd30e2ec87d071cad (
plain)
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
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
|
#!/bin/sh
# PCP QA Test No. 508
# pmlogreduce workout (includes check for obscure interp.c bug reported
# by Arthur Kepner @ sgi)
#
# Copyright (c) 2011 Ken McDonell. 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=0 # success is the default!
$sudo rm -rf $tmp.* $seq.full
trap "rm -f $tmp.*; exit \$status" 0 1 2 3 15
# real QA test starts here
_filter1()
{
sed \
-e '/^archive:/d' \
-e '/^end:/d' \
-e '/^samples:/d'
}
_filter2()
{
sed \
-e '/^[a-z]/d' \
-e '/^Note/s/.*/<<< pmval header >>>/'
}
_join()
{
# Note: sed in the pipeline is because join(1) on ia64 SuSE SLES 11
# is broken and produces gratuitous white space in the output
#
join -a 1 -a 2 $1 $2 \
| sed -e 's/ */ /g' \
| awk '
/No .* values available No .* values available/ { next }
{ ok = 0 }
NF % 2 == 1 { for (i = 2; i < 2+(NF-1)/2; i++) {
j = i+(NF-1)/2
if ($i == $j)
continue
if ($i+0 == $i && $j+0 == $j &&
0.98*$i <= $j && $j <= 1.02*$i)
continue
break
}
if (i == 2+(NF-1)/2)
ok = 1
}
ok == 0 { print }'
}
if pmlogreduce -A 3sec -t 3sec src/interpmark $tmp.reduce
then
:
else
echo "Arrgh: pmlogreduce failed!"
status=1
exit
fi
# from src/mkinterpmark ...
#
# metric semantics type indom sample
# disk.dev.read counter U64 60.1 500msec
# disk.dev.write counter U64 60.1 2sec
# disk.dev.total counter U64 60.1 10sec
# disk.all.read counter U64 NULL 500msec
# disk.all.write counter U64 NULL 2sec
# disk.all.total counter U64 NULL 10sec
# disk.dev.read_bytes counter U32 60.1 500msec
# disk.dev.write_bytes counter U32 60.1 2sec
# disk.dev.total_bytes counter U32 60.1 10sec
# disk.all.read_bytes counter U32 NULL 500msec
# disk.all.write_bytes counter U32 NULL 2sec
# disk.all.total_bytes counter U32 NULL 10sec
#
# filesys.used instant U64 60.5 500msec
# sample.longlong.bin instant 64 29.2 2sec
# filesys.free instant U64 60.5 10sec
# sample.longlong.one instant 64 NULL 500msec
# swap.length instant U64 NULL 2sec
# mem.util.kernelStack instant U64 NULL 10sec
# filesys.usedfiles instant U32 60.5 500msec
# swapdev.free instant U32 60.6 2sec
# pmcd.buf.alloc instant 32 2.5 10sec
# sample.control instant 32 NULL 500msec
# kernel.all.uptime instant U32 NULL 2sec
# network.tcpconn.close instant U32 NULL 10sec
#
# filesys.capacity discrete U64 60.5 2sec
# tmpfs.capacity discrete U64 60.18 once
#
# mem.physmem discrete U64 NULL 2sec
#
# filesys.capacity discrete U32 60.5 2sec
# hinv.cpu.cache discrete U32 60.0 once
# filesys.maxfiles discrete U32 60.5 once
# hinv.physmem discrete U32 NULL 2sec
# hinv.pagesize discrete U32 NULL once
# hinv.ncpu discrete U32 NULL once
for m in \
\#500msec \
disk.dev.read disk.all.read disk.dev.read_bytes disk.all.read_bytes \
filesys.used sample.longlong.one filesys.usedfiles sample.control \
\#2sec \
disk.all.write disk.dev.write_bytes disk.all.write_bytes \
sample.longlong.bin swap.length swapdev.free kernel.all.uptime \
filesys.capacity mem.physmem filesys.capacity hinv.physmem \
\#10sec \
disk.dev.total disk.all.total disk.dev.total_bytes \
disk.all.total_bytes filesys.free mem.util.kernelStack \
pmcd.buf.alloc network.tcpconn.close \
\#once \
tmpfs.capacity hinv.cpu.cache filesys.maxfiles hinv.pagesize \
hinv.ncpu
do
case "$m"
in
\#*)
continue
;;
esac
echo "=== $m ===" | tee -a $seq.full
pmval -rz -w 12 -f 3 -A 3sec -t 3sec -a src/section-a $m \
| _filter1 >$tmp.in
pmval -rz -w 12 -f 3 -A 3sec -t 3sec -a src/section-b $m \
| _filter2 >>$tmp.in
pmval -rz -w 12 -f 3 -A 3sec -t 3sec -a src/section-d $m \
| _filter2 >>$tmp.in
sed -n '/^[0-2]/{
s/[ ]*$//
s/No values/No input values/
p
}' $tmp.in >$tmp.in2
echo "--- inputs compared to merge ---" | tee -a $seq.full
pmval -rz -w 12 -f 3 -U src/interpmark $m >>$seq.full 2>&1
pmval -rz -w 12 -f 3 -A 3sec -t 3sec -a src/interpmark $m \
| tee -a $seq.full \
| _filter1 >$tmp.merge
sed -n '/^[0-2]/{
s/[ ]*$//
s/No values/No merge values/
p
}' $tmp.merge >$tmp.tmp
_join $tmp.in2 $tmp.tmp
echo "--- merge compared to reduce ---"
pmval -rz -w 12 -f 3 -U $tmp.reduce $m >>$seq.full 2>&1
pmval -Dfetch,log,interp -rz -w 12 -f 3 -A 3sec -t 3sec -a $tmp.reduce $m 2>&1 \
| tee -a $seq.full \
| sed -n '/^[0-2]/{
s/[ ]*$//
s/No values/No reduce values/
p
}' >$tmp.out
_join $tmp.tmp $tmp.out
done
# success, all done
exit
|
