Merge 0.10->trunk
[prosody.git] / plugins / mod_component.lua
index 53ef4ed028b79670606f218fb55605fb5f917cf6..340faec02c1e6267c3d1327f3e7a5e5d1f605091 100644 (file)
@@ -31,39 +31,41 @@ local sessions = module:shared("sessions");
 
 function module.add_host(module)
        if module:get_host_type() ~= "component" then
-               error("Don't load mod_component manually, it should be for a component, please see http://prosody.im/doc/components", 0);
+               error("Don't load mod_component manually, it should be for a component, please see https://prosody.im/doc/components", 0);
        end
-
+       
        local env = module.environment;
        env.connected = false;
+       env.session = false;
 
        local send;
 
-       local function on_destroy(session, err)
+       local function on_destroy(session, err) --luacheck: ignore 212/err
                env.connected = false;
+               env.session = false;
                send = nil;
                session.on_destroy = nil;
        end
-
+       
        -- Handle authentication attempts by component
        local function handle_component_auth(event)
                local session, stanza = event.origin, event.stanza;
-
+               
                if session.type ~= "component_unauthed" then return; end
-
+       
                if (not session.host) or #stanza.tags > 0 then
                        (session.log or log)("warn", "Invalid component handshake for host: %s", session.host);
                        session:close("not-authorized");
                        return true;
                end
-
+               
                local secret = module:get_option("component_secret");
                if not secret then
                        (session.log or log)("warn", "Component attempted to identify as %s, but component_secret is not set", session.host);
                        session:close("not-authorized");
                        return true;
                end
-
+               
                local supplied_token = t_concat(stanza);
                local calculated_token = sha1(session.streamid..secret, true);
                if supplied_token:lower() ~= calculated_token:lower() then
@@ -71,21 +73,28 @@ function module.add_host(module)
                        session:close{ condition = "not-authorized", text = "Given token does not match calculated token" };
                        return true;
                end
-
+               
                if env.connected then
-                       module:log("error", "Second component attempted to connect, denying connection");
-                       session:close{ condition = "conflict", text = "Component already connected" };
-                       return true;
+                       local policy = module:get_option_string("component_conflict_resolve", "kick_new");
+                       if policy == "kick_old" then
+                               env.session:close{ condition = "conflict", text = "Replaced by a new connection" };
+                       else -- kick_new
+                               module:log("error", "Second component attempted to connect, denying connection");
+                               session:close{ condition = "conflict", text = "Component already connected" };
+                               return true;
+                       end
                end
-
+               
                env.connected = true;
+               env.session = session;
                send = session.send;
                session.on_destroy = on_destroy;
                session.component_validate_from = module:get_option_boolean("validate_from_addresses", true);
                session.type = "component";
                module:log("info", "External component successfully authenticated");
                session.send(st.stanza("handshake"));
-
+               module:fire_event("component-authenticated", { session = session });
+       
                return true;
        end
        module:hook("stanza/jabber:component:accept:handshake", handle_component_auth, -1);
@@ -116,7 +125,7 @@ function module.add_host(module)
                end
                return true;
        end
-
+       
        module:hook("iq/bare", handle_stanza, -1);
        module:hook("message/bare", handle_stanza, -1);
        module:hook("presence/bare", handle_stanza, -1);
@@ -140,7 +149,7 @@ local stream_callbacks = { default_ns = xmlns_component };
 
 local xmlns_xmpp_streams = "urn:ietf:params:xml:ns:xmpp-streams";
 
-function stream_callbacks.error(session, error, data, data2)
+function stream_callbacks.error(session, error, data)
        if session.destroyed then return; end
        module:log("warn", "Error processing component stream: %s", tostring(error));
        if error == "no-stream" then
@@ -273,26 +282,26 @@ function listener.onconnect(conn)
        if opt_keepalives then
                conn:setoption("keepalive", opt_keepalives);
        end
-
+       
        session.log("info", "Incoming Jabber component connection");
-
+       
        local stream = new_xmpp_stream(session, stream_callbacks);
        session.stream = stream;
-
+       
        session.notopen = true;
-
+       
        function session.reset_stream()
                session.notopen = true;
                session.stream:reset();
        end
 
-       function session.data(conn, data)
+       function session.data(_, data)
                local ok, err = stream:feed(data);
                if ok then return; end
                module:log("debug", "Received invalid XML (%s) %d bytes: %s", tostring(err), #data, data:sub(1, 300):gsub("[\r\n]+", " "):gsub("[%z\1-\31]", "_"));
                session:close("not-well-formed");
        end
-
+       
        session.dispatch_stanza = stream_callbacks.handlestanza;
 
        sessions[conn] = session;
@@ -305,6 +314,7 @@ function listener.ondisconnect(conn, err)
        local session = sessions[conn];
        if session then
                (session.log or log)("info", "component disconnected: %s (%s)", tostring(session.host), tostring(err));
+               module:fire_event("component-disconnected", { session = session, reason = err });
                if session.on_destroy then session:on_destroy(err); end
                sessions[conn] = nil;
                for k in pairs(session) do
@@ -313,7 +323,6 @@ function listener.ondisconnect(conn, err)
                        end
                end
                session.destroyed = true;
-               session = nil;
        end
 end