• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

plugins/version.lua@ae69cea97598 (annotated)

plugins/version.lua

Thu, 20 May 2010 14:33:41 +0100

author

Chris <jugg@hotmail.com>

date

Thu, 20 May 2010 14:33:41 +0100

changeset 16

ae69cea97598

parent 7

59129c1e4e07

child 33

37caf7bd2021

permissions

-rw-r--r--

Formatting, indentation and cleanup

0 7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	1	local st = require "util.stanza";
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	2	require "util.xstanza";
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	3
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	4	local xmlns_version = "jabber:iq:version";
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	5
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	6	function riddim.plugins.version(bot)
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	7	bot.stream:add_plugin("version");
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	8	bot.stream.version:set{
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	9	name = "Riddim";
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	10	version = "alpha";
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	11	};
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	12
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	13	bot:hook("commands/version", function (command)
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	14	local who, param = bot.stream.jid, command.param or (command.room and command.room.nick);
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	15	if param then
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	16	if command.room and command.room.occupants[param] then
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	17	who = command.room.occupants[param].jid;
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	18	elseif command.room and command.room.occupants[param:gsub("%s$", "")] then
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	19	who = command.room.occupants[param:gsub("%s$", "")].jid;
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	20	else
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	21	who = param;
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	22	end
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	23	end
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	24
16 ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	25	bot.stream:query_version(who, function (reply)
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	26	if not reply.error then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	27	local saywho = (who == command.sender.jid and "You are") or (param.." is");
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	28	command:reply(saywho.." running "..(reply.name or "something")
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	29	.." version "..(reply.version or "unknown")
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	30	.." on "..(reply.platform or "an unknown platform"));
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	31	else
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	32	local type, condition, text = reply.type, reply.condition, reply.text;
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	33	local r = "There was an error requesting "..param.."'s version";
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	34	if condition == "service-unavailable" then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	35	r = param.." doesn't reply to version requests";
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	36	elseif condition == "feature-not-implemented" then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	37	r = param.." doesn't support feature requests";
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	38	elseif condition == "remote-server-not-found" then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	39	r = param.." can't be reached via XMPP";
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	40	elseif condition and not text then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	41	r = r..": "..condition;
0 7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	42	end
16 ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	43	if text then
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	44	r = r .. " ("..text..")";
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	45	end
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	46	command:reply(r);
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	47	end
ae69cea97598 Formatting, indentation and cleanup Chris <jugg@hotmail.com> parents: 7 diff changeset	48	end);
0 7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	49	return true;
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	50	end);
7d84f4403d67 Initial commit, hello world! Matthew Wild <mwild1@gmail.com> parents: diff changeset	51	end