95 lines
3.1 KiB
Lua
95 lines
3.1 KiB
Lua
do
|
||
|
||
local makeOurDate = function(dateString)
|
||
local pattern = "(%d+)%-(%d+)%-(%d+)"
|
||
local year, month, day = dateString:match(pattern)
|
||
return day..'.'..month..'.'..year
|
||
end
|
||
|
||
local function get_post(post)
|
||
local url = 'http://akamaru.de/?json=get_recent_posts'
|
||
local res,code = http.request(url)
|
||
local data = json:decode(res).posts[1]
|
||
if code ~= 200 then return "HTTP-Fehler" end
|
||
if not data then return "HTTP-Fehler" end
|
||
|
||
local title = data.title
|
||
-- Character encoding
|
||
title = string.gsub(title, "´", "´")
|
||
title = string.gsub(title, "&", "&")
|
||
title = string.gsub(title, ">", ">")
|
||
title = string.gsub(title, """, '"')
|
||
title = string.gsub(title, "<", "<")
|
||
title = string.gsub(title, "—", "—")
|
||
title = string.gsub(title, "∇", "∇")
|
||
title = string.gsub(title, "–", "–")
|
||
title = string.gsub(title, "Ψ", "ψ")
|
||
title = string.gsub(title, "ψ", "ψ")
|
||
title = string.gsub(title, "»", "»")
|
||
title = string.gsub(title, "ß", "ß")
|
||
title = string.gsub(title, "™", "™")
|
||
title = string.gsub(title, "&", "&")
|
||
title = string.gsub(title, "'", "'")
|
||
title = string.gsub(title, "'", "'")
|
||
title = string.gsub(title, "|", "|")
|
||
title = string.gsub(title, " ", " ")
|
||
title = string.gsub(title, "»", "»")
|
||
title = string.gsub(title, "ß", "ß")
|
||
title = string.gsub(title, "–", "–")
|
||
title = string.gsub(title, "’", "'")
|
||
title = string.gsub(title, "“", "“")
|
||
title = string.gsub(title, "”", "”")
|
||
title = string.gsub(title, "„", "„")
|
||
title = string.gsub(title, "‹", "‹")
|
||
title = string.gsub(title, "€", "€")
|
||
-- Ä Ö Ü
|
||
title = string.gsub(title, "ä", "ä")
|
||
title = string.gsub(title, "Ä", "Ä")
|
||
title = string.gsub(title, "ä", "ä")
|
||
title = string.gsub(title, "Ä", "Ä")
|
||
title = string.gsub(title, "ö", "ö")
|
||
title = string.gsub(title, "Ö", "Ö")
|
||
title = string.gsub(title, "ö", "ö")
|
||
title = string.gsub(title, "Ö", "Ö")
|
||
title = string.gsub(title, "ü", "ü")
|
||
title = string.gsub(title, "Ü", "Ü")
|
||
title = string.gsub(title, "ü", "ü")
|
||
title = string.gsub(title, "Ü", "Ü")
|
||
|
||
local from = data.author.name
|
||
local date = makeOurDate(data.date)
|
||
local content = string.match(data.excerpt, '<p>(.*)</p>')
|
||
local url = data.url
|
||
if data.thumbnail then
|
||
image_url = data.thumbnail
|
||
elseif data.attachments then
|
||
image_url = data.attachments[1].url
|
||
end
|
||
|
||
local text = title..' ('..from..' am '..date..')\n\n'..content..'...\n'..url
|
||
|
||
if data.thumbnail or data.attachments then
|
||
return text, image_url
|
||
else
|
||
return text
|
||
end
|
||
end
|
||
|
||
local function run(msg, matches)
|
||
local text, image_url = get_post(post)
|
||
local receiver = get_receiver(msg)
|
||
if image_url then
|
||
local file = download_to_file(image_url)
|
||
send_photo(receiver, file, ok_cb, false)
|
||
end
|
||
return text
|
||
end
|
||
|
||
return {
|
||
description = "Sendet letzten Aka's Blog Beitrag",
|
||
usage = "/aka",
|
||
patterns = {"^/[Aa][Kk][Aa]$"},
|
||
run = run
|
||
}
|
||
|
||
end |