File: 426

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 (126 lines) | stat: -rwxr-xr-x 2,742 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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
#! /bin/sh
# PCP QA Test No. 426
# tests trace PMDA reset capability
#
# Copyright (c) 2015 Red Hat.
# 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

[ -f $PCP_PMDAS_DIR/trace/pmdatrace ] || _notrun "trace pmda not installed"

_cleanup()
{
    if [ -n "$savedtracehost" ]
    then
	PCP_TRACE_HOST=$savedtracehost; export PCP_TRACE_HOST
    fi
    if $_needclean
    then
	if $install_on_cleanup
	then
	    ( cd $PCP_PMDAS_DIR/trace; $sudo ./Install </dev/null >/dev/null 2>&1 )
	else
	    ( cd $PCP_PMDAS_DIR/trace; $sudo ./Remove </dev/null >/dev/null 2>&1 )
	fi
	_needclean=false
    fi
    rm -f $tmp.*
    exit $status
}

install_on_cleanup=false
pminfo trace >/dev/null 2>&1 && install_on_cleanup=true

status=1	# failure is the default!
_needclean=true
trap "_cleanup" 0 1 2 3 15

if $install_on_cleanup
then
    : pmda already installed
else
    ( cd $PCP_PMDAS_DIR/trace; $sudo ./Install </dev/null >/dev/null 2>&1 )
fi

if [ -n "$PCP_TRACE_HOST" ]
then
    savedtracehost=$PCP_TRACE_HOST; unset PCP_TRACE_HOST
fi

_traceme()
{
    pmtrace $traceargs foo
    pmtrace $traceargs bar
    pmtrace $traceargs eek
    echo
    echo 'SHOULD SEE 1="foo", 2="bar", 3="eek" ...'
    pminfo -f trace.$traceindom.count

    echo
    echo "Resetting trace metrics ($traceindom #1)"
    pmstore trace.control.reset 1
    echo
    echo 'SHOULD SEE NO VALUES ...'
    pminfo -f trace.$traceindom.count

    pmtrace $traceargs eek
    pmtrace $traceargs bar
    echo
    echo 'SHOULD SEE 2="bar", 3="eek" ...'
    pminfo -f trace.$traceindom.count

    echo
    echo "Resetting trace metrics ($traceindom #2)"
    pmstore trace.control.reset 1
    echo
    echo 'SHOULD SEE NO VALUES ...'
    pminfo -f trace.$traceindom.count

    pmtrace $traceargs new
    pmtrace $traceargs foo
    # should see 1=foo, 4=new
    echo
    echo 'SHOULD SEE 1="foo", 4="new" ...'
    pminfo -f trace.$traceindom.count
}

# real QA test starts here
if ! _service pmcd restart 2>&1; then _exit 1; fi \
| _filter_pcp_restart
_wait_for_pmcd || _exit 1
if ! _service pmlogger restart 2>&1; then _exit 1; fi \
| _filter_pcp_restart
_wait_for_pmlogger || _exit 1

# test the point instance domain reset
traceindom="point"
traceargs=""
echo
echo "--- Testing trace.point metrics ---"
_traceme

# test the observation instance domain reset
traceindom="observe"
traceargs="-v 1"
echo
echo "--- Testing trace.observe metrics ---"
_traceme

# test the transaction instance domain reset
traceindom="transact"
traceargs="-e exit"
echo
echo "--- Testing trace.transact metrics ---"
_traceme

# success, all done
status=0
exit