Mercurial > prosody-hg

comparison plugins/muc/lock.lib.lua @ 6609:d2faaaca695d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge 0.10->trunk
author Matthew Wild <mwild1@gmail.com>
date Fri, 27 Mar 2015 22:24:57 +0000
parents 6b3eb1611587
children e465b584547b
comparison
equal deleted inserted replaced
6608:b6e558febb7a 6609:d2faaaca695d
1 -- Prosody IM
2 -- Copyright (C) 2008-2010 Matthew Wild
3 -- Copyright (C) 2008-2010 Waqas Hussain
4 -- Copyright (C) 2014 Daurnimator
5 --
6 -- This project is MIT/X11 licensed. Please see the
7 -- COPYING file in the source package for more information.
8 --
9
10 local st = require "util.stanza";
11
12 local lock_rooms = module:get_option_boolean("muc_room_locking", false);
13 local lock_room_timeout = module:get_option_number("muc_room_lock_timeout", 300);
14
15 local function lock(room)
16 module:fire_event("muc-room-locked", {room = room;});
17 room.locked = true;
18 end
19 local function unlock(room)
20 module:fire_event("muc-room-unlocked", {room = room;});
21 room.locked = nil;
22 end
23 local function is_locked(room)
24 return not not room.locked;
25 end
26
27 if lock_rooms then
28 module:hook("muc-room-pre-create", function(event)
29 -- Older groupchat protocol doesn't lock
30 if not event.stanza:get_child("x", "http://jabber.org/protocol/muc") then return end
31 -- Lock room at creation
32 local room = event.room;
33 lock(room);
34 if lock_room_timeout and lock_room_timeout > 0 then
35 module:add_timer(lock_room_timeout, function ()
36 if is_locked(room) then
37 room:destroy(); -- Not unlocked in time
38 end
39 end);
40 end
41 end, 10);
42 end
43
44 -- Don't let users into room while it is locked
45 module:hook("muc-occupant-pre-join", function(event)
46 if not event.is_new_room and is_locked(event.room) then -- Deny entry
47 event.origin.send(st.error_reply(event.stanza, "cancel", "item-not-found"));
48 return true;
49 end
50 end, -30);
51
52 -- When config is submitted; unlock the room
53 module:hook("muc-config-submitted", function(event)
54 if is_locked(event.room) then
55 unlock(event.room);
56 end
57 end, -1);
58
59 return {
60 lock = lock;
61 unlock = unlock;
62 is_locked = is_locked;
63 };