summaryrefslogtreecommitdiff
path: root/tests/instances.tcl
diff options
context:
space:
mode:
authorOran Agra <oran@redislabs.com>2020-10-06 21:43:30 +0300
committerGitHub <noreply@github.com>2020-10-06 21:43:30 +0300
commit216c1106099f7c66c991a5a811c8fbacbb0ab17c (patch)
tree55a7ac4e286cbc2969942efbed5a7589340d9713 /tests/instances.tcl
parent6f3b91fe26990f4c849d3f20269d69f3e3dc96f5 (diff)
downloadredis-216c1106099f7c66c991a5a811c8fbacbb0ab17c.tar.gz
Allow blocked XREAD on a cluster replica (#7881)
I suppose that it was overlooked, since till recently none of the blocked commands were readonly. other changes: - add test for the above. - add better support for additional (and deferring) clients for cluster tests - improve a test which left the client in MULTI state.
Diffstat (limited to 'tests/instances.tcl')
-rw-r--r--tests/instances.tcl13
1 files changed, 13 insertions, 0 deletions
diff --git a/tests/instances.tcl b/tests/instances.tcl
index 5c4b665db..d3b1b50cd 100644
--- a/tests/instances.tcl
+++ b/tests/instances.tcl
@@ -606,3 +606,16 @@ proc restart_instance {type id} {
}
}
+proc redis_deferring_client {type id} {
+ set port [get_instance_attrib $type $id port]
+ set host [get_instance_attrib $type $id host]
+ set client [redis $host $port 1 $::tls]
+ return $client
+}
+
+proc redis_client {type id} {
+ set port [get_instance_attrib $type $id port]
+ set host [get_instance_attrib $type $id host]
+ set client [redis $host $port 0 $::tls]
+ return $client
+}