File: 1856

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 (73 lines) | stat: -rwxr-xr-x 1,673 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
#!/bin/sh
# PCP QA Test No. 1856
# Exercise pcp-dstat top-alike functionality.
#
# Copyright (c) 2022 Red Hat.  All Rights Reserved.
#

seq=`basename $0`
echo "QA output created by $seq"

# get standard environment, filters and checks
. ./common.product
. ./common.filter
. ./common.check

DSTAT="$PCP_BINADM_DIR/pcp-dstat"
test -f "$DSTAT" || _notrun "$DSTAT is not installed, skipped"

_cleanup()
{
    cd $here
    $sudo rm -rf $tmp $tmp.*
}

status=0	# success is the default!
username=`id -u -n`
trap "_cleanup; exit \$status" 0 1 2 3 15

dstat()
{
    message="$1"
    shift
    options="$@"

    echo "$message"

    pcp_options="pcp -z --origin=+1.1 --archive $here/archives/pcp-atop"
    $pcp_options dstat --time $options 1 2 >$tmp.out 2>$tmp.err

    echo "=== std out"
    cat $tmp.out
    echo "=== std err"
    cat $tmp.err
    echo "=== done" && echo
}

filter_info()
{
    sed \
        -e "/^$(printf '\t')/d" \
        -e "/^.GCC /d" \
        -e "s/^Python .*/Python VERSION/g" \
        -e "s,$PCP_SYSCONF_DIR,/etc/pcp,g" \
        -e "s,pcp-dstat $PCP_VERSION,pcp-dstat VERSION,g" \
        -e "s/\"User:\",\"$username\"/\"User:\",\"USER\"/g" \
        -e "s/\"Date:\",\".*\"/\"Date:\",\"DATE\"/g" \
        -e "s,--output $tmp.csv,--output TMP.csv,g" \
    #end
}

# real QA test starts here
TERM=ansi; export TERM

dstat "Top CPU" --cpu --top-cpu --output $tmp.csv | filter_info
echo "CSV contents" | tee -a $seq_full
cat $tmp.csv | tee -a $seq_full | filter_info

dstat "Top I/O" --top-bio-adv --top-bio --output $tmp.csv2 | filter_info
echo "CSV contents" | tee -a $seq_full
cat $tmp.csv2 | tee -a $seq_full | filter_info

# success, all done
exit