File: 550

package info (click to toggle)
pcp 7.0.5-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 252,916 kB
  • sloc: ansic: 1,478,844; sh: 177,285; xml: 160,462; cpp: 83,809; python: 24,349; perl: 18,303; yacc: 6,877; lex: 2,864; makefile: 2,694; awk: 165; fortran: 60; java: 52
file content (53 lines) | stat: -rwxr-xr-x 1,301 bytes parent folder | download
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
#!/bin/sh
# PCP QA Test No. 550
# Exercise fixes for remotely triggered memory leaks in pmcd
#
# Copyright (c) 2013 Red Hat.  All Rights Reserved.
#

seq=`basename $0`
echo "QA output created by $seq"

# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check

[ -n "$PCP_PYTHON_PROG" ] || _notrun "no acceptable python to run secure/leak-*"

host=localhost
iterate=1000
timeout=2
status=1	# failure is the default!
trap "cd $here; rm -rf $tmp.*; exit \$status" 0 1 2 3 15

pmcd_memory()
{
    pmprobe -h $host -v pmcd.datasize \
	| tee -a $seq_full \
	| awk '{ print $3 }'
}

# real QA test starts here
echo "Initial pmcd memory size:" > $seq_full
MEMINIT=`pmcd_memory`
cd secure
for leak_test in leak-*
do
    echo "$leak_test checking: " | tee -a $seq_full
    pmpython $leak_test $host $iterate
    pmcd_wait -t $timeout -h $host
    sts=$?
    echo "$leak_test complete sts=$sts" | tee -a $seq_full
    [ $sts -ne 0 ] && exit
    MEMUSED=`pmcd_memory`
    # allow for max 64KB increase (several pages on 64KB systems)
    MEMSLOP=`expr $MEMINIT + 640`
    echo "init=$MEMINIT used=$MEMUSED slop=$MEMSLOP" >> $seq_full
    [ $MEMUSED -gt $MEMSLOP ] && exit
    echo "$leak_test memory check=OK" | tee -a $seq_full
done

# success, all done
status=0
exit