File: 075

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 (122 lines) | stat: -rwxr-xr-x 2,618 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
#! /bin/sh
# PCP QA Test No. 075
# tests for proper handling of white spaces in pmval and pmstore
#
# 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

host=`hostname`

_filter()
{
    sed \
	-e "s/$host/localhost/g" \
	-e 's/Permission denied/No permission to perform requested operation/'
}

_cmd()
{
    echo ""
    echo "$ $*" | sed -e "s/$remote/REMOTEHOST/"
    case $#
    in
	1|2|3)
	    $1 $2 "$3"
	    ;;
	4)
	    $1 $2 "$3" "$4"
	    ;;
	5)
	    $1 $2 "$3" "$4" "$5"
	    ;;
	6)
	    $1 $2 "$3" "$4" "$5" "$6"
	    ;;
	7)
	    $1 $2 "$3" "$4" "$5" "$6" "$7"
	    ;;
	8)
	    $1 $2 "$3" "$4" "$5" "$6" "$7" "$8"
	    ;;
	9)
	    $1 $2 "$3" "$4" "$5" "$6" "$7" "$8" "$9"
	    ;;
	10)
	    $1 $2 "$3" "$4" "$5" "$6" "$7" "$8" "$9" "$10"
	    ;;
	*)
	    echo "Snarf! $* ($# args)"
	    exit 1
	    ;;
    esac \
    | _filter
}

_restore_sample_bin()
{
    for inst in 300 400 500
    do
	pmstore -i bin-$inst sample.bin $inst >/dev/null 2>&1
    done
}

_cleanup()
{
    _restore_sample_bin
    rm -f $tmp.*
}

status=0
trap "_cleanup; exit \$status" 0 1 2 3 15

PMCD_CONNECT_TIMEOUT=30
PMCD_REQUEST_TIMEOUT=30
export PMCD_CONNECT_TIMEOUT PMCD_REQUEST_TIMEOUT

remote=`./getpmcdhosts -L -n 1 -a sample 2>$tmp.out`
if [ -z "$remote" ]
then
    _notrun "`cat $tmp.out`"
    # NOTREACHED
fi

# real QA test starts here
_cmd pmstore -i bin-300,bin-400,bin-500 sample.bin 500
_cmd pmstore -i bin-300,bin-400,bin-500 sample.bin 400
_cmd pmstore -i "bin-300 bin-400 bin-500" sample.bin 500
_cmd pmstore -i 'bin-300
bin-400
bin-500' sample.bin 455
_cmd pmstore -i "bin-300,bin-400,bin-500" sample.bin 234
_cmd pmstore -i 'bin-300,bin-400,bin-500' sample.bin 500
_cmd pmstore -i bin-300 bin-400 bin-500 sample.bin 400
_cmd pmstore -i bin-300.bin-400.bin-500 sample.bin 400
_cmd pmstore -i 'bin-300,bin-400,bin-500' sample.bin
_cmd pmstore -i 'bin-300,bin-400,bin-500' -h $remote sample.bin 500

_restore_sample_bin

_cmd pmval -s 2 -i bin-300,bin-400,bin-500 sample.bin
_cmd pmval -i bin-300,bin-400,bin-500 -s 2 sample.bin
_cmd pmval -t 0.2 -s 2 -i "bin-300 bin-400 bin-500" sample.bin
_cmd pmval -t 0.2 -s 2 -i 'bin-300
bin-400
bin-500' sample.bin
_cmd pmval -i "bin-300,bin-400,bin-500" -s 2 sample.bin
_cmd pmval -i 'bin-300,bin-400,bin-500' -s 2 sample.bin
_cmd pmval -s 2 -t 0.3 -i bin-300 bin-400 bin-500 sample.bin
_cmd pmval -s 2 -t 0.3 -i bin-300.bin-400.bin-500 sample.bin
_cmd pmval -i bin-300,bin-400 -s 2 sample.bin


# success, all done
status=0
exit