File: 196

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 (102 lines) | stat: -rwxr-xr-x 2,237 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
101
102
#! /bin/sh
# PCP QA Test No. 196
#
# Test pmcd's "-i ipaddr" option
# Don't expect this one to work away from Melbourne!
# Need pcpqa remote access to other machines
#
# Copyright (c) 1995-2002 Silicon Graphics, Inc.  All Rights Reserved.
#

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

# get standard filters
. ./common.product
. ./common.filter

_needclean=true
signal=$PCP_BINADM_DIR/pmsignal
status=1
trap "_cleanup; rm -f $tmp.*; exit \$status" 0 1 2 3 15

_cleanup()
{
    if $_needclean
    then
	_needclean=false
	$sudo $signal -a -s KILL $PCP_PMCD_PROG
	_service pmcd restart 2>&1 | _filter_pcp_restart
	_wait_for_pmcd
	_restore_auto_restart pmcd
	_service pmlogger restart 2>&1 | _filter_pcp_restart
	_wait_for_pmlogger
    fi
}

. ./common.check

# real QA test starts here

# This test requires a machine with two network interfaces.
# gonzo is the only one we have that cut's it.
#
host=`hostname`
if [ X$host != "Xgonzo" ]
then
    # if this isn't gonzo, fake it!
    tail -n +2 196.out
    status=0
    exit
fi

goodif=`grep ptg-gate /etc/hosts | cut -f1`
badif=`grep gonzo /etc/hosts | cut -f1`

# choose different ports to the standard ones so we don't have to stop/start
# pmcd.
#
PMCD_PORT=4320
export PMCD_PORT

# Do this in /var/tmp
#
cd /var/tmp
pmcdlog=$tmp.pmcd.log
if [ -x $PCP_PMCD_PROG ]
then
    $PCP_PMCD_PROG -i $goodif -l $pmcdlog >$tmp.pmcd.err 2>1
else
    echo "Cannot find pmcd?"
    exit
fi

_wait_for_pmcd 20 ptg-gate || _exit 1

metric=pmcd.control.debug
echo "Test that new pmcd is OK..."
if pminfo -f -h $goodif $metric
then
    echo "OK"
else
    echo "Error starting pmcd with -i $goodif -l $pmcdlog"
    echo "pmcd.log contains:"
    echo "======== start pmcd.log ========
    cat $pmcdlog
    echo "======== end pmcd.log ========
    exit
fi
echo ""

echo "Test access on good port..."
cmd='sh -c "PMCD_PORT='$PMCD_PORT'; export PMCD_PORT; pminfo -f -h '$goodif' '$metric'"'
ssh -q pcpqa@moomba.melbourne.sgi.com $cmd </dev/null

echo
echo "Test access on bad port (should fail)..."
cmd='sh -c "PMCD_PORT='$PMCD_PORT'; export PMCD_PORT; pminfo -f -h '$badif' '$metric'"'
ssh -q pcpqa@moomba.melbourne.sgi.com $cmd </dev/null 2>&1 \
| sed -e "s/$badif/NOT-A-GOOD-IPADDR/"

status=0
exit