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
127
128
129
130
131
132
133
|
#! /bin/sh
# rap.sh: Test script for sccsdiff by Richard Polton <richardp@scopic.com>.
# This file is part of GNU CSSC.
# Create an SCCS file with two deltas. sccsdiff the two deltas.
# Import common functions & definitions.
. ../common/test-common
export get
# invariant label file1 file2
#
# diff file1 and file2 and fail the test if they
# are different.
invariant () {
if diff $2 $3
then
echo passed
else
fail "$@"
fi ;
}
g=foo
s=s.$g
remove $s $g command.log
echo one > $g
docommand prep1 "${admin} -i$g $s" 0 IGNORE IGNORE
remove $g
docommand prep2 "${get} -e $s " 0 IGNORE IGNORE
echo two >> $g
docommand prep3 "${delta} -ycomment $s" 0 IGNORE IGNORE
## Avoid any current locale setting - because we delete lines
## including the word "Page" below, so we must use the C or POSIX
## locale, or some implementation-defined English locale, in order
## to see that string.
unset LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LANG
# counterexample for Debian GNU/Linux: LANG=de_DE.ISO-8859-1
# export LANGUAGE LC_ALL LC_CTYPE LC_COLLATE LANG
echo_nonl "D1..."
remove $g
${sccsdiff} -r1.1 -r1.2 $s 2>errs |
sed '/lines/d' |
sed '/1\./d' > diff.out
cat > diff.test <<EOF
1a2
> two
EOF
# Expect success
invariant D1 diff.out diff.test
remove errs
#
# sccsdiff output to pipe through pr
#
echo_nonl "D2..."
remove diff.out
${sccsdiff} -p -r1.1 -r1.2 $s 2>errs |
sed '/lines/d' |
sed '/1\./d' |
sed '/Page/d' > diff.out
remove diff.test1
pr diff.test | sed '/Page/d' > diff.test1
# Expect success
invariant D2 diff.out diff.test1
remove diff.test1 errs
#
# Try to sccsdiff non-existent deltas
#
# second sid
#
echo_nonl "D3..."
remove diff.out
${sccsdiff} -r1.1 -r1.3 $s 2>errs >/dev/null
rv=$?
sed '/No id keywords/d' > diff.out < errs
if [ $rv -ne 1 ]; then
fail sccsdiff should return value 1, got $rv.
else
echo passed
fi
remove diff.out errs
#
# first sid
#
remove out
echo_nonl "D4..."
${sccsdiff} -r1.3 -r1.1 $s 2>errs >/dev/null
rv=$?
sed '/No id keywords/d' > diff.out < errs
if [ $rv -ne 1 ]; then
fail sccsdiff should return value 1, got $rv.
else
echo passed
fi
remove diff.out errs
# N.B. The output from solaris sccsdiff is a little different. diff follows:
#1c1,3
#< ERROR [s.foo]: nonexistent sid (ge5)
#---
#>
#> get: s.foo: Requested SID not found.
#> Failed to get second specified version from s.foo
remove $g $s z.$g x.$g diff.out diff.test diff.test1 command.log
success
# Local Variables:
# Mode: shell
# End:
|
