diff options
Diffstat (limited to 'tests/unit/moduleapi/basics.tcl')
| -rw-r--r-- | tests/unit/moduleapi/basics.tcl | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/tests/unit/moduleapi/basics.tcl b/tests/unit/moduleapi/basics.tcl new file mode 100644 index 0000000..040d9eb --- /dev/null +++ b/tests/unit/moduleapi/basics.tcl @@ -0,0 +1,41 @@ +set testmodule [file normalize tests/modules/basics.so] + +start_server {tags {"modules"}} { + r module load $testmodule + + test {test module api basics} { + r test.basics + } {ALL TESTS PASSED} + + test {test rm_call auto mode} { + r hello 2 + set reply [r test.rmcallautomode] + assert_equal [lindex $reply 0] f1 + assert_equal [lindex $reply 1] v1 + assert_equal [lindex $reply 2] f2 + assert_equal [lindex $reply 3] v2 + r hello 3 + set reply [r test.rmcallautomode] + assert_equal [dict get $reply f1] v1 + assert_equal [dict get $reply f2] v2 + } + + test {test get resp} { + r hello 2 + set reply [r test.getresp] + assert_equal $reply 2 + r hello 3 + set reply [r test.getresp] + assert_equal $reply 3 + } + + test "Unload the module - test" { + assert_equal {OK} [r module unload test] + } +} + +start_server {tags {"modules external:skip"} overrides {enable-module-command no}} { + test {module command disabled} { + assert_error "ERR *MODULE command not allowed*" {r module load $testmodule} + } +}
\ No newline at end of file |