2015-11-12 17:42:03 +01:00
|
|
|
package.path = './.luarocks/share/lua/5.2/?.lua;./.luarocks/share/lua/5.2/?/init.lua;./.luarocks/lib/lua/5.2/?.lua;./.luarocks/lib/lua/5.2/?/init.lua;' .. package.path
|
|
|
|
require("luarocks.loader")
|
2014-12-14 20:52:48 +01:00
|
|
|
require("./bot/utils")
|
|
|
|
|
2015-12-05 21:36:56 +01:00
|
|
|
VERSION = '20151205'
|
2014-12-14 20:52:48 +01:00
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
-- This function is called when tg receive a msg
|
2014-12-14 20:52:48 +01:00
|
|
|
function on_msg_receive (msg)
|
2015-11-12 17:42:03 +01:00
|
|
|
|
2015-04-19 20:12:54 +02:00
|
|
|
if not started then
|
|
|
|
return
|
|
|
|
end
|
|
|
|
|
2015-04-12 19:16:06 +02:00
|
|
|
local receiver = get_receiver(msg)
|
2015-11-12 17:42:03 +01:00
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
-- vardump(msg)
|
2015-05-28 16:47:30 +02:00
|
|
|
msg = pre_process_service_msg(msg)
|
2015-03-14 17:21:20 +01:00
|
|
|
if msg_valid(msg) then
|
|
|
|
msg = pre_process_msg(msg)
|
2015-11-12 17:42:03 +01:00
|
|
|
if msg then
|
|
|
|
match_plugins(msg)
|
|
|
|
-- mark_read(receiver, ok_cb, false)
|
2015-05-28 16:47:30 +02:00
|
|
|
end
|
2014-12-14 20:52:48 +01:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
function ok_cb(extra, success, result)
|
|
|
|
end
|
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
function on_binlog_replay_end()
|
2015-04-19 20:12:54 +02:00
|
|
|
started = true
|
2015-01-12 20:38:36 +01:00
|
|
|
postpone (cron_plugins, false, 60*5.0)
|
2015-05-28 16:47:30 +02:00
|
|
|
-- See plugins/isup.lua as an example for cron
|
2014-12-31 17:14:48 +01:00
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
-- load sudo_users and credentials
|
|
|
|
sudo_users = load_sudo_users()
|
2015-04-19 21:17:53 +02:00
|
|
|
cred_data = load_cred()
|
2015-11-12 17:42:03 +01:00
|
|
|
|
2014-12-31 17:14:48 +01:00
|
|
|
-- load plugins
|
|
|
|
plugins = {}
|
|
|
|
load_plugins()
|
|
|
|
end
|
|
|
|
|
2014-12-14 20:52:48 +01:00
|
|
|
function msg_valid(msg)
|
2015-05-28 16:47:30 +02:00
|
|
|
-- Don't process outgoing messages
|
2014-12-14 20:52:48 +01:00
|
|
|
if msg.out then
|
2015-05-12 20:15:15 +02:00
|
|
|
print('\27[36mNicht gültig: Nachricht von mir\27[39m')
|
2014-12-14 20:52:48 +01:00
|
|
|
return false
|
|
|
|
end
|
2015-04-12 23:21:37 +02:00
|
|
|
|
|
|
|
-- Before bot was started
|
2015-03-10 21:06:15 +01:00
|
|
|
if msg.date < now then
|
2015-05-12 20:15:15 +02:00
|
|
|
print('\27[36mNicht gültig: alte Nachricht\27[39m')
|
2014-12-14 20:52:48 +01:00
|
|
|
return false
|
|
|
|
end
|
2015-04-19 20:12:54 +02:00
|
|
|
|
2015-04-26 19:16:44 +02:00
|
|
|
if not msg.to.id then
|
2015-05-12 20:15:15 +02:00
|
|
|
print('\27[36mNicht gültig: To id not provided\27[39m')
|
2015-04-26 19:16:44 +02:00
|
|
|
return false
|
|
|
|
end
|
|
|
|
|
|
|
|
if not msg.from.id then
|
2015-05-12 20:15:15 +02:00
|
|
|
print('\27[36mNicht gültig: From id not provided\27[39m')
|
2014-12-14 20:52:48 +01:00
|
|
|
return false
|
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
|
|
|
|
if msg.unread == 0 then
|
|
|
|
print('\27[36mNicht gültig: gelesen\27[39m')
|
|
|
|
return false
|
|
|
|
end
|
2015-04-12 22:08:56 +02:00
|
|
|
|
2015-05-28 16:47:30 +02:00
|
|
|
if msg.from.id == our_id then
|
|
|
|
print('\27[36mNicht gültig: Nachricht von unserer ID\27[39m')
|
|
|
|
return false
|
|
|
|
end
|
|
|
|
|
|
|
|
if msg.to.type == 'encr_chat' then
|
|
|
|
print('\27[36mNicht gültig: Encrypted Chat\27[39m')
|
|
|
|
return false
|
|
|
|
end
|
|
|
|
|
|
|
|
if msg.from.id == 777000 then
|
|
|
|
print('\27[36mNicht gültig: Telegram Nachricht\27[39m')
|
|
|
|
return false
|
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
return true
|
2014-12-14 20:52:48 +01:00
|
|
|
end
|
|
|
|
|
2015-05-28 16:47:30 +02:00
|
|
|
function pre_process_service_msg(msg)
|
|
|
|
if msg.service then
|
|
|
|
local action = msg.action or {type=""}
|
|
|
|
-- Double / to discriminate of normal actions
|
|
|
|
msg.text = "//tgservice " .. action.type
|
|
|
|
|
|
|
|
-- wipe the data to allow the bot to read service messages
|
|
|
|
if msg.out then
|
|
|
|
msg.out = false
|
|
|
|
end
|
|
|
|
if msg.from.id == our_id then
|
|
|
|
msg.from.id = 0
|
|
|
|
end
|
|
|
|
end
|
|
|
|
return msg
|
|
|
|
end
|
|
|
|
|
|
|
|
|
2015-04-12 20:12:41 +02:00
|
|
|
-- Apply plugin.pre_process function
|
|
|
|
function pre_process_msg(msg)
|
2016-01-11 19:38:03 +01:00
|
|
|
--for name,plugin in orderedPairs(plugins) do
|
2015-04-12 20:12:41 +02:00
|
|
|
for name,plugin in pairs(plugins) do
|
2015-05-28 16:47:30 +02:00
|
|
|
if plugin.pre_process and msg then
|
2015-06-02 21:52:42 +02:00
|
|
|
-- print('Preprocess', name)
|
2015-11-12 17:42:03 +01:00
|
|
|
msg = plugin.pre_process(msg)
|
2014-12-26 12:13:27 +01:00
|
|
|
end
|
|
|
|
end
|
2015-03-14 17:21:20 +01:00
|
|
|
|
|
|
|
return msg
|
|
|
|
end
|
|
|
|
|
|
|
|
-- Go over enabled plugins patterns.
|
|
|
|
function match_plugins(msg)
|
|
|
|
for name, plugin in pairs(plugins) do
|
2015-04-12 21:55:01 +02:00
|
|
|
match_plugin(plugin, name, msg)
|
2015-03-14 17:21:20 +01:00
|
|
|
end
|
2014-12-26 12:13:27 +01:00
|
|
|
end
|
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
-- Check if plugin is deactivated in this chat
|
|
|
|
local function is_plugin_disabled_on_chat(plugin_name, msg)
|
|
|
|
local hash = get_redis_hash(msg, 'disabled_plugins')
|
|
|
|
local disabled = redis:hget(hash, plugin_name)
|
|
|
|
|
|
|
|
-- Plugin is disabled
|
|
|
|
if disabled == 'true' then
|
|
|
|
print('Plugin '..plugin_name..' ist in diesem Chat deaktiviert')
|
|
|
|
return true
|
|
|
|
else
|
|
|
|
return false
|
2015-04-12 21:55:01 +02:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
function match_plugin(plugin, plugin_name, msg)
|
2014-12-14 20:52:48 +01:00
|
|
|
local receiver = get_receiver(msg)
|
2015-02-11 22:01:31 +01:00
|
|
|
|
2015-05-28 16:47:30 +02:00
|
|
|
-- Go over patterns. If one matches it's enough.
|
2015-03-14 17:21:20 +01:00
|
|
|
for k, pattern in pairs(plugin.patterns) do
|
2015-05-15 15:37:59 +02:00
|
|
|
local matches = match_pattern(pattern, msg.text)
|
2015-04-12 19:16:06 +02:00
|
|
|
if matches then
|
2015-05-12 20:15:15 +02:00
|
|
|
print("Nachricht stimmt überein mit ", pattern)
|
2015-05-03 13:51:33 +02:00
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
if is_plugin_disabled_on_chat(plugin_name, msg) then
|
2015-04-12 21:55:01 +02:00
|
|
|
return nil
|
2015-05-03 13:51:33 +02:00
|
|
|
end
|
2015-03-14 17:21:20 +01:00
|
|
|
-- Function exists
|
2015-04-12 19:16:06 +02:00
|
|
|
if plugin.run then
|
2015-11-12 17:42:03 +01:00
|
|
|
if not plugin.notyping then send_typing(receiver, ok_cb, true) end
|
2015-05-03 13:51:33 +02:00
|
|
|
-- If plugin is for privileged users only
|
2015-04-12 19:16:06 +02:00
|
|
|
if not warns_user_not_allowed(plugin, msg) then
|
|
|
|
local result = plugin.run(msg, matches)
|
|
|
|
if result then
|
2015-05-03 13:51:33 +02:00
|
|
|
send_large_msg(receiver, result)
|
2015-03-14 17:21:20 +01:00
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
2015-06-02 21:52:42 +02:00
|
|
|
-- One patterns matches
|
2015-03-14 17:21:20 +01:00
|
|
|
return
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2015-04-12 19:16:06 +02:00
|
|
|
-- DEPRECATED, use send_large_msg(destination, text)
|
|
|
|
function _send_msg(destination, text)
|
|
|
|
send_large_msg(destination, text)
|
2015-03-14 17:21:20 +01:00
|
|
|
end
|
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
-- Load superusers from redis
|
|
|
|
function load_sudo_users()
|
|
|
|
if redis:exists("telegram:sudo_users") == false then
|
|
|
|
-- If sudo_users set doesnt exists
|
|
|
|
print ("Created new sudo_users set: telegram:sudo_users")
|
|
|
|
create_sudo_users()
|
2014-12-31 17:14:48 +01:00
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
local sudo_users = redis:smembers("telegram:sudo_users")
|
|
|
|
for v,user in pairs(sudo_users) do
|
|
|
|
print("Superuser: " .. user)
|
2014-12-31 17:14:48 +01:00
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
return sudo_users
|
2014-12-31 17:14:48 +01:00
|
|
|
end
|
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
-- Load credentials from redis
|
|
|
|
function load_cred()
|
|
|
|
if redis:exists("telegram:credentials") == false then
|
|
|
|
-- If credentials hash doesnt exists
|
|
|
|
print ("Neuen Credentials-Hash erstellt: telegram:credentials")
|
2015-04-19 21:17:53 +02:00
|
|
|
create_cred()
|
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
return redis:hgetall("telegram:credentials")
|
2014-12-14 20:52:48 +01:00
|
|
|
end
|
|
|
|
|
2015-11-12 17:42:03 +01:00
|
|
|
-- create credentials hash with redis
|
|
|
|
function create_cred()
|
2015-04-19 21:17:53 +02:00
|
|
|
cred = {
|
|
|
|
bitly_access_token = "",
|
2015-11-12 17:42:03 +01:00
|
|
|
cloudinary_apikey = "",
|
|
|
|
cloudinary_api_secret = "",
|
|
|
|
cloudinary_public_id = "",
|
2015-04-23 17:30:43 +02:00
|
|
|
derpibooru_apikey = "",
|
2015-04-19 21:17:53 +02:00
|
|
|
fb_access_token = "",
|
2015-07-26 22:01:24 +02:00
|
|
|
flickr_apikey = "",
|
2015-06-28 19:16:56 +02:00
|
|
|
ftp_site = "",
|
|
|
|
ftp_username = "",
|
|
|
|
ftp_password = "",
|
2015-04-19 21:17:53 +02:00
|
|
|
gender_apikey = "",
|
2015-11-12 17:42:03 +01:00
|
|
|
golem_apikey = "",
|
2015-05-09 23:57:19 +02:00
|
|
|
google_apikey = "",
|
|
|
|
google_cse_id = "",
|
2015-11-12 17:42:03 +01:00
|
|
|
gitlab_private_token = "",
|
|
|
|
gitlab_project_id = "",
|
2015-04-19 21:17:53 +02:00
|
|
|
instagram_access_token = "",
|
|
|
|
lyricsnmusic_apikey = "",
|
2015-11-12 17:42:03 +01:00
|
|
|
mal_username = "",
|
|
|
|
mal_pw = "",
|
2015-04-19 21:17:53 +02:00
|
|
|
neutrino_userid = "",
|
|
|
|
neutrino_apikey = "",
|
2015-11-12 17:42:03 +01:00
|
|
|
owm_apikey = "",
|
2015-04-19 21:17:53 +02:00
|
|
|
page2images_restkey = "",
|
|
|
|
soundcloud_client_id = "",
|
|
|
|
tw_consumer_key = "",
|
|
|
|
tw_consumer_secret = "",
|
|
|
|
tw_access_token = "",
|
2015-05-09 23:57:19 +02:00
|
|
|
tw_access_token_secret = "",
|
|
|
|
x_mashape_key = "",
|
|
|
|
yandex_translate_apikey = "",
|
2015-06-24 02:32:56 +02:00
|
|
|
yandex_rich_content_apikey = "",
|
|
|
|
yourls_site_url = "",
|
|
|
|
yourls_signature_token = ""
|
2015-04-19 21:17:53 +02:00
|
|
|
}
|
2015-11-12 17:42:03 +01:00
|
|
|
redis:hmset("telegram:credentials", cred)
|
|
|
|
print ('Credentials gespeichert in telegram:credentials')
|
|
|
|
end
|
|
|
|
|
|
|
|
function create_sudo_users()
|
|
|
|
redis:sadd("telegram:sudo_users", '0')
|
|
|
|
redis:sadd("telegram:sudo_users", '1')
|
|
|
|
redis:sadd("telegram:sudo_users", our_id)
|
|
|
|
print('Speichere Superuser in telegram:sudo_users')
|
|
|
|
print('Adde deine ID mit Redis: SADD telegram:sudo_users YOURID')
|
|
|
|
end
|
|
|
|
|
|
|
|
-- create plugin set if it doesn't exist
|
|
|
|
function create_plugin_set()
|
|
|
|
enabled_plugins = {
|
|
|
|
"plugins",
|
|
|
|
"manager"
|
|
|
|
}
|
|
|
|
print ('enabling a few plugins - saving to redis set telegram:enabled_plugins')
|
|
|
|
for _,plugin in pairs(enabled_plugins) do
|
|
|
|
redis:sadd("telegram:enabled_plugins", plugin)
|
|
|
|
end
|
2015-04-19 21:17:53 +02:00
|
|
|
end
|
|
|
|
|
2014-12-14 20:52:48 +01:00
|
|
|
function on_our_id (id)
|
|
|
|
our_id = id
|
|
|
|
end
|
|
|
|
|
|
|
|
function on_user_update (user, what)
|
|
|
|
--vardump (user)
|
|
|
|
end
|
|
|
|
|
|
|
|
function on_chat_update (chat, what)
|
|
|
|
--vardump (chat)
|
|
|
|
end
|
|
|
|
|
|
|
|
function on_secret_chat_update (schat, what)
|
|
|
|
--vardump (schat)
|
|
|
|
end
|
|
|
|
|
|
|
|
function on_get_difference_end ()
|
|
|
|
end
|
|
|
|
|
2014-12-24 01:38:41 +01:00
|
|
|
-- Enable plugins in config.json
|
2014-12-16 15:05:42 +01:00
|
|
|
function load_plugins()
|
2015-11-12 17:42:03 +01:00
|
|
|
enabled_plugins = redis:smembers('telegram:enabled_plugins')
|
|
|
|
if not enabled_plugins[1] then
|
|
|
|
create_plugin_set()
|
|
|
|
end
|
|
|
|
for k, v in pairs(enabled_plugins) do
|
2015-05-12 20:15:15 +02:00
|
|
|
print("Lade Plugin", v)
|
2015-05-14 21:37:51 +02:00
|
|
|
|
|
|
|
local ok, err = pcall(function()
|
|
|
|
local t = loadfile("plugins/"..v..'.lua')()
|
|
|
|
plugins[v] = t
|
|
|
|
end)
|
|
|
|
|
|
|
|
if not ok then
|
2015-11-12 17:42:03 +01:00
|
|
|
print('\27[31mFehler beim Laden vom Plugin '..v..'\27[39m')
|
2015-05-14 21:37:51 +02:00
|
|
|
print('\27[31m'..err..'\27[39m')
|
|
|
|
end
|
2015-11-12 17:42:03 +01:00
|
|
|
|
2014-12-16 15:05:42 +01:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
-- Call and postpone execution for cron plugins
|
2014-12-16 21:50:19 +01:00
|
|
|
function cron_plugins()
|
2014-12-16 15:05:42 +01:00
|
|
|
|
2015-03-14 17:21:20 +01:00
|
|
|
for name, plugin in pairs(plugins) do
|
|
|
|
-- Only plugins with cron function
|
|
|
|
if plugin.cron ~= nil then
|
|
|
|
plugin.cron()
|
2014-12-16 21:50:19 +01:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
-- Called again in 5 mins
|
|
|
|
postpone (cron_plugins, false, 5*60.0)
|
2014-12-22 22:05:46 +01:00
|
|
|
end
|
|
|
|
|
|
|
|
-- Start and load values
|
|
|
|
our_id = 0
|
2015-01-24 17:18:13 +01:00
|
|
|
now = os.time()
|
2015-03-10 21:06:15 +01:00
|
|
|
math.randomseed(now)
|
2015-11-12 17:42:03 +01:00
|
|
|
|
|
|
|
started = false
|