Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
ruanhaishen
redis
Commits
4ce22375
Commit
4ce22375
authored
Apr 07, 2012
by
antirez
Browse files
Tests for MONITOR.
parent
09f66a0b
Changes
1
Hide whitespace changes
Inline
Side-by-side
tests/unit/introspection.tcl
View file @
4ce22375
...
...
@@ -2,4 +2,21 @@ start_server {tags {"introspection"}} {
test
{
CLIENT LIST
}
{
r client list
}
{
*addr=*:* fd=* age=* idle=* flags=N db=9 sub=0 psub=0 multi=-1 qbuf=0 qbuf-free=* obl=0 oll=0 omem=0 events=r cmd=client*
}
test
{
MONITOR can log executed commands
}
{
set rd
[
redis_deferring_client
]
$rd monitor
r set foo bar
r get foo
list
[
$rd
read
]
[
$rd
read
]
[
$rd
read
]
}
{
*OK*
"set"
"foo"
*
"get"
"foo"
*
}
test
{
MONITOR can log commands issued by the scripting engine
}
{
set rd
[
redis_deferring_client
]
$rd monitor
r eval
{
redis.call
(
'set',KEYS
[
1
]
,ARGV
[
1
])}
1 foo bar
$rd read
;
# Discard the OK
assert_match
{
*eval*
}
[
$rd
read
]
assert_match
{
*lua*
"set"
*
"foo"
*
"bar"
*
}
[
$rd
read
]
}
}
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment