s2smanager: retire_session(): Add a 'reason' parameter

diff --git a/core/s2smanager.lua b/core/s2smanager.lua
index b8163efa8df63d12b6e08936f30f27aafb68067a..212a2fe1e2cc5113c5402dc9598fa32381530ae6 100644 (file)
--- a/core/s2smanager.lua
+++ b/core/s2smanager.lua
@@ -555,7 +555,7 @@ local resting_session = { -- Resting, not dead
                filter = function (type, data) return data; end;
        }; resting_session.__index = resting_session;
 
-function retire_session(session)
+function retire_session(session, reason)
        local log = session.log or log;
        for k in pairs(session) do
                if k ~= "trace" and k ~= "log" and k ~= "id" then
@@ -563,6 +563,8 @@ function retire_session(session)
                end
        end
 
+       session.destruction_reason = reason;
+
        function session.send(data) log("debug", "Discarding data sent to resting session: %s", tostring(data)); end
        function session.data(data) log("debug", "Discarding data received from resting session: %s", tostring(data)); end
        return setmetatable(session, resting_session);