plugins/mod_version.lua
author Waqas Hussain <waqas20@gmail.com>
Thu, 06 Nov 2008 16:57:10 +0500
changeset 219 f06e97f525bc
parent 189 3f0e3a07b491
child 298 985710ea308b
permissions -rw-r--r--
Fixed some whitespace.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
188
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     1
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     2
local st = require "util.stanza";
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     3
local send = require "core.sessionmanager".send_to_session;
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     4
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     5
local log = require "util.logger".init("mod_version");
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     6
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     7
local xmlns_version = "jabber:iq:version"
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     8
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
     9
local function handle_version_request(session, stanza)
219
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    10
	if stanza.attr.type == "get" then
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    11
		session.send(st.reply(stanza):query(xmlns_version)
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    12
			:tag("name"):text("lxmppd"):up()
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    13
			:tag("version"):text("pre-alpha"):up()
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    14
			:tag("os"):text("The best one"));
f06e97f525bc Fixed some whitespace.
Waqas Hussain <waqas20@gmail.com>
parents: 189
diff changeset
    15
	end
188
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
    16
end
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
    17
0d9f03009b8a mod_version is here
Matthew Wild <mwild1@gmail.com>
parents:
diff changeset
    18
add_iq_handler("c2s", xmlns_version, handle_version_request);
189
3f0e3a07b491 Fix for mod_version over s2s
Matthew Wild <mwild1@gmail.com>
parents: 188
diff changeset
    19
add_iq_handler("s2sin", xmlns_version, handle_version_request);