xref: /redis-3.2.3/tests/integration/rdb.tcl (revision d04afd62) 
1set server_path [tmpdir "server.rdb-encoding-test"]
2
3# Copy RDB with different encodings in server path
4exec cp tests/assets/encodings.rdb $server_path
5
6start_server [list overrides [list "dir" $server_path "dbfilename" "encodings.rdb"]] {
7  test "RDB encoding loading test" {
8    r select 0
9    csvdump r
10  } {"compressible","string","aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
11"hash","hash","a","1","aa","10","aaa","100","b","2","bb","20","bbb","200","c","3","cc","30","ccc","300","ddd","400","eee","5000000000",
12"hash_zipped","hash","a","1","b","2","c","3",
13"list","list","1","2","3","a","b","c","100000","6000000000","1","2","3","a","b","c","100000","6000000000","1","2","3","a","b","c","100000","6000000000",
14"list_zipped","list","1","2","3","a","b","c","100000","6000000000",
15"number","string","10"
16"set","set","1","100000","2","3","6000000000","a","b","c",
17"set_zipped_1","set","1","2","3","4",
18"set_zipped_2","set","100000","200000","300000","400000",
19"set_zipped_3","set","1000000000","2000000000","3000000000","4000000000","5000000000","6000000000",
20"string","string","Hello World"
21"zset","zset","a","1","b","2","c","3","aa","10","bb","20","cc","30","aaa","100","bbb","200","ccc","300","aaaa","1000","cccc","123456789","bbbb","5000000000",
22"zset_zipped","zset","a","1","b","2","c","3",
23}
24}
25
26set server_path [tmpdir "server.rdb-startup-test"]
27
28start_server [list overrides [list "dir" $server_path]] {
29    test {Server started empty with non-existing RDB file} {
30        r debug digest
31    } {0000000000000000000000000000000000000000}
32    # Save an RDB file, needed for the next test.
33    r save
34}
35
36start_server [list overrides [list "dir" $server_path]] {
37    test {Server started empty with empty RDB file} {
38        r debug digest
39    } {0000000000000000000000000000000000000000}
40}
41
42# Helper function to start a server and kill it, just to check the error
43# logged.
44set defaults {}
45proc start_server_and_kill_it {overrides code} {
46    upvar defaults defaults srv srv server_path server_path
47    set config [concat $defaults $overrides]
48    set srv [start_server [list overrides $config]]
49    uplevel 1 $code
50    kill_server $srv
51}
52
53# Make the RDB file unreadable
54file attributes [file join $server_path dump.rdb] -permissions 0222
55
56# Now make sure the server aborted with an error
57start_server_and_kill_it [list "dir" $server_path] {
58    wait_for_condition 50 100 {
59        [string match {*Fatal error loading*} \
60            [exec tail -n1 < [dict get $srv stdout]]]
61    } else {
62        fail "Server started even if RDB was unreadable!"
63    }
64}
65
66# Fix permissions of the RDB file, but corrupt its CRC64 checksum.
67file attributes [file join $server_path dump.rdb] -permissions 0666
68set filesize [file size [file join $server_path dump.rdb]]
69set fd [open [file join $server_path dump.rdb] r+]
70fconfigure $fd -translation binary
71seek $fd -8 end
72puts -nonewline $fd "foobar00"; # Corrupt the checksum
73close $fd
74
75# Now make sure the server aborted with an error
76start_server_and_kill_it [list "dir" $server_path] {
77    wait_for_condition 50 100 {
78        [string match {*RDB checksum*} \
79            [exec tail -n1 < [dict get $srv stdout]]]
80    } else {
81        fail "Server started even if RDB was corrupted!"
82    }
83}
84