summaryrefslogtreecommitdiff
path: root/examples/redis-unstable/tests/unit/moduleapi/auth.tcl
diff options
context:
space:
mode:
authorMitja Felicijan <mitja.felicijan@gmail.com>2026-01-21 22:52:54 +0100
committerMitja Felicijan <mitja.felicijan@gmail.com>2026-01-21 22:52:54 +0100
commitdcacc00e3750300617ba6e16eb346713f91a783a (patch)
tree38e2d4fb5ed9d119711d4295c6eda4b014af73fd /examples/redis-unstable/tests/unit/moduleapi/auth.tcl
parent58dac10aeb8f5a041c46bddbeaf4c7966a99b998 (diff)
downloadcrep-dcacc00e3750300617ba6e16eb346713f91a783a.tar.gz
Remove testing data
Diffstat (limited to 'examples/redis-unstable/tests/unit/moduleapi/auth.tcl')
-rw-r--r--examples/redis-unstable/tests/unit/moduleapi/auth.tcl90
1 files changed, 0 insertions, 90 deletions
diff --git a/examples/redis-unstable/tests/unit/moduleapi/auth.tcl b/examples/redis-unstable/tests/unit/moduleapi/auth.tcl
deleted file mode 100644
index e8950ed..0000000
--- a/examples/redis-unstable/tests/unit/moduleapi/auth.tcl
+++ /dev/null
@@ -1,90 +0,0 @@
-set testmodule [file normalize tests/modules/auth.so]
-
-start_server {tags {"modules external:skip"}} {
- r module load $testmodule
-
- test {Modules can create a user that can be authenticated} {
- # Make sure we start authenticated with default user
- r auth default ""
- assert_equal [r acl whoami] "default"
- r auth.createmoduleuser
-
- set id [r auth.authmoduleuser]
- assert_equal [r client id] $id
-
- # Verify returned id is the same as our current id and
- # we are authenticated with the specified user
- assert_equal [r acl whoami] "global"
- }
-
- test {De-authenticating clients is tracked and kills clients} {
- assert_equal [r auth.changecount] 0
- r auth.createmoduleuser
-
- # Catch the I/O exception that was thrown when Redis
- # disconnected with us.
- catch { [r ping] } e
- assert_match {*I/O*} $e
-
- # Check that a user change was registered
- assert_equal [r auth.changecount] 1
- }
-
- test {Modules can't authenticate with ACLs users that dont exist} {
- catch { [r auth.authrealuser auth-module-test-fake] } e
- assert_match {*Invalid user*} $e
- }
-
- test {Modules can authenticate with ACL users} {
- assert_equal [r acl whoami] "default"
-
- # Create user to auth into
- r acl setuser auth-module-test on allkeys allcommands
-
- set id [r auth.authrealuser auth-module-test]
-
- # Verify returned id is the same as our current id and
- # we are authenticated with the specified user
- assert_equal [r client id] $id
- assert_equal [r acl whoami] "auth-module-test"
- }
-
- test {Client callback is called on user switch} {
- assert_equal [r auth.changecount] 0
-
- # Auth again and validate change count
- r auth.authrealuser auth-module-test
- assert_equal [r auth.changecount] 1
-
- # Re-auth with the default user
- r auth default ""
- assert_equal [r auth.changecount] 1
- assert_equal [r acl whoami] "default"
-
- # Re-auth with the default user again, to
- # verify the callback isn't fired again
- r auth default ""
- assert_equal [r auth.changecount] 0
- assert_equal [r acl whoami] "default"
- }
-
- test {modules can redact arguments} {
- r config set slowlog-log-slower-than 0
- r slowlog reset
- r auth.redact 1 2 3 4
- r auth.redact 1 2 3
- r config set slowlog-log-slower-than -1
- set slowlog_resp [r slowlog get]
-
- # There will be 3 records, slowlog reset and the
- # two auth redact calls.
- assert_equal 3 [llength $slowlog_resp]
- assert_equal {slowlog reset} [lindex [lindex $slowlog_resp 2] 3]
- assert_equal {auth.redact 1 (redacted) 3 (redacted)} [lindex [lindex $slowlog_resp 1] 3]
- assert_equal {auth.redact (redacted) 2 (redacted)} [lindex [lindex $slowlog_resp 0] 3]
- }
-
- test "Unload the module - testacl" {
- assert_equal {OK} [r module unload testacl]
- }
-}