summaryrefslogtreecommitdiffstats
path: root/tests/integration/convert-ziplist-hash-on-load.tcl
blob: c8265b25ae9c3a6e9a3663464975b60c2afda885 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
tags {"external:skip"} {

# Copy RDB with ziplist encoded hash to server path
set server_path [tmpdir "server.convert-ziplist-hash-on-load"]

exec cp -f tests/assets/hash-ziplist.rdb $server_path
start_server [list overrides [list "dir" $server_path "dbfilename" "hash-ziplist.rdb"]] {
    test "RDB load ziplist hash: converts to listpack when RDB loading" {
        r select 0

        assert_encoding listpack hash
        assert_equal 2 [r hlen hash]
        assert_match {v1 v2} [r hmget hash f1 f2]
    }
}

exec cp -f tests/assets/hash-ziplist.rdb $server_path
start_server [list overrides [list "dir" $server_path "dbfilename" "hash-ziplist.rdb" "hash-max-ziplist-entries" 1]] {
    test "RDB load ziplist hash: converts to hash table when hash-max-ziplist-entries is exceeded" {
        r select 0

        assert_encoding hashtable hash
        assert_equal 2 [r hlen hash]
        assert_match {v1 v2} [r hmget hash f1 f2]
    }
}

}