plugins/urltitle.lua

Tue, 31 Jan 2012 19:29:02 +0100

author
Kim Alvefur <zash@zash.se>
date
Tue, 31 Jan 2012 19:29:02 +0100
changeset 92
37e804dfaf37
child 94
5cc3b481d3e7
permissions
-rw-r--r--

Import urltitle plugin (thanks ruskie)

function riddim.plugins.urltitle(bot)
	require "net.httpclient_listener";
	local http = require "net.http";

	local function handler(message)
		local url = message.body and message.body:match("https?://%S+");
		if url then
			http.request(url, nil, function (data, code)
				if code ~= 200 then return end
				local title = data:match("<title[^>]*>([^<]+)");

				if title then
					title = title:gsub("\n", "");
					if message.room then
						message.room:send(title);
					else
						message:reply(title);
					end
				end
			end);
		end
	end
	bot:hook("message", handler);
	bot:hook("groupchat/joined", function(room)
		room:hook("message", handler)
	end);
end

mercurial