HTTP = require('socket.http') HTTPS = require('ssl.https') URL = require('socket.url') JSON = require('cjson') version = '3.4' bot_init = function() -- The function run when the bot is started or reloaded. config = dofile('config.lua') -- Load configuration file. dofile('bindings.lua') -- Load Telegram bindings. dofile('utilities.lua') -- Load miscellaneous and cross-plugin functions. -- Load the "database"! ;) if not database then database = load_data('otouto.db') end -- Fetch bot information. Try until it succeeds. repeat bot = getMe() until bot bot = bot.result plugins = {} -- Load plugins. for i,v in ipairs(config.plugins) do local p = dofile('plugins/'..v) table.insert(plugins, p) end print('@' .. bot.username .. ', AKA ' .. bot.first_name ..' ('..bot.id..')') -- Generate a random seed and "pop" the first random number. :) math.randomseed(os.time()) math.random() last_update = last_update or 0 -- Set loop variables: Update offset, last_cron = last_cron or os.date('%M', os.time()) -- the time of the last cron job, is_started = true -- and whether or not the bot should be running. database.usernames = database.usernames or {} -- Table to cache usernames by user ID. end on_msg_receive = function(msg) -- The fn run whenever a message is received. if msg.from.username then database.usernames[msg.from.username:lower()] = msg.from.id end if msg.date < os.time() - 5 then return end -- Do not process old messages. if not msg.text then msg.text = msg.caption or '' end if msg.text:match('^/start .+') then msg.text = '/' .. msg.text:input() end for i,v in ipairs(plugins) do for k,w in pairs(v.triggers) do if string.match(msg.text:lower(), w) then -- a few shortcuts msg.chat.id_str = tostring(msg.chat.id) msg.from.id_str = tostring(msg.from.id) msg.text_lower = msg.text:lower() msg.from.name = msg.from.first_name if msg.from.last_name then msg.from.name = msg.from.first_name .. ' ' .. msg.from.last_name end local success, result = pcall(function() return v.action(msg) end) if not success then sendReply(msg, 'Sorry, an unexpected error occurred.') handle_exception(result, msg.text) return end -- If the action returns a table, make that table msg. if type(result) == 'table' then msg = result -- If the action returns true, don't stop. elseif result ~= true then return end end end end end bot_init() -- Actually start the script. Run the bot_init function. while is_started do -- Start a loop while the bot should be running. local res = getUpdates(last_update+1) -- Get the latest updates! if res then for i,v in ipairs(res.result) do -- Go through every new message. last_update = v.update_id on_msg_receive(v.message) end else print(config.errors.connection) end if last_cron ~= os.date('%M', os.time()) then -- Run cron jobs every minute. last_cron = os.date('%M', os.time()) save_data('otouto.db', database) -- Save the database. for i,v in ipairs(plugins) do if v.cron then -- Call each plugin's cron function, if it has one. local res, err = pcall(function() v.cron() end) if not res then handle_exception(err, 'CRON: ' .. i) end end end end end -- Save the database before exiting. save_data('otouto.db', database) print('Halted.')