Commit ba3c5494 authored by antirez's avatar antirez
Browse files

Test: more RDB loading checks.

A test for issue #1001 is included.
parent 684b6150
...@@ -29,4 +29,36 @@ start_server [list overrides [list "dir" $server_path]] { ...@@ -29,4 +29,36 @@ start_server [list overrides [list "dir" $server_path]] {
test {Server started empty with non-existing RDB file} { test {Server started empty with non-existing RDB file} {
r debug digest r debug digest
} {0000000000000000000000000000000000000000} } {0000000000000000000000000000000000000000}
# Save an RDB file, needed for the next test.
r save
}
start_server [list overrides [list "dir" $server_path]] {
test {Server started empty with empty RDB file} {
r debug digest
} {0000000000000000000000000000000000000000}
}
# Helper function to start a server and kill it, just to check the error
# logged.
set defaults {}
proc start_server_and_kill_it {overrides code} {
upvar defaults defaults srv srv server_path server_path
set config [concat $defaults $overrides]
set srv [start_server [list overrides $config]]
uplevel 1 $code
kill_server $srv
}
# Make the RDB file unreadable
file attributes [file join $server_path dump.rdb] -permissions 0222
# Now make sure the server aborted with an error
start_server_and_kill_it [list "dir" $server_path] {
wait_for_condition 50 100 {
[string match {*Fatal error loading*} \
[exec tail -n1 < [dict get $srv stdout]]]
} else {
fail "Server started even if RDB was unreadable!"
}
} }
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment