diff --git a/tests/integration/logging.tcl b/tests/integration/logging.tcl new file mode 100644 index 0000000000000000000000000000000000000000..c1f4854d40f6ed585691571584d5d8cbff14014d --- /dev/null +++ b/tests/integration/logging.tcl @@ -0,0 +1,24 @@ +set server_path [tmpdir server.log] +set system_name [string tolower [exec uname -s]] + +if {$system_name eq {linux} || $system_name eq {darwin}} { + start_server [list overrides [list dir $server_path]] { + test "Server is able to generate a stack trace on selected systems" { + r config set watchdog-period 200 + r debug sleep 1 + set pattern "*debugCommand*" + set retry 10 + while {$retry} { + set result [exec tail -100 < [srv 0 stdout]] + if {[string match $pattern $result]} { + break + } + incr retry -1 + after 1000 + } + if {$retry == 0} { + error "assertion:expected stack trace not found into log file" + } + } + } +} diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl index 212c95b4fcdff0018344a4e65eec80597ac4bb23..7e9e2cfaa218242cc4690662ae3e97cfede138ab 100644 --- a/tests/test_helper.tcl +++ b/tests/test_helper.tcl @@ -38,6 +38,7 @@ set ::all_tests { integration/aof integration/rdb integration/convert-zipmap-hash-on-load + integration/logging unit/pubsub unit/slowlog unit/scripting