b7c81c464f
Minor changes across the board. More planned. I also may have accidentally screwed with access permissions (so looks like every file is marked modified). Moved drua-tg.lua into the otouto/ directory. Added pokego-calculator.lua plugin (similar to pidgeycalc.com).
50 lines
1.6 KiB
Lua
50 lines
1.6 KiB
Lua
local dilbert = {}
|
|
|
|
local HTTP = require('socket.http')
|
|
local URL = require('socket.url')
|
|
local bindings = require('otouto.bindings')
|
|
local utilities = require('otouto.utilities')
|
|
|
|
dilbert.command = 'dilbert [date]'
|
|
|
|
function dilbert:init(config)
|
|
dilbert.triggers = utilities.triggers(self.info.username, config.cmd_pat):t('dilbert', true).table
|
|
dilbert.doc = config.cmd_pat .. [[dilbert [YYYY-MM-DD]
|
|
Returns the latest Dilbert strip or that of the provided date.
|
|
Dates before the first strip will return the first strip. Dates after the last trip will return the last strip.
|
|
Source: dilbert.com]]
|
|
end
|
|
|
|
function dilbert:action(msg, config)
|
|
|
|
bindings.sendChatAction(self, { chat_id = msg.chat.id, action = 'upload_photo' } )
|
|
|
|
local input = utilities.input(msg.text)
|
|
if not input then input = os.date('%F') end
|
|
if not input:match('^%d%d%d%d%-%d%d%-%d%d$') then input = os.date('%F') end
|
|
|
|
local url = 'http://dilbert.com/strip/' .. URL.escape(input)
|
|
local str, res = HTTP.request(url)
|
|
if res ~= 200 then
|
|
utilities.send_reply(self, msg, config.errors.connection)
|
|
return
|
|
end
|
|
|
|
local strip_filename = '/tmp/' .. input .. '.gif'
|
|
local strip_file = io.open(strip_filename)
|
|
if strip_file then
|
|
strip_file:close()
|
|
strip_file = strip_filename
|
|
else
|
|
local strip_url = str:match('<meta property="og:image" content="(.-)"/>')
|
|
strip_file = utilities.download_file(strip_url, '/tmp/' .. input .. '.gif')
|
|
end
|
|
|
|
local strip_title = str:match('<meta property="article:publish_date" content="(.-)"/>')
|
|
|
|
bindings.sendPhoto(self, { chat_id = msg.chat.id, caption = strip_title }, { photo = strip_file } )
|
|
|
|
end
|
|
|
|
return dilbert
|