summaryrefslogtreecommitdiff
path: root/tests/support
diff options
context:
space:
mode:
authorBinbin <binloveplay1314@qq.com>2022-01-23 16:05:06 +0800
committerGitHub <noreply@github.com>2022-01-23 10:05:06 +0200
commit23325c135f08365d1b7d4bf4fb1c9187fc7374b9 (patch)
treef6f5f30c966daf546fd3230e9e2d4f8ea4731f7b /tests/support
parenta6fd2a46d101d4df23ade2e28cbc04656c721b2b (diff)
downloadredis-23325c135f08365d1b7d4bf4fb1c9187fc7374b9.tar.gz
sub-command support for ACL CAT and COMMAND LIST. redisCommand always stores fullname (#10127)
Summary of changes: 1. Rename `redisCommand->name` to `redisCommand->declared_name`, it is a const char * for native commands and SDS for module commands. 2. Store the [sub]command fullname in `redisCommand->fullname` (sds). 3. List subcommands in `ACL CAT` 4. List subcommands in `COMMAND LIST` 5. `moduleUnregisterCommands` now will also free the module subcommands. 6. RM_GetCurrentCommandName returns full command name Other changes: 1. Add `addReplyErrorArity` and `addReplyErrorExpireTime` 2. Remove `getFullCommandName` function that now is useless. 3. Some cleanups about `fullname` since now it is SDS. 4. Delete `populateSingleCommand` function from server.h that is useless. 5. Added tests to cover this change. 6. Add some module unload tests and fix the leaks 7. Make error messages uniform, make sure they always contain the full command name and that it's quoted. 7. Fixes some typos see the history in #9504, fixes #10124 Co-authored-by: Oran Agra <oran@redislabs.com> Co-authored-by: guybe7 <guy.benoish@redislabs.com>
Diffstat (limited to 'tests/support')
-rw-r--r--tests/support/test.tcl6
1 files changed, 6 insertions, 0 deletions
diff --git a/tests/support/test.tcl b/tests/support/test.tcl
index f3f7e132a..34c7986da 100644
--- a/tests/support/test.tcl
+++ b/tests/support/test.tcl
@@ -40,6 +40,12 @@ proc assert_failed {expected_err detail} {
error "assertion:$expected_err $detail"
}
+proc assert_not_equal {value expected {detail ""}} {
+ if {!($expected ne $value)} {
+ assert_failed "Expected '$value' not equal to '$expected'" $detail
+ }
+}
+
proc assert_equal {value expected {detail ""}} {
if {$expected ne $value} {
assert_failed "Expected '$value' to be equal to '$expected'" $detail