blob: b1207eed6fee42e2bf9e56e624f83c3baaed023f (
plain)
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
|
proc setup {} {
save_env
}; # setup()
proc teardown {} {
assert_env_unmodified
}; # teardown()
setup
assert_complete_any "chown "
sync_after_int
# Find user/group suitable for testing.
set failed_find_unique_completion 0
foreach ug {user group} {
# compgen -A is used because it's a bash builtin and available everywhere.
# The || true part prevents exec from throwing an exception if nothing is
# found (very very unlikely).
set list [split [exec bash -c "compgen -A $ug || true"] "\n"]
if {![find_unique_completion_pair $list part$ug full$ug]} {
untested "Not running complex chown tests; no suitable test $ug found."
set failed_find_unique_completion 1
}
}
# These tests require an unique completion.
if {!$failed_find_unique_completion} {
assert_complete $fulluser "chown $partuser"
sync_after_int
assert_complete $fulluser:$fullgroup "chown $fulluser:$partgroup"
sync_after_int
# One slash should work correctly (doubled here for tcl).
assert_complete $fulluser\\:$fullgroup "chown $fulluser\\:$partgroup"
sync_after_int
foreach prefix {
"funky\\ user:" "funky\\ user\\:" "funky.user:" "funky\\.user:" "fu\\ nky.user\\:"
"f\\ o\\ o\\.\\bar:" "foo\\_b\\ a\\.r\\ :"
} {
set test "Check preserve special chars in $prefix$partgroup<TAB>"
#assert_complete_into "chown $prefix$partgroup" "chown $prefix$fullgroup " $test
assert_complete $prefix$fullgroup "chown $prefix$partgroup" $test
sync_after_int
}
# Check that we give up in degenerate cases instead of spewing various junk.
assert_no_complete "chown $fulluser\\\\:$partgroup"
sync_after_int
assert_no_complete "chown $fulluser\\\\\\:$partgroup"
sync_after_int
assert_no_complete "chown $fulluser\\\\\\\\:$partgroup"
sync_after_int
# Colons in user/groupnames are not usually allowed.
assert_no_complete "chown foo:bar:$partgroup"
sync_after_int
}
teardown
|