File

mod_block_strangers/mod_block_strangers.lua @ 1388:6e1facedcb74

mam_sql: Make forwarded a child element of result, rather than a sibling This makes mod_mam_sql conform to a newer version of XEP-313, which some clients require
author Rob Hoelz <rob@hoelz.ro>
date Tue, 22 Apr 2014 20:16:40 -0500
parent 1325:b21236b6b8d8
child 1928:252b634b065d
line wrap: on
line source


local jid_split = require "util.jid".split;
local jid_bare = require "util.jid".bare;
local is_contact_subscribed = require "core.rostermanager".is_contact_subscribed;

function check_subscribed(event)
	local stanza = event.stanza;
	local to_user, to_host, to_resource = jid_split(stanza.attr.to);
	local from_jid = jid_bare(stanza.attr.from);
	if to_user and not is_contact_subscribed(to_user, to_host, from_jid) then
		if to_resource and stanza.attr.type == "groupchat" then
			return nil; -- Pass through
		end
		return true; -- Drop stanza
	end
end

module:hook("message/bare", check_subscribed, 200);
module:hook("message/full", check_subscribed, 200);
module:hook("iq/full", check_subscribed, 200);