Mercurial > prosody-hg
comparison plugins/mod_lastactivity.lua @ 2018:418c04834017
mod_lastactivity: Initial commit.
| author | Waqas Hussain <waqas20@gmail.com> |
|---|---|
| date | Sun, 18 Oct 2009 22:49:03 +0500 |
| parents | |
| children | dab1693f8a08 |
comparison
equal
deleted
inserted
replaced
| 2017:347799c9caa6 | 2018:418c04834017 |
|---|---|
| 1 -- Prosody IM | |
| 2 -- Copyright (C) 2008-2009 Matthew Wild | |
| 3 -- Copyright (C) 2008-2009 Waqas Hussain | |
| 4 -- | |
| 5 -- This project is MIT/X11 licensed. Please see the | |
| 6 -- COPYING file in the source package for more information. | |
| 7 -- | |
| 8 | |
| 9 local st = require "util.stanza"; | |
| 10 local is_contact_subscribed = require "core.rostermanager".is_contact_subscribed; | |
| 11 local jid_bare = require "util.jid".bare; | |
| 12 local jid_split = require "util.jid".split; | |
| 13 | |
| 14 module:add_feature("jabber:iq:last"); | |
| 15 | |
| 16 local map = {}; | |
| 17 | |
| 18 module:hook("pre-presence/bare", function(event) | |
| 19 local stanza = event.stanza; | |
| 20 if not(stanza.attr.to) and stanza.attr.type == "unavailable" then | |
| 21 local t = os.time(); | |
| 22 local s = stanza:child_with_name("status"); | |
| 23 s = s and #s.tags == 0 and s[1] or ""; | |
| 24 map[event.origin.username] = {s = s, t = t}; | |
| 25 end | |
| 26 end); | |
| 27 | |
| 28 module:hook("iq/bare/jabber:iq:last:query", function(event) | |
| 29 local origin, stanza = event.origin, event.stanza; | |
| 30 if stanza.attr.type == "get" then | |
| 31 local username = jid_split(stanza.attr.to) or origin.username; | |
| 32 if is_contact_subscribed(username, module.host, jid_bare(stanza.attr.from)) then | |
| 33 local seconds, text = "0", ""; | |
| 34 if map[username] then | |
| 35 seconds = tostring(os.difftime(os.time(), map[username].t)); | |
| 36 text = map[username].s; | |
| 37 end | |
| 38 origin.send(st.reply(stanza):tag('query', {xmlns='jabber:iq:last', seconds=seconds}):text(text)); | |
| 39 else | |
| 40 origin.send(st.error_reply(stanza, 'auth', 'forbidden')); | |
| 41 end | |
| 42 return true; | |
| 43 end | |
| 44 end); |
