| 1 | -- Prosody IM |
| 2 | -- Copyright (C) 2008-2010 Matthew Wild |
| 3 | -- Copyright (C) 2008-2010 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 | |
| 10 | local st = require "util.stanza"; |
| 11 | local jid_split = require "util.jid".split; |
| 12 | |
| 13 | local full_sessions = full_sessions; |
| 14 | local bare_sessions = bare_sessions; |
| 15 | |
| 16 | if module:get_host_type() == "local" then |
| 17 | module:hook("iq/full", function(data) |
| 18 | -- IQ to full JID recieved |
| 19 | local origin, stanza = data.origin, data.stanza; |
| 20 | |
| 21 | local session = full_sessions[stanza.attr.to]; |
| 22 | if session then |
| 23 | -- TODO fire post processing event |
| 24 | session.send(stanza); |
| 25 | else -- resource not online |
| 26 | if stanza.attr.type == "get" or stanza.attr.type == "set" then |
| 27 | origin.send(st.error_reply(stanza, "cancel", "service-unavailable")); |
| 28 | end |
| 29 | end |
| 30 | return true; |
| 31 | end); |
| 32 | end |
| 33 | |
| 34 | module:hook("iq/bare", function(data) |
| 35 | -- IQ to bare JID recieved |
| 36 | local origin, stanza = data.origin, data.stanza; |
| 37 | local type = stanza.attr.type; |
| 38 | |
| 39 | -- TODO fire post processing events |
| 40 | if type == "get" or type == "set" then |
| 41 | local child = stanza.tags[1]; |
| 42 | local ret = module:fire_event("iq/bare/"..child.attr.xmlns..":"..child.name, data); |
| 43 | if ret ~= nil then return ret; end |
| 44 | return module:fire_event("iq-"..type.."/bare/"..child.attr.xmlns..":"..child.name, data); |
| 45 | else |
| 46 | return module:fire_event("iq-"..type.."/bare/"..stanza.attr.id, data); |
| 47 | end |
| 48 | end); |
| 49 | |
| 50 | module:hook("iq/self", function(data) |
| 51 | -- IQ to self JID recieved |
| 52 | local origin, stanza = data.origin, data.stanza; |
| 53 | local type = stanza.attr.type; |
| 54 | |
| 55 | if type == "get" or type == "set" then |
| 56 | local child = stanza.tags[1]; |
| 57 | local ret = module:fire_event("iq/self/"..child.attr.xmlns..":"..child.name, data); |
| 58 | if ret ~= nil then return ret; end |
| 59 | return module:fire_event("iq-"..type.."/self/"..child.attr.xmlns..":"..child.name, data); |
| 60 | else |
| 61 | return module:fire_event("iq-"..type.."/self/"..stanza.attr.id, data); |
| 62 | end |
| 63 | end); |
| 64 | |
| 65 | module:hook("iq/host", function(data) |
| 66 | -- IQ to a local host recieved |
| 67 | local origin, stanza = data.origin, data.stanza; |
| 68 | local type = stanza.attr.type; |
| 69 | |
| 70 | if type == "get" or type == "set" then |
| 71 | local child = stanza.tags[1]; |
| 72 | local ret = module:fire_event("iq/host/"..child.attr.xmlns..":"..child.name, data); |
| 73 | if ret ~= nil then return ret; end |
| 74 | return module:fire_event("iq-"..type.."/host/"..child.attr.xmlns..":"..child.name, data); |
| 75 | else |
| 76 | return module:fire_event("iq-"..type.."/host/"..stanza.attr.id, data); |
| 77 | end |
| 78 | end); |