From dcacc00e3750300617ba6e16eb346713f91a783a Mon Sep 17 00:00:00 2001 From: Mitja Felicijan Date: Wed, 21 Jan 2026 22:52:54 +0100 Subject: Remove testing data --- examples/redis-unstable/tests/support/cli.tcl | 36 --------------------------- 1 file changed, 36 deletions(-) delete mode 100644 examples/redis-unstable/tests/support/cli.tcl (limited to 'examples/redis-unstable/tests/support/cli.tcl') diff --git a/examples/redis-unstable/tests/support/cli.tcl b/examples/redis-unstable/tests/support/cli.tcl deleted file mode 100644 index a080823..0000000 --- a/examples/redis-unstable/tests/support/cli.tcl +++ /dev/null @@ -1,36 +0,0 @@ -proc rediscli_tls_config {testsdir} { - set tlsdir [file join $testsdir tls] - set cert [file join $tlsdir client.crt] - set key [file join $tlsdir client.key] - set cacert [file join $tlsdir ca.crt] - - if {$::tls} { - return [list --tls --cert $cert --key $key --cacert $cacert] - } else { - return {} - } -} - -# Returns command line for executing redis-cli -proc rediscli {host port {opts {}}} { - set cmd [list src/redis-cli -h $host -p $port] - lappend cmd {*}[rediscli_tls_config "tests"] - lappend cmd {*}$opts - return $cmd -} - -# Returns command line for executing redis-cli with a unix socket address -proc rediscli_unixsocket {unixsocket {opts {}}} { - return [list src/redis-cli -s $unixsocket {*}$opts] -} - -# Run redis-cli with specified args on the server of specified level. -# Returns output broken down into individual lines. -proc rediscli_exec {level args} { - set cmd [rediscli_unixsocket [srv $level unixsocket] $args] - set fd [open "|$cmd" "r"] - set ret [lrange [split [read $fd] "\n"] 0 end-1] - close $fd - - return $ret -} -- cgit v1.2.3