# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1470756962 -7200
# Node ID 33a0988e5f1cf2c8436cdf01b5cd32b19bc85e94
# Parent  29e3a09275c5c79b2ae37c6ae7a5cc44218f9172
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting

diff -r 29e3a09275c5 -r 33a0988e5f1c mod_spam_reporting/mod_spam_reporting.lua
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/mod_spam_reporting/mod_spam_reporting.lua	Tue Aug 09 17:36:02 2016 +0200
@@ -0,0 +1,20 @@
+local st = require "util.stanza";
+
+module:depends("blocklist");
+
+module:add_feature("urn:xmpp:reporting:0");
+module:add_feature("urn:xmpp:reporting:reason:spam:0");
+module:add_feature("urn:xmpp:reporting:reason:abuse:0");
+
+module:hook("iq-get/self/urn:xmpp:blocking:blocklist", function (event)
+	for item in event.stanza.tags[1]:childtags("item") do
+		local report = item:get_child("report", "urn:xmpp:reporting:0");
+		local jid = item.attr.jid;
+		if not report or not jid then return end
+		local type = report:get_child("spam") and "spam" or
+			is_abuse = report:get_child("abuse") and "abuse" or
+			"unknown";
+		local reason = report:get_child_text("reason") or "no reason given";
+		module:log("warn", "Received report of %s from JID '%s', %s", type, jid, reason);
+	end
+end, 1);