File: 179

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 (91 lines) | stat: -rwxr-xr-x 2,308 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
#! /bin/sh
# PCP QA Test No. 179
# pmval -i failure for indom not defined at start of archive?
#
# 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
. ./common.check

trap "$sudo rm -f $tmp.*; exit" 0 1 2 3 15

_filter_pmlc()
{
    sed \
	-e 's/connect [0-9][0-9]*/connect PID/' \
	-e 's/ nl /    /' \
	-e "/timed out/d" \
	-e 's/Version [0-9].*/Version VERSION/'
}

_filter()
{
    _filter_pmdumplog \
    | sed \
	-e '/pmResult/s/ .* numpmid/ ... numpmid/' \
	-e '/(hinv.ndisk)/{
s/value [0-9][0-9]*/value INTEGER/
s/[0-9]*\.[0-9]*\.[0-9]*/PMID/
}' \
	-e "/\"$pid\"/s/$pid/LOGGER_PID/g" \
	-e '/pmcd.pmlogger.port/s/value .*/value PORT/' \
	-e '/pmcd.pmlogger.host/s/value ".*/value "HOST"/' \
	-e '/pmcd.pmlogger.archive/s/value ".*/value "PATH"/' \
	-e '/pmcd\.seqnum/s/value [0-9][0-9.]*/value SEQNUM/' \
	-e '/pmcd\.pid/s/value [0-9][0-9.]*/value PID/' \
    # end
}

# real QA test starts here

echo "=== just bin.sample ==="
$sudo rm -f $tmp.*		# refactor-ok
_start_up_pmlogger -s4 -L -c /dev/null -l $tmp.log $tmp >$tmp.err 2>&1
sleep 2

pmlc -ie <<End-of-File 2>&1 | _filter_pmlc
connect $pid
log mandatory on 200 msec sample.bin
End-of-File
_wait_pmlogger_end $pid || _exit 1

pmdumplog -im $tmp | _filter
echo "pmval ..."
pmval -i "bin-100,bin-300,bin-500" -U $tmp sample.bin 2>$tmp.err | _filter
_filter <$tmp.err

echo
echo "=== hinv.ndisk, then bin.sample ==="
$sudo rm -f $tmp.*		# refactor-ok
_start_up_pmlogger -s5 -L -c /dev/null -l $tmp.log $tmp
sleep 2

# split log requests across 2 pmlc invocations to help avoid a race
# at pmlogger where if the two requests arrive before the first one's
# timer event has been processed then the order of the two records in
# the archive may be reversed (issue occurs with "log early" changes
# to pmlogger).
#
pmlc -ie <<End-of-File 2>&1 | _filter_pmlc
connect $pid
log mandatory on once hinv.ndisk
End-of-File
pmsleep 0.1sec
pmlc -ie <<End-of-File 2>&1 | _filter_pmlc
connect $pid
log mandatory on 200 msec sample.bin
End-of-File
_wait_pmlogger_end $pid || _exit 1

pmdumplog -im $tmp | _filter
echo "pmval ..."
pmval -i "bin-100,bin-300,bin-500" -U $tmp sample.bin 2>$tmp.err | _filter
_filter <$tmp.err

exit 0