File: common.pmcd.pdu

package info (click to toggle)
pcp 7.1.0-1
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 252,748 kB
  • sloc: ansic: 1,483,656; sh: 182,366; xml: 160,462; cpp: 83,813; python: 24,980; perl: 18,327; yacc: 6,877; lex: 2,864; makefile: 2,738; awk: 165; fortran: 60; java: 52
file content (100 lines) | stat: -rw-r--r-- 2,593 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
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
# This is really a full QA test for stress testing pmcd's protocol
# handling ... set the shell variables
# $pdu_data
#	ascii pdu specifications suitable for src/pdu-gadget or binary
#	protocol data stream, these typically contain malformed PDUs
#	(see the qa/pdudata directory for examples) ... this needs
#	to be a relative path
# $grep_pattern
#	a grep -E pattern for scanning pmcd.log once the test has been
#	run
# and then source this file

[ -z "$pdu_data" ] && echo "Botch! \$pdu_data not set" && exit 1
[ -z "$grep_pattern" ] && echo "Botch! \$grep_pattern not set" && exit 1

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

[ ! -f "$here/$pdu_data" ] && echo "Botch! PDU data file $here/$pdu_data not found" && exit 1


which nc >/dev/null 2>&1 || _notrun "no nc executable installed"
# Need nc option to terminate when EOF encountered on stdin,
# but unfortunately there are multiple versions of nc(1) ...
nc --help >$tmp.out 2>&1
if grep -q '.-[^ ]*N' $tmp.out
then
    nc_opt=-N
elif grep -q '.--send-only' $tmp.out
then
    nc_opt="--send-only"
else
    cat $tmp.out >>$seq_full
    _notrun 'nc --help is not helping ... see $seq_full'
fi
_check_valgrind

_cleanup()
{
    cat pmcd.log >>$seq_full
    cd $here
    $sudo rm -rf $tmp $tmp.*
}

status=0	# success is the default!
trap "_cleanup; exit \$status" 0 1 2 3 15

_filter()
{
    sed \
	-e '/^Command: /d' \
    # end
}

mkdir $tmp || exit 1
cd $tmp
grep sampledso $PCP_PMCDCONF_PATH >pmcd.conf
$PCP_AWK_PROG <$PCP_PMCDCONF_PATH >>pmcd.conf '
$1 == "[access]"	{ print ""; want = 1 }
want == 1		{ print }'
cat pmcd.conf >>$seq_full
port=`_find_free_port`
echo "port=$port" >>$seq_full

# real QA test starts here
valgrind --leak-check=full $PCP_BINADM_DIR/pmcd -f -Dpdu,appl3,attr -c ./pmcd.conf -s ./pmcd.socket -p $port  >out 2>err &
valgrind_pid=$!
sleep 2
pmcd_pid=`$PCP_PS_PROG $PCP_PS_ALL_FLAGS | grep '[p]mcd -f -Dpdu' | $PCP_AWK_PROG '{ print $2 }'`
echo "pmcd_pid=$pmcd_pid" >>$seq_full
case "`file $here/$pdu_data`"
in
    *'ASCII text'*)
	# assume ascii PDU specification as input to pdu-gadget
	$here/src/pdu-gadget -p $port <$here/$pdu_data 2>$tmp.err
	;;
    *)
	# assume binary data, e.g. SUSE reproducers
	rm -f $tmp.err
	nc $nc_opt <$here/$pdu_data localhost $port 2>&1 \
	;;
esac \
| od -X >>$seq_full
sleep 2
kill -TERM $pmcd_pid
wait

[ -s $tmp.err ] && cat $tmp.err

echo "expect error(s) to be logged ..."
grep -E "$grep_pattern" pmcd.log

echo
echo "and no valgrind badness ..."
cat out err | _filter_valgrind | _filter

# success, all done
exit