Fix FUNCTION KILL error message being displayed as SCRIPT KILL (#1171)

The client that was killed by FUNCTION KILL received a reply of
SCRIPT KILL and the server log also showed SCRIPT KILL.

Signed-off-by: Binbin <binloveplay1314@qq.com>
This commit is contained in:
Binbin 2024-10-15 23:32:42 +08:00 committed by Harkrishn Patro
parent 357191acb9
commit ccc8acec9d
2 changed files with 14 additions and 2 deletions

View File

@ -1587,7 +1587,13 @@ static void luaMaskCountHook(lua_State *lua, lua_Debug *ar) {
scriptRunCtx* rctx = luaGetFromRegistry(lua, REGISTRY_RUN_CTX_NAME);
serverAssert(rctx); /* Only supported inside script invocation */
if (scriptInterrupt(rctx) == SCRIPT_KILL) {
serverLog(LL_NOTICE,"Lua script killed by user with SCRIPT KILL.");
char *err = NULL;
if (rctx->flags & SCRIPT_EVAL_MODE) {
err = "Script killed by user with SCRIPT KILL.";
} else {
err = "Script killed by user with FUNCTION KILL.";
}
serverLog(LL_NOTICE, "%s", err);
/*
* Set the hook to invoke all the time so the user
@ -1596,7 +1602,7 @@ static void luaMaskCountHook(lua_State *lua, lua_Debug *ar) {
*/
lua_sethook(lua, luaMaskCountHook, LUA_MASKLINE, 0);
luaPushError(lua,"Script killed by user with SCRIPT KILL...");
luaPushError(lua, err);
luaError(lua);
}
}

View File

@ -245,6 +245,8 @@ start_server {tags {"scripting"}} {
r function kill
after 200 ; # Give some time to Lua to call the hook again...
assert_equal [r ping] "PONG"
assert_error {ERR Script killed by user with FUNCTION KILL*} {$rd read}
$rd close
}
test {FUNCTION - test script kill not working on function} {
@ -260,6 +262,8 @@ start_server {tags {"scripting"}} {
r function kill
after 200 ; # Give some time to Lua to call the hook again...
assert_equal [r ping] "PONG"
assert_error {ERR Script killed by user with FUNCTION KILL*} {$rd read}
$rd close
}
test {FUNCTION - test function kill not working on eval} {
@ -274,6 +278,8 @@ start_server {tags {"scripting"}} {
r script kill
after 200 ; # Give some time to Lua to call the hook again...
assert_equal [r ping] "PONG"
assert_error {ERR Script killed by user with SCRIPT KILL*} {$rd read}
$rd close
}
test {FUNCTION - test function flush} {