capturetheflag/mods/vote/init.lua

391 lines
9.6 KiB
Lua

vote = {
active = {},
queue = {},
kick_cooldown = 600
}
local vlist = {} -- table storing player name, ip & lock status
function vote.new_vote(creator, voteset)
local max_votes = tonumber(minetest.setting_get("vote.maximum_active")) or 1
local max_queue = tonumber(minetest.setting_get("vote.maximum_active")) or 0
if #vote.active < max_votes then
vote.start_vote(voteset)
return true, "Vote Started. You still need to vote: " .. voteset.help
elseif max_queue == 0 then
return false, "A vote is already running, please try again later."
elseif #vote.queue < max_queue then
table.insert(vote.queue, voteset)
return true, "Vote queued until there is less then " .. max_votes ..
" votes active."
else
return false, "The queue of votes waiting to run is full. Please try again later."
end
end
function vote.start_vote(voteset)
minetest.log("action", "Vote started: " .. voteset.description)
table.insert(vote.active, voteset)
-- Build results table
voteset.results = {
abstain = {},
voted = {}
}
if voteset.options then
for _, option in pairs(voteset.options) do
voteset.results[option] = {}
print(" - " .. option)
end
else
voteset.results.yes = {}
voteset.results.no = {}
end
-- Run start callback
if voteset.on_start then
voteset:on_start()
end
-- Timer for end
if voteset.duration or voteset.time then
minetest.after(voteset.duration + 0.1, function()
vote.end_vote(voteset)
end)
end
-- Show HUD a.s.a.p.
vote.update_all_hud()
end
function vote.end_vote(voteset)
local removed = false
for i, voteset2 in pairs(vote.active) do
if voteset == voteset2 then
table.remove(vote.active, i, 1)
removed = true
end
end
if not removed then
return
end
local result = nil
if voteset.on_decide then
result = voteset:on_decide(voteset.results)
elseif voteset.results.yes and voteset.results.no then
local total = #voteset.results.yes + #voteset.results.no
local perc_needed = voteset.perc_needed or 0.5
if #voteset.results.yes / total > perc_needed then
result = "yes"
else
result = "no"
end
end
minetest.log("action", "Vote '" .. voteset.description ..
"' ended with result '" .. result .. "'.")
if voteset.on_result then
voteset:on_result(result, voteset.results)
end
local max_votes = tonumber(minetest.setting_get("vote.maximum_active")) or 1
if #vote.active < max_votes and #vote.queue > 0 then
local nextvote = table.remove(vote.queue, 1)
vote.start_vote(nextvote)
else
-- Update HUD a.s.a.p.
vote.update_all_hud()
end
end
function vote.get_next_vote(name)
for _, voteset in pairs(vote.active) do
if not voteset.results.voted[name] then
return voteset
end
end
return nil
end
function vote.check_vote(voteset)
local all_players_voted = true
local players = minetest.get_connected_players()
for _, player in pairs(players) do
local name = player:get_player_name()
if not voteset.results.voted[name] then
all_players_voted = false
break
end
end
if all_players_voted then
vote.end_vote(voteset)
end
end
function vote.vote(voteset, name, value)
if not voteset.results[value] then
return
end
minetest.log("action", name .. " voted '" .. value .. "' to '"
.. voteset.description .. "'")
table.insert(voteset.results[value], name)
voteset.results.voted[name] = true
if voteset.on_vote then
voteset:on_vote(name, value)
end
vote.check_vote(voteset)
end
minetest.register_privilege("vote_admin", {
description = "Allows a player to manage running votes."
})
function vote.clear()
vote.active = {}
vote.queue = {}
vote.update_all_hud()
end
minetest.register_chatcommand("vote_clear", {
privs = {
vote_admin = true,
},
func = vote.clear
})
local hudkit = dofile(minetest.get_modpath("vote") .. "/hudkit.lua")
vote.hud = hudkit()
function vote.update_hud(player)
local name = player:get_player_name()
local voteset = vote.get_next_vote(name)
if not voteset or not minetest.check_player_privs(name,
{interact=true, vote=true}) then
vote.hud:remove(player, "vote:desc")
vote.hud:remove(player, "vote:bg")
vote.hud:remove(player, "vote:help")
return
end
if not vote.hud:exists(player, "vote:bg") then
vote.hud:add(player, "vote:bg", {
hud_elem_type = "image",
position = {x = 1, y = 0.5},
scale = {x = 1, y = 1},
text = "vote_background.png",
offset = {x=-100, y = 10},
number = 0xFFFFFF
})
end
if vote.hud:exists(player, "vote:desc") then
vote.hud:change(player, "vote:desc", "text", voteset.description .. "?")
else
vote.hud:add(player, "vote:desc", {
hud_elem_type = "text",
position = {x = 1, y = 0.5},
scale = {x = 100, y = 100},
text = voteset.description .. "?",
offset = {x=-100, y = 0},
number = 0xFFFFFF
})
end
if voteset.help then
if vote.hud:exists(player, "vote:help") then
vote.hud:change(player, "vote:help", "text", voteset.help)
else
vote.hud:add(player, "vote:help", {
hud_elem_type = "text",
position = {x = 1, y = 0.5},
scale = {x = 100, y = 100},
text = voteset.help,
offset = {x=-100, y = 20},
number = 0xFFFFFF
})
end
else
vote.hud:remove(player, "vote:help")
end
end
minetest.register_on_leaveplayer(function(player)
local name = player:get_player_name()
vote.hud.players[name] = nil
if not vlist[name].locked then
vlist[name] = nil
end
end)
function vote.update_all_hud()
local players = minetest.get_connected_players()
for _, player in pairs(players) do
vote.update_hud(player)
end
minetest.after(5, vote.update_all_hud)
end
minetest.after(5, vote.update_all_hud)
minetest.register_privilege("vote", {
description = "Can vote on issues",
})
minetest.register_privilege("vote_starter", {
description = "Can start votes on issues",
})
minetest.register_chatcommand("yes", {
privs = {
interact = true,
vote = true
},
func = function(name, params)
local voteset = vote.get_next_vote(name)
if not voteset then
minetest.chat_send_player(name,
"There is no vote currently running!")
return
elseif not voteset.results.yes then
minetest.chat_send_player(name, "The vote is not a yes/no one.")
return
elseif voteset.can_vote and not voteset:can_vote(name) then
minetest.chat_send_player(name,
"You can't vote in the currently active vote!")
return
end
vote.vote(voteset, name, "yes")
end
})
minetest.register_chatcommand("no", {
privs = {
interact = true,
vote = true
},
func = function(name, params)
local voteset = vote.get_next_vote(name)
if not voteset then
minetest.chat_send_player(name,
"There is no vote currently running!")
return
elseif not voteset.results.no then
minetest.chat_send_player(name, "The vote is not a yes/no one.")
return
elseif voteset.can_vote and not voteset:can_vote(name) then
minetest.chat_send_player(name,
"You can't vote in the currently active vote!")
return
end
vote.vote(voteset, name, "no")
end
})
minetest.register_chatcommand("abstain", {
privs = {
interact = true,
vote = true
},
func = function(name, params)
local voteset = vote.get_next_vote(name)
if not voteset then
minetest.chat_send_player(name,
"There is no vote currently running!")
return
elseif voteset.can_vote and not voteset:can_vote(name) then
minetest.chat_send_player(name,
"You can't vote in the currently active vote!")
return
end
table.insert(voteset.results.abstain, name)
voteset.results.voted[name] = true
if voteset.on_abstain then
voteset:on_abstain(name)
end
vote.check_vote(voteset)
end
})
local set = minetest.setting_get("vote.kick_vote")
if set == nil or minetest.is_yes(set) then
minetest.register_privilege("vote_kick", {
description = "Can (start) vote to kick a player",
})
minetest.register_chatcommand("vote_kick", {
privs = {
interact = true,
vote_kick = true,
},
func = function(name, param)
if not minetest.get_player_by_name(param) then
minetest.chat_send_player(name, "There is no player called '" ..
param .. "'")
return
end
return vote.new_vote(name, {
description = "Kick " .. param,
help = "/yes, /no or /abstain",
name = param,
duration = 60,
perc_needed = 0.8,
on_result = function(self, result, results)
if result == "yes" then
minetest.chat_send_all("Vote passed, " ..
#results.yes .. " to " .. #results.no .. ", " ..
self.name .. " will be kicked.")
minetest.kick_player(self.name,
("The vote to kick you passed.\n You have been temporarily banned" ..
" for %s minutes."):format(tostring(vote.kick_cooldown / 60)))
vlist[self.name].locked = true
minetest.after(vote.kick_cooldown, function()
vlist[self.name] = nil
end)
else
minetest.chat_send_all("Vote failed, " ..
#results.yes .. " to " .. #results.no .. ", " ..
self.name .. " remains ingame.")
end
end,
on_vote = function(self, voter, value)
minetest.chat_send_all(voter .. " voted " .. value .. " to '" ..
self.description .. "'")
end
})
end
})
end
minetest.register_on_joinplayer(function(player)
local name = player:get_player_name()
if not vlist[name] then
vlist[name] = {
ip = minetest.get_player_ip(name),
locked = false
}
end
end)
minetest.register_on_prejoinplayer(function(name, ip)
if vlist[name] and vlist[name].locked then
return "Please wait until the vote cool down period has elapsed before rejoining!"
else
for k, v in pairs(vlist) do
if v.ip == ip and v.locked then
return "This IP has been temporarily blocked."..
" Please wait until the cool-down period has elapsed before rejoining."
end
end
end
end)