mirror of
https://github.com/fluencelabs/redis
synced 2025-03-17 16:10:50 +00:00
New hash fuzzing test.
This commit is contained in:
parent
5ba79bda7f
commit
e51a218aaa
@ -395,4 +395,28 @@ start_server {tags {"hash"}} {
|
||||
r hset hash kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk b
|
||||
r hget hash kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk
|
||||
} {b}
|
||||
|
||||
foreach size {10 512} {
|
||||
test "Hash fuzzing - $size fields" {
|
||||
for {set times 0} {$times < 10} {incr times} {
|
||||
catch {unset hash}
|
||||
array set hash {}
|
||||
r del hash
|
||||
|
||||
# Create
|
||||
for {set j 0} {$j < $size} {incr j} {
|
||||
set field [randomValue]
|
||||
set value [randomValue]
|
||||
r hset hash $field $value
|
||||
set hash($field) $value
|
||||
}
|
||||
|
||||
# Verify
|
||||
foreach {k v} [array get hash] {
|
||||
assert_equal $v [r hget hash $k]
|
||||
}
|
||||
assert_equal [array size hash] [r hlen hash]
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user