| /redis-3.2.3/tests/integration/ |
| H A D | aof.tcl | 55 set client [redis [dict get $srv host] [dict get $srv port]] 58 assert {[$client get foo] eq "5"} 72 set client [redis [dict get $srv host] [dict get $srv port]] 75 assert {[$client get foo] eq "6"} 91 set result [exec tail -n1 < [dict get $srv stdout]] 173 set client [redis [dict get $srv host] [dict get $srv port]] 179 assert_equal "hello" [$client get foo] 180 assert_equal "" [$client get bar] 197 set client [redis [dict get $srv host] [dict get $srv port]] 221 set client [redis [dict get $srv host] [dict get $srv port]] [all …]
|
| H A D | redis-cli.tcl | 126 assert_equal "bar" [r get key] 128 assert_equal " bar " [r get key] 130 assert_equal "\"bar\"" [r get key] 132 assert_equal "\tbar\t" [r get key] 140 assert_equal "bar" [r get key] 145 assert_equal "bar" [r get key] 167 assert_equal "foo\n" [r get key] 173 assert_equal "from file" [r get key] 178 assert_equal "bar" [r get key] 200 assert_equal "foo\n" [r get key] [all …]
|
| H A D | aof-race.tcl | 27 assert_equal 20000 [$client get foo] 33 assert_equal 20000 [$client get foo]
|
| H A D | replication-2.tcl | 14 [r -1 get foo] eq {12345} 32 [r -1 get foo] eq {12345} 58 [r -1 get foo] eq {aaabbb}
|
| H A D | rdb.tcl | 69 [exec tail -n1 < [dict get $srv stdout]]] 93 [exec tail -n10 < [dict get $srv stdout]]]
|
| /redis-3.2.3/tests/unit/type/ |
| H A D | string.tcl | 4 r get x 9 r get x 15 r get foo 48 set val [r get $x] 78 assert_equal 10 [r get x] 102 assert_equal 20 [r get x] 147 list [r msetnx x1 xxx y2 yyy] [r get x1] [r get y2] 303 assert_equal 2234 [r get mykey] 310 assert_equal 1234 [r get mykey] 386 list $v1 $v2 [r get foo] [all …]
|
| H A D | hash.tcl | 117 foreach {k v} [array get smallhash] { 127 foreach {k v} [array get bighash] { 151 foreach {k v} [array get smallhash] { 167 foreach {k v} [array get bighash] { 190 foreach {k v} [array get smallhash] { 198 foreach {k v} [array get bighash] { 206 } [lsort [array get smallhash]] 210 } [lsort [array get bighash]] 463 foreach {k v} [array get hash] { 500 foreach {k v} [array get hash] {
|
| H A D | incr.tcl | 5 append res [r get novar] 83 [roundFloat [r get novar]] \ 85 [roundFloat [r get novar]]
|
| /redis-3.2.3/tests/unit/ |
| H A D | expire.tcl | 13 r get x 44 r get x 49 r get y 55 r get y 83 set a [r get x] 85 set b [r get x] 99 set a [r get x] 101 set b [r get x] 106 set c [r get x] 108 set d [r get x] [all …]
|
| H A D | bitfield.tcl | 7 lappend results [r bitfield bits get i8 0] 16 lappend results [r bitfield bits get u8 0] 26 r get bits 51 lappend results [r bitfield bits get u8 #0] 53 lappend results [r bitfield bits get u8 #0] 61 lappend results [r bitfield bits get u8 #0] 63 lappend results [r bitfield bits get u8 #0] 71 lappend results [r bitfield bits get i8 #0] 73 lappend results [r bitfield bits get i8 #0] 81 lappend results [r bitfield bits get i8 #0] [all …]
|
| H A D | keyspace.tcl | 4 assert {[r get x] eq "foo"} 6 r get x 23 test {KEYS to get all keys} { 54 set res [r get emptykey] 80 r get mykey2 91 set res [r get mykey] 100 set res [r get mykey2] 111 set res [r get mykey] 230 lappend res [r get a] 231 lappend res [r get b] [all …]
|
| H A D | bitops.tcl | 126 r get dest 132 r get dest 138 r get s 146 list [r get res1] [r get res2] [r get res3] 154 list [r get res1] [r get res2] [r get res3] 163 list [r get res1] [r get res2] [r get res3] 180 assert_equal [r get target] [simulate_bit_op $op {*}$vec] 191 assert_equal [r get target] [simulate_bit_op not $str] 199 r get dest
|
| H A D | slowlog.tcl | 24 llength [r slowlog get 5] 35 set e [lindex [r slowlog get] 0] 46 set e [lindex [r slowlog get] 0] 55 set e [lindex [r slowlog get] 0] 67 set e [lindex [r slowlog get] 0]
|
| H A D | dump.tcl | 16 r get foo 26 r get foo 44 r get foo 91 assert {[$second get key] eq {Some Value}} 152 assert {[$second get key] eq {Some Value}} 238 assert {[$second get key1] eq {v1}} 239 assert {[$second get key2] eq {v2}} 240 assert {[$second get key3] eq {v3}} 269 assert {[$second get key1] eq {v1}} 270 assert {[$second get key2] eq {v2}} [all …]
|
| H A D | other.tcl | 30 set got [r get foo] 49 r get x 198 list [r append foo bar] [r get foo] \ 199 [r append foo 100] [r get foo] 207 lappend res [r get foo] 210 lappend res [r get foo] 223 if {$buf != [r get x]} {
|
| H A D | quit.tcl | 25 assert_equal {} [r get foo] 37 assert_equal {} [r get foo]
|
| /redis-3.2.3/tests/support/ |
| H A D | server.tcl | 33 set pid [dict get $config pid] 76 check_valgrind_errors [dict get $config stderr] 84 set pid [dict get $config pid] 207 puts $fp [dict get $config $directive] 211 set stdout [format "%s/%s" [dict get $config "dir"] "stdout"] 212 set stderr [format "%s/%s" [dict get $config "dir"] "stderr"] 257 if {[dict exists $config bind]} { set host [dict get $config bind] } 258 if {[dict exists $config port]} { set port [dict get $config port] } 301 puts [format "\nLogged warnings (pid %d):" [dict get $srv "pid"]] 302 set warnings [warnings_from_file [dict get $srv "stdout"]]
|
| H A D | redis.tcl | 239 if {[dict get $::redis::state($id) bulk] == -1} { 249 if {[dict get $::redis::state($id) bulk] == 1} { 259 if {[dict get $::redis::state($id) mbulk] == -1} { 269 set totlen [dict get $::redis::state($id) bulk] 270 set buflen [string length [dict get $::redis::state($id) buf]] 276 if {[string length [dict get $::redis::state($id) buf]] == 277 [dict get $::redis::state($id) bulk]} { 278 if {[dict get $::redis::state($id) mbulk] == -1} { 280 [string range [dict get $::redis::state($id) buf] 0 end-2] 287 if {[dict get $::redis::state($id) mbulk] == 0} { [all …]
|
| H A D | cluster.tcl | 24 get set setnx setex psetex append strlen exists setbit getbit 129 [dict get $n link] close 136 foreach slotrange [dict get $node slots] { 155 [dict get $node link] close 180 set node_addr [dict get $::redis_cluster::slots($id) $slot] 189 set node [dict get $::redis_cluster::nodes($id) $node_addr] 190 set link [dict get $node link] 198 set node_addr [dict get $::redis_cluster::slots($id) $slot]
|
| /redis-3.2.3/tests/sentinel/tests/ |
| H A D | 07-down-conditions.tcl | 7 [dict get [S 4 sentinel master mymaster] flags] eq "master" 16 [dict get [S 4 sentinel master mymaster] flags]] 55 set orig_dir [lindex [R 0 config get dir] 1] 56 set orig_save [lindex [R 0 config get save] 1]
|
| /redis-3.2.3/tests/cluster/tests/ |
| H A D | 03-failover-loop.tcl | 27 set myid [dict get [get_myself $tokill] id] 30 if {[dict get [get_myself $id] slaveof] eq $myid} { 103 catch {$cluster get $key:$i} err 105 catch {$cluster get $key:$i:2} err
|
| H A D | 00-base.tcl | 17 set nodeid [dict get [get_myself $id] id] 37 lappend epochs [dict get $n config_epoch]
|
| H A D | 04-resharding.tcl | 73 set target [dict get [get_myself [randomInt 5]] id] 117 foreach {key value} [array get content] { 135 foreach {key value} [array get content] {
|
| /redis-3.2.3/tests/cluster/ |
| H A D | cluster.tcl | 33 expr {[lsearch -exact [dict get $node flags] $flag] != -1} 84 if {[dict get $me slaveof] eq {-}} {return $id} 97 R $slave_id cluster replicate [dict get $master_myself id] 127 assert {[$cluster get key.$j] eq "$prefix.$j"}
|
| /redis-3.2.3/tests/sentinel/tests/includes/ |
| H A D | init-tests.tcl | 57 [dict get [S $id SENTINEL MASTER mymaster] num-other-sentinels] == ($sentinels-1) 67 [dict get [S $id SENTINEL MASTER mymaster] num-slaves] == $redis_slaves
|