parent
0c65678e6c
commit
7eb5bdadcd
@ -308,4 +308,28 @@ start_server {tags {"dump"}} {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
test {MIGRATE AUTH: correct and wrong password cases} {
|
||||||
|
set first [srv 0 client]
|
||||||
|
r del list
|
||||||
|
r lpush list a b c d
|
||||||
|
start_server {tags {"repl"}} {
|
||||||
|
set second [srv 0 client]
|
||||||
|
set second_host [srv 0 host]
|
||||||
|
set second_port [srv 0 port]
|
||||||
|
$second config set requirepass foobar
|
||||||
|
$second auth foobar
|
||||||
|
|
||||||
|
assert {[$first exists list] == 1}
|
||||||
|
assert {[$second exists list] == 0}
|
||||||
|
set ret [r -1 migrate $second_host $second_port list 9 5000 AUTH foobar]
|
||||||
|
assert {$ret eq {OK}}
|
||||||
|
assert {[$second exists list] == 1}
|
||||||
|
assert {[$second lrange list 0 -1] eq {d c b a}}
|
||||||
|
|
||||||
|
r -1 lpush list a b c d
|
||||||
|
$second config set requirepass foobar2
|
||||||
|
catch {r -1 migrate $second_host $second_port list 9 5000 AUTH foobar} err
|
||||||
|
assert_match {*invalid password*} $err
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user