irc/init.lua

219 lines
5.0 KiB
Lua
Raw Normal View History

2013-04-30 00:07:44 +02:00
-- This file is licensed under the terms of the BSD 2-clause license.
-- See LICENSE.txt for details.
local modpath = minetest.get_modpath(minetest.get_current_modname())
2015-05-17 01:54:24 +02:00
-- Handle mod security if needed
local ie, req_ie = _G, minetest.request_insecure_environment
if req_ie then ie = req_ie() end
if not ie then
error("The IRC mod requires access to insecure functions in order "..
"to work. Please add the irc mod to your secure.trusted_mods "..
"setting or disable the irc mod.")
end
ie.package.path =
-- To find LuaIRC's init.lua
modpath.."/?/init.lua;"
-- For LuaIRC to find its files
..modpath.."/?.lua;"
2015-05-17 01:54:24 +02:00
..ie.package.path
2013-04-30 00:07:44 +02:00
-- The build of Lua that Minetest comes with only looks for libraries under
-- /usr/local/share and /usr/local/lib but LuaSocket is often installed under
-- /usr/share and /usr/lib.
if not rawget(_G, "jit") and package.config:sub(1, 1) == "/" then
2015-05-17 01:54:24 +02:00
ie.package.path = ie.package.path..
";/usr/share/lua/5.1/?.lua"..
";/usr/share/lua/5.1/?/init.lua"
2015-05-17 01:54:24 +02:00
ie.package.cpath = ie.package.cpath..
";/usr/lib/lua/5.1/?.so"
end
2015-05-17 01:54:24 +02:00
-- Temporarily set require so that LuaIRC can access it
local old_require = require
require = ie.require
-- Silence warnings about `module` in `ltn12`.
local old_module = rawget(_G, "module")
rawset(_G, "module", ie.module)
2015-05-17 01:54:24 +02:00
local lib = ie.require("irc")
irc = {
2014-05-06 21:26:13 +02:00
version = "0.2.0",
2013-04-30 00:07:44 +02:00
connected = false,
cur_time = 0,
message_buffer = {},
recent_message_count = 0,
joined_players = {},
modpath = modpath,
2015-05-17 01:54:24 +02:00
lib = lib,
2013-04-30 00:07:44 +02:00
}
-- Compatibility
2017-02-16 06:36:04 +01:00
rawset(_G, "mt_irc", irc)
2013-04-30 00:07:44 +02:00
local getinfo = debug.getinfo
local warned = { }
local function warn_deprecated(k)
local info = getinfo(3)
local loc = info.source..":"..info.currentline
if warned[loc] then return end
warned[loc] = true
print("COLON: "..tostring(k))
minetest.log("warning", "Deprecated use of colon notation when calling"
.." method `"..tostring(k).."` at "..loc)
end
-- This is a hack.
setmetatable(irc, {
__newindex = function(t, k, v)
if type(v) == "function" then
local f = v
v = function(me, ...)
if rawequal(me, t) then
warn_deprecated(k)
return f(...)
else
return f(me, ...)
end
end
end
rawset(t, k, v)
end,
})
dofile(modpath.."/config.lua")
dofile(modpath.."/messages.lua")
2015-05-17 01:54:24 +02:00
loadfile(modpath.."/hooks.lua")(ie)
dofile(modpath.."/callback.lua")
dofile(modpath.."/chatcmds.lua")
dofile(modpath.."/botcmds.lua")
-- Restore old (safe) functions
require = old_require
rawset(_G, "module", old_module)
if irc.config.enable_player_part then
dofile(modpath.."/player_part.lua")
2013-04-30 00:07:44 +02:00
else
setmetatable(irc.joined_players, {__index = function() return true end})
2013-04-30 00:07:44 +02:00
end
2013-01-08 16:50:47 +01:00
2013-04-30 00:07:44 +02:00
minetest.register_privilege("irc_admin", {
description = "Allow IRC administrative tasks to be performed.",
give_to_singleplayer = true
})
2012-12-01 04:06:15 +01:00
local stepnum = 0
2012-12-01 04:06:15 +01:00
minetest.register_globalstep(function(dtime) return irc.step(dtime) end)
2012-12-01 04:06:15 +01:00
function irc.step()
if stepnum == 3 then
if irc.config.auto_connect then
irc.connect()
end
end
stepnum = stepnum + 1
if not irc.connected then return end
2012-12-14 23:33:44 +01:00
2013-04-30 00:07:44 +02:00
-- Hooks will manage incoming messages and errors
local good, err = xpcall(function() irc.conn:think() end, debug.traceback)
2014-05-06 21:26:13 +02:00
if not good then
print(err)
2013-04-30 00:07:44 +02:00
return
2013-04-25 23:00:44 +02:00
end
2012-12-22 04:16:28 +01:00
end
2013-04-30 00:07:44 +02:00
function irc.connect()
if irc.connected then
2013-04-30 00:07:44 +02:00
minetest.log("error", "IRC: Ignoring attempt to connect when already connected.")
return
2013-04-25 23:00:44 +02:00
end
irc.conn = irc.lib.new({
nick = irc.config.nick,
2013-04-30 00:07:44 +02:00
username = "Minetest",
realname = "Minetest",
})
irc.doHook(irc.conn)
-- We need to swap the `require` function again since
-- LuaIRC `require`s `ssl` if `irc.secure` is true.
2017-02-16 06:36:04 +01:00
old_require = require
require = ie.require
2014-05-28 17:05:08 +02:00
local good, message = pcall(function()
irc.conn:connect({
host = irc.config.server,
port = irc.config.port,
password = irc.config.password,
timeout = irc.config.timeout,
reconnect = irc.config.reconnect,
secure = irc.config.secure
2013-04-30 00:07:44 +02:00
})
end)
require = old_require
2013-04-30 00:07:44 +02:00
if not good then
minetest.log("error", ("IRC: Connection error: %s: %s -- Reconnecting in %d seconds...")
:format(irc.config.server, message, irc.config.reconnect))
minetest.after(irc.config.reconnect, function() irc.connect() end)
2013-04-30 00:07:44 +02:00
return
2013-04-25 23:00:44 +02:00
end
2012-12-22 04:16:28 +01:00
if irc.config.NSPass then
irc.conn:queue(irc.msgs.privmsg(
"NickServ", "IDENTIFY "..irc.config.NSPass))
2013-04-25 23:00:44 +02:00
end
2013-04-30 00:07:44 +02:00
irc.conn:join(irc.config.channel, irc.config.key)
irc.connected = true
2013-04-30 00:07:44 +02:00
minetest.log("action", "IRC: Connected!")
minetest.chat_send_all("IRC: Connected!")
end
function irc.disconnect(message)
if irc.connected then
--The OnDisconnect hook will clear irc.connected and print a disconnect message
irc.conn:disconnect(message)
2013-04-25 23:00:44 +02:00
end
2012-12-28 12:41:10 +01:00
end
function irc.say(to, message)
2013-04-30 00:07:44 +02:00
if not message then
message = to
to = irc.config.channel
2013-04-30 00:07:44 +02:00
end
to = to or irc.config.channel
irc.queue(irc.msgs.privmsg(to, message))
end
2012-12-22 04:16:28 +01:00
function irc.reply(message)
if not irc.last_from then
2013-12-03 00:15:29 +01:00
return
end
2014-07-08 05:22:52 +02:00
message = message:gsub("[\r\n%z]", " \\n ")
irc.say(irc.last_from, message)
2013-12-03 00:15:29 +01:00
end
function irc.send(msg)
if not irc.connected then return end
irc.conn:send(msg)
2012-12-22 04:16:28 +01:00
end
2013-04-30 00:07:44 +02:00
function irc.queue(msg)
if not irc.connected then return end
irc.conn:queue(msg)
2014-05-06 21:26:13 +02:00
end
2013-04-30 00:07:44 +02:00