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
|
#!/bin/sh
# PCP QA Test No. 821
# Exercise Linux PMDA memory metrics.
#
# Copyright (c) 2016 Red Hat.
#
seq=`basename $0`
echo "QA output created by $seq"
# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check
[ $PCP_PLATFORM = linux ] || _notrun "Linux-specific memory metric testing"
userid=`id -u` # test exercises procfs access from both root and non-root
[ "$userid" != 0 ] || _notrun "Test cannot be run as privileged root user"
config="$PCP_PMDAS_DIR/linux/bandwidth.conf"
_cleanup()
{
cd $here
if [ -f "$config.$seq" ]
then
_restore_config "$config"
$sudo rm -f "$config.$seq"
fi
rm -rf $tmp $tmp.*
}
status=1 # failure is the default!
trap "cd $here; rm -rf $tmp $tmp.*; exit \$status" 0 1 2 3 15
# deal with non-determinism in the order in which the mem.zoneinfo
# and mem.slabinfo metric indoms are populated - on-disk saving of
# these indoms (from beforehand) affects the instance identifiers.
#
_fix_info_indom()
{
rm -f $tmp.head $tmp.info $tmp.tail
$PCP_AWK_PROG '
/^mem\.zoneinfo\./ { state = 1 }
/^mem\.slabinfo\./ { state = 1 }
state == 1 && NF == 0 { state = 2 }
state == 0 { print >"'"$tmp.head"'"; next }
state == 1 { print >"'"$tmp.info"'"; next }
state == 2 { print >"'"$tmp.tail"'"; next }'
[ -f $tmp.head ] && cat $tmp.head
[ -f $tmp.info ] && $here/src/sortinst <$tmp.info \
| sed -e 's/inst \[[0-9][0-9]*/inst [N/'
[ -f $tmp.tail ] && cat $tmp.tail
}
# real QA test starts here
root=$tmp.root
LINUX_HERTZ=100; export LINUX_HERTZ
LINUX_PAGESIZE=4096; export LINUX_PAGESIZE
LINUX_STATSPATH=$root; export LINUX_STATSPATH
pmda=$PCP_PMDAS_DIR/linux/pmda_linux.so,linux_init
local="-L -K clear -K add,60,$pmda"
mem_metrics=`pminfo $local mem | LC_COLLATE=POSIX sort`
slab_metrics=`pminfo $local mem.slabinfo | LC_COLLATE=POSIX sort`
buddy_metrics=`pminfo $local mem.buddyinfo | LC_COLLATE=POSIX sort`
zone_metrics=`pminfo $local mem.zoneinfo | LC_COLLATE=POSIX sort`
if [ -f "$config" ]
then
_save_config "$config"
$sudo rm -f "$config" # ensure deterministic output, see qa/826
fi
for tgz in $here/linux/meminfo-*.tgz
do
rm -fr $root
mkdir $root || _fail "root in use when processing $tgz"
cd $root
tar xzf $tgz
base=`basename $tgz`
echo "== Checking all mem metric values - $base"
for m in $mem_metrics
do
pminfo $local -f $m | _fix_info_indom
done
echo && echo "== done" && echo
echo "== Checking slabinfo metric values - $base"
# requires root privileges to access these
for m in $slab_metrics
do
$sudo pminfo $local -f $m | _fix_info_indom
done
echo && echo "== done" && echo
echo "== Checking buddyinfo metric values - $base"
pminfo $local -f $buddy_metrics
echo && echo "== done" && echo
echo "== Checking zoneinfo metric values - $base"
for m in $zone_metrics
do
pminfo $local -f $m | _fix_info_indom
done
echo && echo "== done" && echo
cd $here
done
# success, all done
status=0
exit
|
