# HG changeset patch
# User Matthew Wild <mwild1@gmail.com>
# Date 1378201554 -3600
# Node ID 27b4e01ddbc487c8e908f73def35b1823398b753
# Parent  412f62d05a23e35a287b00d3d518019d9c1aa739
mod_s2s_blacklist: A new _simple_ s2s blacklist module

diff -r 412f62d05a23 -r 27b4e01ddbc4 mod_s2s_blacklist/mod_s2s_blacklist.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mod_s2s_blacklist/mod_s2s_blacklist.lua	Tue Sep 03 10:45:54 2013 +0100
@@ -0,0 +1,19 @@
+local st = require "util.stanza";
+
+local blacklist = module:get_option_inherited_set("s2s_blacklist", {});
+
+module:hook("route/remote", function (event)
+	if blacklist:contains(event.to_host) then
+		module:send(st.error_reply(event.stanza, "cancel", "not-allowed", "Communication with this domain is restricted"));
+		return true;
+	end
+end, 100);
+
+module:hook("s2s-stream-features", function (event)
+	if blacklist:contains(event.origin.from_host) then
+		event.origin:close({
+			condition = "policy-violation";
+			text = "Communication with this domain is restricted";
+		});
+	end
+end, 1000);