mirror of
https://github.com/samba-team/samba.git
synced 2024-12-23 17:34:34 +03:00
2962a4cc61
(This used to be commit 4a14b16cd1
)
58 lines
1.1 KiB
Plaintext
58 lines
1.1 KiB
Plaintext
#
|
|
# Test various things using the masktest program
|
|
#
|
|
|
|
# Initialisation
|
|
|
|
load_lib env-single.exp
|
|
|
|
set timeout 10
|
|
|
|
# Test each wildcard individually, then all together at once
|
|
|
|
set testlist {{"abc" "<"} {"abc" ">"} {"abc" "\""} {"abc" "?"} {"abc" "*"} \
|
|
{"abc" "."} {"abc" "<>\"?*."}}
|
|
|
|
foreach { test } $testlist {
|
|
|
|
set got_output 0
|
|
set fail 0
|
|
|
|
# Spawn masktest
|
|
|
|
spawn bin/masktest //$server/$share -U $user -n 1000 -a \
|
|
-f [lindex $test 0] -m [concat [lindex $test 0] [lindex $test 1]]
|
|
|
|
# Check output
|
|
|
|
while 1 {
|
|
expect {
|
|
-re "(...) (...) \[0-9\]+ mask=" {
|
|
if { $expect_out(1,string) != $expect_out(2,string) } {
|
|
fail "masktest [lindex $test 1]"
|
|
puts $expect_out(0,string);
|
|
set fail 1
|
|
break;
|
|
} else {
|
|
set got_output 1
|
|
}
|
|
}
|
|
eof { break }
|
|
}
|
|
}
|
|
|
|
# Produce result
|
|
|
|
set testname "[lindex $test 0] [lindex $test 1]"
|
|
|
|
if {$got_output} {
|
|
if {$fail} {
|
|
fail "masktest $testname"
|
|
} else {
|
|
pass "masktest $testname"
|
|
}
|
|
} else {
|
|
perror "no output seen for test $testname"
|
|
}
|
|
}
|