gvsafronov/futriix
1
0
Fork 0
Code Issues Pull Requests Actions 4 Packages Projects Releases Wiki Activity

Add missing test helper function

Browse Source 
Signed-off-by: Ping Xie <pingxie@google.com>
This commit is contained in:
Ping Xie 2024-07-08 23:22:28 -07:00 committed by Ping Xie
parent 010609e8a0
commit ad0a24c742
1 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
tests/support/cluster_util.tcl
View File

@ -226,3 +226,16 @@ proc check_cluster_node_mark {flag ref_node_index instance_id_to_check} {
} }
fail "Unable to find instance id in cluster nodes. ID: $instance_id_to_check" fail "Unable to find instance id in cluster nodes. ID: $instance_id_to_check"
} }
proc cluster_allocate_slots {masters replicas} {
set slot 16383
while {$slot >= 0} {
# Allocate successive slots to random nodes.
set node [randomInt $masters]
lappend slots_$node $slot
incr slot -1
}
for {set j 0} {$j < $masters} {incr j} {
R $j cluster addslots {*}[set slots_${j}]
}
}