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
|
#! /bin/sh
# flags.sh: Testing for setting /unsetting flags.
# Import common functions & definitions.
. ../common/test-common
g=new.txt
s=s.$g
p=p.$g
remove foo $s $g $p [zx].$g
###
### Tests for the 'v' flag; see also init-mrs.sh.
###
# Create SCCS file with a substituted keyword.
echo '%M%' >foo
docommand v1 "${admin} -ifoo $s" 0 "" ""
# Check that the MR validation flag is OFF.
docommand v2 "${prs} -d:MF: $s" 0 "no\n" ""
# Check that the MR validation program is unset.
docommand v3 "${prs} -d:MP: $s" 0 "none\n" ""
## Create and specify MR numbers...
# Create with no MR
remove $s
docommand v4 "${admin} -fv -m -r2 -ifoo $s" 0 "" ""
remove $s
# Set MR flag -- should work.
remove $s
docommand v5 "${admin} -fv -mI13 -ifoo $s" 0 "" IGNORE
# Install MR validating program (setting & getting the
# name of the MR validator)
docommand v6 "${admin} -fvtrue $s" 0 "" IGNORE
# Make sure validation checks can succeed, ever.
remove $s
docommand v7 "${admin} -fvtrue -mI19 -ifoo $s" 0 "" ""
remove $s $g
###
### Tests for the 'b' flag
###
docommand b1 "${admin} -ifoo $s" 0 "" ""
# By default branch creation should fail, and we just get a delta
# further down the trunk -- the invocation does not fail,
# we just don't get a branch. In this situation, CSSC emits a warning
# to indicate to the user why their apparent intention has not been
# carried out.
docommand b2 "${get} -e -b -r1.1 $s" 0 "1.1\nnew delta 1.2\n1 lines\n" IGNORE
# echo testing -- early exit.
# exit 1
docommand b3 "${unget} $s" 0 "1.2\n" ""
# Turn on the enable-branches flag.
docommand b4 "${admin} -fb $s" 0 "" ""
# Create a branch.
docommand b5 "${get} -e -b -r1.1 $s" 0 "1.1\nnew delta 1.1.1.1\n1 lines\n" \
IGNORE
docommand b6 "${unget} $s" 0 "1.1.1.1\n" ""
remove $s $g $p
###
### Tests for the n flag.
###
# Create an SCCS file with the "n" flag turned on.
docommand b7 "${admin} -ifoo $s" 0 "" ""
docommand b8 "${admin} -fn $s" 0 "" ""
# Skip a release (2)
docommand b9 "${get} -e -r3 $s" 0 "1.1\nnew delta 3.1\n1 lines\n" \
IGNORE
echo "hello" >> $g
docommand b10 "${delta} -y $s" 0 "3.1\n1 inserted\n0 deleted\n1 unchanged\n" IGNORE
# Check that a null delta was made for release 2, at all.
docommand b11 "${prs} -r2.1 -d:I: $s" 0 "2.1\n" IGNORE
# Check some details about that release. The comment is
# "AUTO NULL DELTA", no deltas were included or excluded;
# one delta was ignored; the predecessor sequence number must be 1;
# the sequence number of this delta must be 2, and the type must be 'D',
# that is, a normal delta.
docommand b12 "${prs} -r2.1 '-d:C:|:DI:|:DP:|:DS:|:DT:' $s" 0 \
'AUTO NULL DELTA\n||1|2|D\n' IGNORE
###
### Tests for the d flag
###
remove $s
docommand d1 "${admin} -n -fd1.1 $s" 0 "" ""
docommand d2 "${prs} -d:FL: $s" 0 "default SID\t1.1\n\n" ""
remove $s
###
### Cleanup and exit.
###
rm -rf test
remove foo $s $g $p [zx].$g command.log
success
|
