Software /
code /
verse
File
plugins/adhoc.lua @ 116:151c8cc776df
verse.plugins.adhoc: XEP-0050 Ad-hoc commands plugin
author | Matthew Wild <mwild1@gmail.com> |
---|---|
date | Thu, 26 Aug 2010 17:52:16 +0100 |
child | 122:e2600454fd54 |
line wrap: on
line source
local adhoc = require "lib.adhoc"; local xmlns_commands = "http://jabber.org/protocol/commands"; local commands = {}; function verse.plugins.adhoc(stream) stream:add_disco_feature(xmlns_commands); local function has_affiliation(jid, aff) if not(aff) or aff == "user" then return true; end -- TODO: Support 'roster', and callback etc. end function stream:add_adhoc_command(name, node, handler, permission) commands[node] = adhoc.new(name, node, handler, permission); stream:add_disco_item({ jid = stream.jid, node = node, name = name }, xmlns_commands); return commands[node]; end local function handle_command(stanza) local command_tag = stanza.tags[1]; local node = command_tag.attr.node; local handler = commands[node]; if not handler then return; end if not has_affiliation(stanza.attr.from, handler.permission) then stream:send(verse.error_reply(stanza, "auth", "forbidden", "You don't have permission to execute this command"):up() :add_child(handler:cmdtag("canceled") :tag("note", {type="error"}):text("You don't have permission to execute this command"))); return true end -- User has permission now execute the command return adhoc.handle_cmd(handler, { send = function (d) return stream:send(d) end }, stanza); end stream:hook("iq/"..xmlns_commands, function (stanza) local type = stanza.attr.type; local name = stanza.tags[1].name; if type == "set" and name == "command" then return handle_command(stanza); end end); end