File: 734

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 (45 lines) | stat: -rwxr-xr-x 1,479 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
#!/bin/sh
# PCP QA Test No. 734
# Exercise bug in pmGetContextHostName with pmcd.hostname metric.
#
# Copyright (c) 2014 Red Hat.
#

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

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

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

# prefer an old host without pmcd.hostname, however the test is still
# useful even with more recent remotes (exercises different paths).
oldhost=`./getpmcdhosts -L -n 1 -v 'pcp<3.8.4' 2>$seq_full`
[ -z "$oldhost" ] && oldhost=`./getpmcdhosts -L -n 1`
[ -z "$oldhost" ] && _notrun "No remote hosts available"
short_oldhost=`echo $oldhost | sed -e 's/\..*//'`
# match pmstat(1) truncation
short_oldhost=`printf "%-7.7s" "$short_oldhost" | sed -e 's/  *$//'`

# real QA test starts here
set -- `pmprobe -h localhost -v pmcd.hostname`
eval newhost=$3
short_newhost=`echo $newhost | sed -e 's/\..*//'`
# match pmstat(1) truncation
short_newhost=`printf "%-7.7s" "$short_newhost" | sed -e 's/  *$//'`

echo "using oldhost $oldhost ($short_oldhost)" >> $seq_full
echo "using newhost $newhost ($short_newhost)" >> $seq_full

pmstat -t 0.2 -s 2 -h localhost -h $oldhost > $tmp.out
grep -q $short_newhost $tmp.out && echo "Correct local hostname in pmstat output"
grep -q $short_oldhost $tmp.out && echo "Correct remote hostname in pmstat output"
cat $tmp.out >> $seq_full

# success, all done
status=0
exit