File: 136

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 (86 lines) | stat: -rwxr-xr-x 2,218 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
#! /bin/sh
# PCP QA Test No. 136
# exercise the -v N option to pmlogger to volume switch after N samples
#
# PCP_ARCHIVE_VERSION V2 variant, see 1419 for the V2 variant.
#
# 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

_do_ls()
{
    # hostname length affects the pmcd.pmlogger metrics in volume 0
    # such that we need to cater for an extra large range of possible
    # volume sizes in the first volume for long-hostname-hosts, ditto
    # for the epilogue and the last volume
    $PCP_AWK_PROG '
/Cannot/	{ print; next }
		{ print $9,int($5/200)*200 "-" 200+int($5/200)*200,"bytes" }' \
    | sed -e "s;$tmp;MYLOG;"
}

_do_time()
{
    tstamp=`wc -l <$tmp.sed | sed -e 's/  *//g'`
    tstamp=`expr $tstamp - 2`
    sed >$tmp.tmp \
	-e "s;$tmp;MYLOG;" \
	-e 's/from host .*/from host LOCALHOST/' \
    # end
    sed -n <$tmp.tmp \
      -e 's/.*\([0-9][0-9]:[0-9][0-9]:[0-9][0-9].[0-9][0-9]*[0-9]\).*/\1/p' \
    | sort -u \
    | while read time
    do
    	if grep $time $tmp.sed >/dev/null
	then
	    :
	else
	    echo "s/$time/TIMESTAMP-$tstamp/g" >>$tmp.sed
	    tstamp=`expr $tstamp + 1`
	fi
    done

    sed -f $tmp.sed $tmp.tmp
}

# real QA test starts here
echo 's/ [A-Z][a-z][a-z] [A-Z][a-z][a-z] .. / month-day /g' >$tmp.sed
echo 's/ [12][0-9][0-9][0-9]$/ year/' >>$tmp.sed

_start_up_pmlogger -V 2 -r -s 50 -v 10 -L -c /dev/null -l $tmp.log $tmp >$tmp.err 2>&1
pmsleep 1.1

pmlc <<End-of-File
connect $pid
log mandatory on 100 msec { sampledso.milliseconds }
End-of-File

_wait_pmlogger_end $pid || _exit 1

cat $tmp.log >>$seq_full

# write a fixed length hostname into log label (for dumplog determinism)
$sudo pmloglabel -h qahost $tmp

LC_TIME=POSIX ls -l $tmp.? | tee -a $seq_full | _do_ls

echo
pmdumplog -t $tmp | _do_time \
| $PCP_AWK_PROG '
$1 ~ /TIMESTAMP/ && NF == 4	{ print $1 "            " $2 "       OFFSET       OFFSET"; next }
				{ print }'

echo
echo "=== samples, expect 50 + 1 for prologue + 1 for epilogue ==="
pmdumplog -m $tmp | sed -n '/^[0-9]/p' | wc -l | sed -e 's/  *//g'