Mercurial > prosody-modules
changeset 281:e5c16c87383c
mod_extdisco: XEP-0215: External Service Discovery
author | Matthew Wild <mwild1@gmail.com> |
---|---|
date | Mon, 29 Nov 2010 17:58:42 +0000 (2010-11-29) |
parents | 6d72c5172c74 |
children | e5cc0fe5eec3 |
files | mod_extdisco/mod_extdisco.lua |
diffstat | 1 files changed, 52 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/mod_extdisco/mod_extdisco.lua Mon Nov 29 17:58:42 2010 +0000 @@ -0,0 +1,52 @@ +local st = require "util.stanza"; + +local services = module:get_option("external_services"); + +local xmlns_extdisco = "urn:xmpp:extdisco:1"; + +module:add_feature(xmlns_extdisco); + +module:hook("iq-get/host/"..xmlns_extdisco..":services", function (event) + local origin, stanza = event.origin, event.stanza; + local service = stanza:get_child("service", xmlns_extdisco); + local service_type = service and service.attr.type; + local reply = st.reply(stanza); + for host, service_info in pairs(services) do + if not(service_type) or service_info.type == service_type then + reply:tag("service", { + host = host; + port = service_info.port; + transport = service_info.transport; + type = service_info.type; + username = service_info.username; + password = service_info.password; + }):up(); + end + end + origin.send(reply); + return true; +end); + +module:hook("iq-get/host/"..xmlns_extdisco..":credentials", function (event) + local origin, stanza = event.origin, event.stanza; + local credentials = stanza:get_child("credentials", xmlns_extdisco); + local host = credentials and credentials.attr.host; + if not host then + origin.send(st.error_reply(stanza, "cancel", "bad-request", "No host specified")); + return true; + end + local service_info = services[host]; + if not service_info then + origin.send(st.error_reply(stanza, "cancel", "item-not-found", "No such service known")); + return true; + end + local reply = st.reply(stanza) + :tag("credentials") + :tag("service", { + host = host; + username = service_info.username; + password = service_info.password; + }):up(); + origin.send(reply); + return true; +end);