fluencelabs/redis
1
0
Fork 0
mirror of https://github.com/fluencelabs/redis synced 2025-03-31 14:51:04 +00:00
Code Issues Projects Releases Wiki Activity

speed-regression.tcl: move tests, data size, requests in global vars that will be changed via command line options.

Browse Source
This commit is contained in:
antirez 2011-11-07 16:52:55 +01:00
parent 85bc9b06b7
commit 55758a5fab
1 changed files with 6 additions and 1 deletions

7
utils/speed-regression.tcl

@ -4,6 +4,9 @@
source ../tests/support/redis.tcl source ../tests/support/redis.tcl
set ::port 12123 set ::port 12123
set ::tests {PING,SET,GET,INCR,LPUSH,LPOP,SADD,SPOP,LRANGE_100,LRANGE_600,MSET}
set ::datasize 16
set ::requests 100000
proc run-tests branches { proc run-tests branches {
set runs {} set runs {}
@ -35,7 +38,7 @@ proc run-tests branches {
puts " redis INFO shows version: [lindex [split $i] 0]" puts " redis INFO shows version: [lindex [split $i] 0]"
$r close $r close
set output [exec /tmp/redis-benchmark -n 100000 --csv -p $::port] set output [exec /tmp/redis-benchmark -n $::requests -t $::tests -d $::datasize --csv -p $::port]
lappend runs $b $output lappend runs $b $output
puts " killing server..." puts " killing server..."
catch {exec kill -9 [lindex $pids 0]} catch {exec kill -9 [lindex $pids 0]}
@ -86,6 +89,8 @@ proc main {} {
slowset 2.2.0 2.4.0 unstable slowset slowset 2.2.0 2.4.0 unstable slowset
} }
set results [run-tests $branches] set results [run-tests $branches]
puts "\n"
puts "# Test results: datasize=$::datasize requests=$::requests"
puts [combine-results $results] puts [combine-results $results]
} }