Mercurial > prosody-modules
view mod_readonly/mod_readonly.lua @ 1535:efbb047c01e7
mod_mam_muc: Update to XEP-0313 v 0.3
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Wed, 22 Oct 2014 21:42:40 +0200 |
parents | 8133dd5f266a |
children | 7776c9dc5f37 |
line wrap: on
line source
local st = require "util.stanza"; local stores = module:get_option("readonly_stores", { vcard = { "vcard-temp", "vCard" }; }); local namespaces = {}; for name, namespace in pairs(stores) do namespaces[table.concat(namespace, ":")] = name; end function prevent_write(event) local stanza = event.stanza; if stanza.attr.type ~= "set" then return; end local xmlns_and_tag = stanza.tags[1].attr.xmlns..":"..stanza.tags[1].name; local store_name = namespaces[xmlns_and_tag]; if store_name then module:log("warn", "Preventing modification of %s store by %s", store_name, stanza.attr.from); event.origin.send(st.error_reply(stanza, "cancel", "not-allowed", store_name.." data is read-only")); return true; -- Block stanza end end for namespace in pairs(namespaces) do module:hook("iq/bare/"..namespace, prevent_write, 200); end