blob: f81cead43bf90bf6fc3e844ea3d4f1f4cb51e1b9 (
plain)
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
|
#! /bin/sh
# PCP QA Test No. 328
# pmlogextract grok new archives with embedded <mark>s
#
# 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
status=1 # failure is the default!
trap "rm -f $tmp.*; exit \$status" 0 1 2 3 15
_check()
{
echo
pmdumplog -z $tmp 2>&1 | grep '<mark>' >$tmp.merge
cat $tmp.one $tmp.other \
| diff -c - $tmp.merge \
| sed \
-e 's/^\*\*\* Standard .*/*** concatenated from input archives/' \
-e 's/^\*\*\* -.*/*** concatenated from input archives/' \
-e 's/^--- \/.*/--- merged archive/'
}
# deal with an annoying libc error ... using TZ=:Australia/Melbourne
# causes the -z option to report the wrong time, at least for some
# times of the year
#
TZ=EST-10
export TZ
# real QA test starts here
echo
echo 'marks in one archive ...'
pmdumplog -z src/19970807.09.54 2>&1 | grep '<mark>' >$tmp.one
cat $tmp.one
echo
echo 'marks in other archive ...'
pmdumplog -z src/19970807.09.59 2>&1 | grep '<mark>' >$tmp.other
cat $tmp.other
echo
echo 'pmlogextract ... and marks ... and diffs (expect an extra one in the middle)'
pmlogextract src/19970807.09.54 src/19970807.09.59 $tmp
_check
echo
echo 'pmlogextract ... and marks ... and diffs (expect an extra one in the middle)'
rm -f $tmp.0 $tmp.meta $tmp.index
pmlogextract src/19970807.09.54 src/19970807.09.59 $tmp
_check
# success, all done
status=0
exit
|
