File: 202

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 (86 lines) | stat: -rwxr-xr-x 1,981 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. 202
# check EOL marker in pmlogmerge
#
# 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

trap "rm -f $tmp.*; exit" 0 1 2 3 15
#debug# tmp=`pwd`/tmp

_filter()
{
    pmdumplog $1 \
    | tee -a $seq_full \
    | $PCP_AWK_PROG '
/<mark>/	{ mark++; next }
/^[0-9][0-9]:[0-9][0-9]:[0-9][0-9]\./	{ rec++ }
END		{ printf "%d records",rec
		  if (mark) printf ", and %d marks",mark
		  print ""
		}'
    pmdumplog $1 \
    | $PCP_AWK_PROG >$1.stamp '
/<mark>/	{ print $1 "-mark"; next }
/^[0-9][0-9]:[0-9][0-9]:[0-9][0-9]\./	{ print $1 }'
}

# real QA test starts here
rm -f $tmp.A.*
echo "log mandatory on 40 msec sample.milliseconds" \
| pmlogger -s 4 -l $tmp.log $tmp.A >>$seq_full 2>&1
echo
echo log.A
cat $tmp.log >>$seq_full
ls -l $tmp.A.* >>$seq_full
pmdumplog -l $tmp.A >>$seq_full
_filter $tmp.A

rm -f $tmp.B.*
echo "log mandatory on 50 msec sample.milliseconds" \
| pmlogger -s 6 -l $tmp.log $tmp.B >>$seq_full 2>&1
echo
echo log.B
cat $tmp.log >>$seq_full
ls -l $tmp.B.* >>$seq_full
pmdumplog -l $tmp.A >>$seq_full
_filter $tmp.B

for arg in -m ""
do
    rm -f $tmp.C.*
    pmlogextract $arg $tmp.A $tmp.B $tmp.C
    echo
    echo "log.C == pmlogextract $arg log.A log.B"
    _filter $tmp.C

    echo
    echo "mismatch timestamps"
    cat $tmp.A.stamp $tmp.B.stamp \
    | comm -3 - $tmp.C.stamp \
    | sed -e 's/[0-9][0-9]:[0-9][0-9]:[0-9][0-9]\.[0-9][0-9]*[0-9]/timestamp/g'

    echo
    echo "pmval [no interpolate] ..."
    pmval -U $tmp.C sample.milliseconds 2>&1 \
    | tee -a $seq_full \
    | $PCP_AWK_PROG '
    /suspended/				{ mark++; next }
    /^[0-9][0-9]:[0-9][0-9]:[0-9][0-9]\./   { rec++ }
    END			{ printf "%d records",rec
			      if (mark) printf ", and %d marks",mark
			      print ""
			    }'

    # and check integrity of the output archive ...
    #
    pmlogcheck $tmp.C

done