diff options
author | antirez <antirez@gmail.com> | 2015-12-11 13:41:58 +0100 |
---|---|---|
committer | antirez <antirez@gmail.com> | 2015-12-13 10:16:46 +0100 |
commit | 5912afc9d4aa85f2f66f7f318a22fe4f1b4be9c3 (patch) | |
tree | a2a0f78d85b4d1b9fd16b7e2b6cd4a2278b5cce5 | |
parent | 9276d787768b03ade9bf1c5935d2f05f731e25e9 (diff) | |
download | redis-5912afc9d4aa85f2f66f7f318a22fe4f1b4be9c3.tar.gz |
Test: pipelined MIGRATE tests added.
-rw-r--r-- | tests/unit/dump.tcl | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/tests/unit/dump.tcl b/tests/unit/dump.tcl index d39204f9f..1cac8ce03 100644 --- a/tests/unit/dump.tcl +++ b/tests/unit/dump.tcl @@ -217,4 +217,58 @@ start_server {tags {"dump"}} { assert_match {IOERR*} $e } } + + test {MIGRATE can migrate multiple keys at once} { + set first [srv 0 client] + r set key1 "v1" + r set key2 "v2" + r set key3 "v3" + start_server {tags {"repl"}} { + set second [srv 0 client] + set second_host [srv 0 host] + set second_port [srv 0 port] + + assert {[$first exists key1] == 1} + assert {[$second exists key1] == 0} + set ret [r -1 migrate $second_host $second_port "" 9 5000 keys key1 key2 key3] + assert {$ret eq {OK}} + assert {[$first exists key1] == 0} + assert {[$first exists key2] == 0} + assert {[$first exists key3] == 0} + assert {[$second get key1] eq {v1}} + assert {[$second get key2] eq {v2}} + assert {[$second get key3] eq {v3}} + } + } + + test {MIGRATE with multiple keys must have empty key arg} { + catch {r MIGRATE 127.0.0.1 6379 NotEmpty 9 5000 keys a b c} e + set e + } {*empty string*} + + test {MIGRATE with mutliple keys migrate just existing ones} { + set first [srv 0 client] + r set key1 "v1" + r set key2 "v2" + r set key3 "v3" + start_server {tags {"repl"}} { + set second [srv 0 client] + set second_host [srv 0 host] + set second_port [srv 0 port] + + set ret [r -1 migrate $second_host $second_port "" 9 5000 keys nokey-1 nokey-2 nokey-2] + assert {$ret eq {NOKEY}} + + assert {[$first exists key1] == 1} + assert {[$second exists key1] == 0} + set ret [r -1 migrate $second_host $second_port "" 9 5000 keys nokey-1 key1 nokey-2 key2 nokey-3 key3] + assert {$ret eq {OK}} + assert {[$first exists key1] == 0} + assert {[$first exists key2] == 0} + assert {[$first exists key3] == 0} + assert {[$second get key1] eq {v1}} + assert {[$second get key2] eq {v2}} + assert {[$second get key3] eq {v3}} + } + } } |