47 lines
1.1 KiB
Lua
47 lines
1.1 KiB
Lua
do
|
|
|
|
function getTitle(page)
|
|
local s = page
|
|
|
|
-- Remove optional spaces from the tags.
|
|
s = string.gsub(s, "\n", " ")
|
|
s = string.gsub(s, " *< *", "<")
|
|
s = string.gsub(s, " *> *", ">")
|
|
|
|
-- Put all the tags in lowercase.
|
|
s = string.gsub(s, "(<[^ >]+)", string.lower)
|
|
|
|
local i, f, t = string.find(s, "<title>(.+)</title>")
|
|
return t or ""
|
|
end
|
|
|
|
function string.ends(str, fin)
|
|
return fin=='' or string.sub(str,-string.len(fin)) == fin
|
|
end
|
|
|
|
function run(msg, matches)
|
|
local url = matches[1]
|
|
if string.ends(url, ".jpg") or string.ends(url, ".gif") or string.ends(url, ".png") then
|
|
return
|
|
end
|
|
local result = http.request(url)
|
|
local title = getTitle(result)
|
|
|
|
-- We don't want 301 (and one Extrawurst for Google), 302, 404 and empty titles
|
|
if title == "301 Moved Permanently" or title == "" or title == "404 Not Found" or title == "302 Found" or title == "Moved Permanently" then
|
|
print('Invalide, da "'..title..'"')
|
|
else
|
|
return title
|
|
end
|
|
end
|
|
|
|
return {
|
|
description = "Postet URL-Titel",
|
|
usage = "",
|
|
patterns = {
|
|
"(https?://[%w-_%.%?%.:/%+=&]+)$",
|
|
},
|
|
run = run
|
|
}
|
|
|
|
end |