mod_adhoc_cmd_ping/mod_adhoc_cmd_ping.lua
author Thilo Cestonaro <thilo@cestona.ro>
Fri, 25 Sep 2009 16:32:23 +0200
changeset 7 473b14c59797
child 9 2be8bcce5b18
permissions -rw-r--r--
adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     1
-- Copyright (C) 2009 Thilo Cestonaro
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     2
-- 
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     3
-- This file is MIT/X11 licensed. Please see the
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     4
-- COPYING file in the source package for more information.
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     5
--
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     6
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     7
local st = require "util.stanza";
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     8
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
     9
function ping_command_handler (item, origin, stanza)
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    10
	local now = os.date("%Y-%m-%dT%X")
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    11
	origin.send(st.reply(stanza):tag("command", {xmlns="http://jabber.org/protocol/commands", status="completed", node=item.node, sessionid=now})
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    12
		:tag("note", {type="info"}):text(item.name));
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    13
	return true;
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    14
end
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    15
473b14c59797 adds mod_adhoc_cmd_ping which provides 'ping' adhoc command.
Thilo Cestonaro <thilo@cestona.ro>
parents:
diff changeset
    16
module:add_item ("adhoc", { name="Ping", node="ping", handler=ping_command_handler });