File: 489

package info (click to toggle)
pcp 3.9.10
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 81,836 kB
  • ctags: 26,423
  • sloc: ansic: 178,791; sh: 79,349; cpp: 61,042; xml: 28,842; perl: 12,963; yacc: 5,351; python: 4,578; lex: 1,894; makefile: 1,665; fortran: 60; java: 22; awk: 20
file content (105 lines) | stat: -rwxr-xr-x 2,105 bytes parent folder | download | duplicates (6)
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
#!/bin/sh
# PCP QA Test No. 489
# exercise pmdaCacheStoreKey()
#
# 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 "$sudo rm -f $tmp.* $PCP_VAR_DIR/config/pmda/42.42; exit \$status" 0 1 2 3 15

# real QA test starts here
for arg in -k '' -d '-l -Dindom' -dk '-l -Dindom'
do
    echo | tee -a $seq.full
    echo "=== keycache $arg ===" | tee -a $seq.full

    case "$arg"
    in
	-l*)
	    ;;
	*)
	    $sudo rm -f $PCP_VAR_DIR/config/pmda/42.42
	    ;;
    esac

    $sudo src/keycache $arg >$tmp.out 2>&1
    cat $tmp.out >>$seq.full

    case "$arg"
    in
	-l*)
	    ;;
	*)
	echo "First few lines of output ..."
	head -20 $tmp.out
	echo
	echo "Duplicate instance ids ... expect none"
	sed -n <$tmp.out \
	    -e '/pmdaCacheDump:/q' \
	    -e '/active 0x0/s//active (nil)/' \
	    -e '/ -> /s/ -> .*//p' \
	| sort \
	| uniq -c \
	| grep -v ' 1 '
	    ;;
    esac

    case "$arg"
    in
	-d*|-l*)
	    $PCP_AWK_PROG <$tmp.out '
/pmdaCacheDump:/	{ want = 1 }
want == 1		{ print }' \
	    | sed -e '/active 0x0/s//active (nil)/'
	    ;;

	*)
	    echo
	    echo "Check distribution ..."
	    $PCP_AWK_PROG <$tmp.out '
/Instances distribution across/	{ want=1
				  nb = $4
				  if ($4 <= 8) {
				      minp = 0.95 * (1 / nb)
				      maxp = 1.05 * (1 / nb)
				  }
				  else if ($4 <= 16) {
				      minp = 0.90 * (1 / nb)
				      maxp = 1.10 * (1 / nb)
				  }
				  else if ($4 <= 64) {
				      minp = 0.80 * (1 / nb)
				      maxp = 1.20 * (1 / nb)
				  }
				  else {
				      minp = 0.75 * (1 / nb)
				      maxp = 1.25 * (1 / nb)
				  }
				  print
				  next
				}
want == 1 && NF == 0		{ want = 0 }
want == 1			{ for (i = 1; i <= NF; i++) {
					if (minp <= $i && $i <= maxp)
					    printf "OK "
					else
					    printf "%s not in (%.4f,%.4f) ",$i,minp,maxp
				      }
				      print ""
				    }'
		;;
	esac
    done

# success, all done
exit