Software / code / prosody-modules
Annotate
mod_spam_reporting/mod_spam_reporting.lua @ 2271:b34f4591366a
mod_storage_xmlarchive: Fix date pattern in purge (related to #725)
| author | Kim Alvefur <zash@zash.se> |
|---|---|
| date | Sat, 13 Aug 2016 16:23:25 +0200 |
| parent | 2267:df96e2613cb6 |
| child | 2275:7f228bf82fe5 |
| rev | line source |
|---|---|
|
2266
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
1 local st = require "util.stanza"; |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
2 |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
3 module:depends("blocklist"); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
4 |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
5 module:add_feature("urn:xmpp:reporting:0"); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
6 module:add_feature("urn:xmpp:reporting:reason:spam:0"); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
7 module:add_feature("urn:xmpp:reporting:reason:abuse:0"); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
8 |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
9 module:hook("iq-get/self/urn:xmpp:blocking:blocklist", function (event) |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
10 for item in event.stanza.tags[1]:childtags("item") do |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
11 local report = item:get_child("report", "urn:xmpp:reporting:0"); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
12 local jid = item.attr.jid; |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
13 if not report or not jid then return end |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
14 local type = report:get_child("spam") and "spam" or |
|
2267
df96e2613cb6
mod_spam_reporting: Fix syntax [luacheck]
Kim Alvefur <zash@zash.se>
parents:
2266
diff
changeset
|
15 report:get_child("abuse") and "abuse" or |
|
2266
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
16 "unknown"; |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
17 local reason = report:get_child_text("reason") or "no reason given"; |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
18 module:log("warn", "Received report of %s from JID '%s', %s", type, jid, reason); |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
19 end |
|
33a0988e5f1c
mod_spam_reporting: Basic implementation of XEP-0377: Spam Reporting
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
20 end, 1); |