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
|
#! /bin/sh
# defsid.sh: Tests for the "d" (default sid) flag.
# Import common functions & definitions.
. ../common/test-common
remove command.log
g=brtest
s=s.$g
z=z.$g
x=x.$g
p=p.$g
remove [zxsp].$g $g
# Create the s. file and make sure it exists.
remove $g
echo "%M%" > $g
docommand d1 "$admin -n -i$g $s" 0 "" IGNORE
remove $g
# Create a second revision.
docommand d2 "$get -e $s" 0 "1.1\nnew delta 1.2\n1 lines\n" ""
# Check the file in to leave the branch in place.
docommand d3 "$delta -yNoComment $s" 0 "1.2\n0 inserted\n0 deleted\n1 unchanged\n" ""
# Make a branch at the same place, and check the resulting SID.
docommand d4 "$get -e -r1.1 $s" 0 "1.1\nnew delta 1.1.1.1\n1 lines\n" ""
docommand d5 "$delta -yNoComment $s" 0 "1.1.1.1\n0 inserted\n0 deleted\n1 unchanged\n" ""
# Set the default-sid flag.
docommand d6 "$admin -fd1.1 $s" 0 "" ""
# Make sure we select that SID.
docommand d7 "$get -g $s" 0 "1.1\n" ""
# Change the default-sid flag.
docommand d8 "$admin -fd1.1.1.1 $s" 0 "" ""
# Make sure we select that SID.
docommand d9 "$get -g $s" 0 "1.1.1.1\n" ""
# Delete the flag.
docommand d10 "$admin -dd $s" 0 "" ""
# Make sure we select the right SID now..
docommand d11 "$get -g $s" 0 "1.2\n" ""
##
## And now a second battery of tests. If we use "get -e",
## on a file with a default SID, that SID should be
## selected for the new revision.
remove [zxsp].$g $g
docommand e1 "${admin} -n $s" 0 IGNORE IGNORE
docommand e2 "${admin} -fd100 $s" 0 IGNORE IGNORE
docommand e3 "${get} -e $s" 0 "1.1\nnew delta 100.1\n0 lines\n" ""
docommand e4 "echo "hello" >> $g" 0 "" ""
docommand e5 "${delta} -y"NoComment" $s" 0 IGNORE IGNORE
# prs $s
docommand e6 "${get} -e $s" 0 "100.1\nnew delta 100.2\n1 lines\n" ""
docommand e7 "echo "there" >> $g" 0 "" ""
docommand e8 "${delta} -y"NoComment" $s" 0 IGNORE IGNORE
# prs $s
remove [zxsp].$g $g
remove command.log
success
|
