prosody-modules: mod_report_forward/mod_report

annotate mod_report_forward/mod_report_forward.lua @ 6029:cc665f343690

mod_firewall: SUBSCRIBED: Flip subscription check to match documentation The documentation claims that this condition checks whether the recipient is subscribed to the sender. However, it was using the wrong method, and actually checking whether the sender was subscribed to the recipient. A quick poll of folk suggested that the documentation's approach is the right one, so this should fix the code to match the documentation. This should also fix the bundled anti-spam rules from blocking presence from JIDs that you subscribe do (but don't have a mutual subscription with).

author	Matthew Wild <mwild1@gmail.com>
date	Fri, 22 Nov 2024 13:50:48 +0000
parents	7b093a9b95ea
children	91590d92b919

rev	line source
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	1 local dt = require "util.datetime";
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	2 local jid = require "util.jid";
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	3 local st = require "util.stanza";
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	4 local url = require "socket.url";
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	5
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	6 local new_id = require "util.id".short;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	7 local render = require"util.interpolation".new("%b{}", function (s) return s; end);
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	8
5856 6fe4dab27187 mod_report_forward: Depend on mod_spam_reporting for auto-loading Matthew Wild <mwild1@gmail.com> parents: 5855 diff changeset	9 module:depends("spam_reporting");
6fe4dab27187 mod_report_forward: Depend on mod_spam_reporting for auto-loading Matthew Wild <mwild1@gmail.com> parents: 5855 diff changeset	10
5854 fcfe490de8a4 mod_spam_report_forwarder: Rename to mod_report_forward Matthew Wild <mwild1@gmail.com> parents: 5847 diff changeset	11 local destinations = module:get_option_set("report_forward_to", {});
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	12
5855 05356f2d4425 mod_report_forward: Open archive store correctly (thanks Menel) Matthew Wild <mwild1@gmail.com> parents: 5854 diff changeset	13 local archive = module:open_store("archive", "archive");
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	14
5854 fcfe490de8a4 mod_spam_report_forwarder: Rename to mod_report_forward Matthew Wild <mwild1@gmail.com> parents: 5847 diff changeset	15 local cache_size = module:get_option_number("report_forward_contact_cache_size", 256);
fcfe490de8a4 mod_spam_report_forwarder: Rename to mod_report_forward Matthew Wild <mwild1@gmail.com> parents: 5847 diff changeset	16 local report_to_origin = module:get_option_boolean("report_forward_to_origin", true);
fcfe490de8a4 mod_spam_report_forwarder: Rename to mod_report_forward Matthew Wild <mwild1@gmail.com> parents: 5847 diff changeset	17 local contact_lookup_timeout = module:get_option_number("report_forward_contact_lookup_timeout", 180);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	18
5854 fcfe490de8a4 mod_spam_report_forwarder: Rename to mod_report_forward Matthew Wild <mwild1@gmail.com> parents: 5847 diff changeset	19 local body_template = module:get_option_string("report_forward_body_template", [[
5916 1927d4d27a26 mod_report_forward: Some whitespace fixes Matthew Wild <mwild1@gmail.com> parents: 5915 diff changeset	20 SPAM/ABUSE REPORT
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	21 -----------------
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	22
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	23 Reported JID: {reported_jid}
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	24
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	25 A user on our service has reported a message originating from the above JID on
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	26 your server.
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	27
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	28 {reported_message_time&The reported message was sent at: {reported_message_time}}
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	29
5916 1927d4d27a26 mod_report_forward: Some whitespace fixes Matthew Wild <mwild1@gmail.com> parents: 5915 diff changeset	30 --
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	31 This message contains also machine-readable payloads, including XEP-0377, in case
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	32 you want to automate handling of these reports. You can receive these reports
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	33 to a different address by setting 'spam-report-addresses' in your server
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	34 contact info configuration. For more information, see https://xmppbl.org/reports/
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	35 ]]):gsub("^%s+", ""):gsub("(%S)\n(%S)", "%1 %2");
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	36
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	37 local report_addresses = require "util.cache".new(cache_size);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	38
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	39 local function get_address(form, ...)
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	40 for i = 1, select("#", ...) do
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	41 local field_var = select(i, ...);
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	42 local field = form:get_child_with_attr("field", nil, "var", field_var);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	43 if field then
5860 fdff8cb54302 mod_report_forward: fix address detection when there are multiple field values Stephen Paul Weber <singpolyma@singpolyma.net> parents: 5857 diff changeset	44 for value in field:childtags("value") do
fdff8cb54302 mod_report_forward: fix address detection when there are multiple field values Stephen Paul Weber <singpolyma@singpolyma.net> parents: 5857 diff changeset	45 local parsed = url.parse(value:get_text());
fdff8cb54302 mod_report_forward: fix address detection when there are multiple field values Stephen Paul Weber <singpolyma@singpolyma.net> parents: 5857 diff changeset	46 if parsed.scheme == "xmpp" and parsed.path and not parsed.query then
fdff8cb54302 mod_report_forward: fix address detection when there are multiple field values Stephen Paul Weber <singpolyma@singpolyma.net> parents: 5857 diff changeset	47 return parsed.path;
fdff8cb54302 mod_report_forward: fix address detection when there are multiple field values Stephen Paul Weber <singpolyma@singpolyma.net> parents: 5857 diff changeset	48 end
5847 d00af6ebb326 mod_spam_report_forwarder: Only forward to xmpp: URIs, and exclude MUCs Matthew Wild <mwild1@gmail.com> parents: 5844 diff changeset	49 end
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	50 else
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	51 module:log("debug", "No field '%s'", field_var);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	52 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	53 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	54 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	55
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	56 local function get_origin_report_address(reported_jid)
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	57 local host = jid.host(reported_jid);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	58 local address = report_addresses:get(host);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	59 if address then return address; end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	60
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	61 local contact_query = st.iq({ type = "get", to = host, from = module.host, id = new_id() })
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	62 :query("http://jabber.org/protocol/disco#info");
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	63
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	64 return module:send_iq(contact_query, prosody.hosts[module.host], contact_lookup_timeout)
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	65 :next(function (result)
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	66 module:log("debug", "Processing contact form...");
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	67 local response = result.stanza;
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	68 if response.attr.type ~= "result" then
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	69 module:log("warn", "Failed to query contact addresses of %s: %s", host, response);
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	70 return;
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	71 end
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	72
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	73 for form in response.tags[1]:childtags("x", "jabber:x:data") do
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	74 local form_type = form:get_child_with_attr("field", nil, "var", "FORM_TYPE");
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	75 if form_type and form_type:get_child_text("value") == "http://jabber.org/network/serverinfo" then
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	76 address = get_address(form, "spam-report-addresses", "abuse-addresses");
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	77 break;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	78 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	79 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	80 return address;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	81 end);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	82 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	83
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	84 local function send_report(to, message)
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	85 local m = st.clone(message);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	86 m.attr.to = to;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	87 module:send(m);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	88 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	89
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	90 function forward_report(event)
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	91 local reporter_username = event.origin.username;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	92 local reporter_jid = jid.join(reporter_username, module.host);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	93 local reported_jid = event.jid;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	94
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	95 local report = st.clone(event.report);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	96 report:text_tag("jid", reported_jid, { xmlns = "urn:xmpp:jid:0" });
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	97
5915 db5128d1a16c mod_report_forward: Fix traceback when reporting a specific message (thanks singpolyma) Matthew Wild <mwild1@gmail.com> parents: 5864 diff changeset	98 local reported_message_el = report:get_child_with_attr(
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	99 "stanza-id",
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	100 "urn:xmpp:sid:0",
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	101 "by",
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	102 reported_jid,
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	103 jid.prep
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	104 );
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	105
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	106 local reported_message, reported_message_time, reported_message_with;
5915 db5128d1a16c mod_report_forward: Fix traceback when reporting a specific message (thanks singpolyma) Matthew Wild <mwild1@gmail.com> parents: 5864 diff changeset	107 if reported_message_el then
db5128d1a16c mod_report_forward: Fix traceback when reporting a specific message (thanks singpolyma) Matthew Wild <mwild1@gmail.com> parents: 5864 diff changeset	108 reported_message, reported_message_time, reported_message_with = archive:get(reporter_username, reported_message_el.attr.id);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	109 if jid.bare(reported_message_with) ~= event.jid then
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	110 reported_message = nil;
6015 7b093a9b95ea mod_report_forward: Fix traceback on error message passed to datetime function Kim Alvefur <zash@zash.se> parents: 5916 diff changeset	111 reported_message_time = nil;
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	112 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	113 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	114
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	115 local body_text = render(body_template, {
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	116 reporter_jid = reporter_jid;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	117 reported_jid = event.jid;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	118 reported_message_time = dt.datetime(reported_message_time);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	119 });
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	120
5864 b5a110544fd4 mod_report_forward: Include id on report submissions Matthew Wild <mwild1@gmail.com> parents: 5860 diff changeset	121 local message = st.message({ from = module.host, id = new_id() })
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	122 :text_tag("body", body_text)
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	123 :add_child(report);
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	124
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	125 if reported_message then
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	126 reported_message.attr.xmlns = "jabber:client";
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	127 local fwd = st.stanza("forwarded", { xmlns = "urn:xmpp:forward:0" })
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	128 :tag("delay", { xmlns = "urn:xmpp:delay", stamp = dt.datetime(reported_message_time) }):up()
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	129 :add_child(reported_message);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	130 message:add_child(fwd);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	131 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	132
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	133 for destination in destinations do
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	134 send_report(destination, message);
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	135 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	136
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	137 if report_to_origin then
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	138 module:log("debug", "Sending report to origin server...");
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	139 get_origin_report_address(event.jid):next(function (origin_report_address)
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	140 if not origin_report_address then
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	141 module:log("warn", "Couldn't report to origin: no contact address found for %s", jid.host(event.jid));
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	142 return;
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	143 end
37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	144 send_report(origin_report_address, message);
5857 ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	145 end):catch(function (e)
ff90dad75352 mod_report_forward: Fixes for abuse contact address lookup in origin reporting Matthew Wild <mwild1@gmail.com> parents: 5856 diff changeset	146 module:log("error", "Failed to report to origin server: %s", e);
5844 37e38ee534ea mod_spam_report_forwarder: Support for reporting messages, and reporting to origin server Matthew Wild <mwild1@gmail.com> parents: 5238 diff changeset	147 end);
5238 94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	148 end
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	149 end
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	150
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	151 module:hook("spam_reporting/abuse-report", forward_report, -1);
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	152 module:hook("spam_reporting/spam-report", forward_report, -1);
94472eb41d0a mod_spam_report_forwarder: Forward spam/abuse reports to one or more JIDs Matthew Wild <mwild1@gmail.com> parents: diff changeset	153 module:hook("spam_reporting/unknown-report", forward_report, -1);

Mercurial > prosody-modules

annotate mod_report_forward/mod_report_forward.lua @ 6029:cc665f343690