Mercurial > prosody-hg

comparison plugins/muc/lock.lib.lua @ 6233:f400a4cdf352

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with daurnimator
author Matthew Wild <mwild1@gmail.com>
date Sat, 17 May 2014 18:17:34 +0100
parents a5928fdeaf97
children 67efeadd9e77
comparison
equal deleted inserted replaced
6178:e12b13a46878 6233:f400a4cdf352
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 lock_rooms = module:get_option_boolean("muc_room_locking", false);
11 local lock_room_timeout = module:get_option_number("muc_room_lock_timeout", 300);
12
13 local function lock(room)
14 module:fire_event("muc-room-locked", {room = room;});
15 room.locked = true;
16 end
17 local function unlock(room)
18 module:fire_event("muc-room-unlocked", {room = room;});
19 room.locked = nil;
20 end
21 local function is_locked(room)
22 return not not room.locked;
23 end
24
25 if lock_rooms then
26 module:hook("muc-room-created", function(event)
27 local room = event.room;
28 lock(room);
29 if lock_room_timeout and lock_room_timeout > 0 then
30 module:add_timer(lock_room_timeout, function ()
31 if is_locked(room) then
32 room:destroy(); -- Not unlocked in time
33 end
34 end);
35 end
36 end);
37 end
38
39 -- Older groupchat protocol doesn't lock
40 module:hook("muc-room-pre-create", function(event)
41 if is_locked(event.room) and not event.stanza:get_child("x", "http://jabber.org/protocol/muc") then
42 unlock(event.room);
43 end
44 end, 10);
45
46 -- Don't let users into room while it is locked
47 module:hook("muc-occupant-pre-join", function(event)
48 if not event.is_new_room and is_locked(event.room) then -- Deny entry
49 event.origin.send(st.error_reply(event.stanza, "cancel", "item-not-found"));
50 return true;
51 end
52 end, -30);
53
54 -- When config is submitted; unlock the room
55 module:hook("muc-config-submitted", function(event)
56 if is_locked(event.room) then
57 unlock(event.room);
58 end
59 end, -1);
60
61 return {
62 lock = lock;
63 unlock = unlock;
64 is_locked = is_locked;
65 };