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
|
#! /bin/sh
# i-option.sh: Testing for correct operation of admin -i.
# Import common functions & definitions.
. ../common/test-common
g=bar
s=s.$g
remove $s foo $g
remove $g
echo '%M%' > foo
test x`cat foo` = x'%M%' || miscarry cannot create file foo.
docommand I1 "${admin} -ifoo $s" 0 "" IGNORE
docommand I2 "${get} -r1.1 -p $s" 0 "$g\n" IGNORE
remove foo s.bar
# -i on its own means read from stdin.
echo baz | \
docommand I3 "${admin} -i $s" 0 "" IGNORE
docommand I4 "${get} -r1.1 -p $s" 0 "baz\n" IGNORE
remove $s $g foo
# If the file specified by -i does not exist, make sure that not
# only is there a fatal exit, but neither the s-file or the x-file is
# left behind.
g=foo
s=s.$g
x=x.$g
remove $g $s $x
docommand I5 "${admin} -i$g $s" 1 "" IGNORE
echo_nonl "I6..."
if test -f $s; then
fail I6: The file $s should not have been created.
fi
echo 'passed'
echo_nonl "I7..."
if test -f $x; then
fail I7: The temporary file $x should have been deleted.
fi
remove $g $s $x
echo 'passed'
# Now check that we get the number of inserted lines correct for the
# first delta.
remove $g $s $x
echo_nonl "" > $g
docommand I8 "${admin} -i$g $s" 0 "" IGNORE
docommand I9 "${prs} -d:Li: $s" 0 "00000\n" IGNORE
# Check that the deleted and unchanged lines are also zero.
docommand I10 "${prs} -d:Ld: $s" 0 "00000\n" IGNORE
docommand I11 "${prs} -d:Lu: $s" 0 "00000\n" IGNORE
remove $g $s $x
echo_nonl "\n" > $g
docommand I12 "${admin} -i$g $s" 0 "" IGNORE
docommand I13 "${prs} -d:Li: $s" 0 "00001\n" IGNORE
# Check that the deleted and unchanged lines are also zero.
docommand I14 "${prs} -d:Ld: $s" 0 "00000\n" IGNORE
docommand I15 "${prs} -d:Lu: $s" 0 "00000\n" IGNORE
remove $g $s $x
echo_nonl "hello\nworld\n" > $g
docommand I16 "${admin} -i$g $s" 0 "" IGNORE
docommand I17 "${prs} -d:Li: $s" 0 "00002\n" IGNORE
remove $x s.bar s.foo foo bar command.log
success
|
