forked from mtcontrib/factions
(Actual) Factions!
This commit is contained in:
commit
220d0c4f26
472
chatcommands.lua
Normal file
472
chatcommands.lua
Normal file
@ -0,0 +1,472 @@
|
||||
-------------------------------------------------------------------------------
|
||||
-- factions Mod by Sapier
|
||||
--
|
||||
-- License WTFPL
|
||||
--
|
||||
--! @file chatcommnd.lua
|
||||
--! @brief factions chat interface
|
||||
--! @copyright Sapier
|
||||
--! @author Sapier
|
||||
--! @date 2013-05-08
|
||||
--
|
||||
-- Contact sapier a t gmx net
|
||||
-------------------------------------------------------------------------------
|
||||
|
||||
--! @class factions_chat
|
||||
--! @brief chat interface class
|
||||
factions_chat = {}
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: init()
|
||||
--
|
||||
--! @brief initialize chat interface
|
||||
--! @memberof factions_chat
|
||||
--! @public
|
||||
-------------------------------------------------------------------------------
|
||||
function factions_chat.init()
|
||||
|
||||
minetest.register_privilege("faction_user",
|
||||
{
|
||||
description = "this user is allowed to interact with faction mod",
|
||||
give_to_singleplayer = true,
|
||||
}
|
||||
)
|
||||
|
||||
minetest.register_privilege("faction_admin",
|
||||
{
|
||||
description = "this user is allowed to create or delete factions",
|
||||
give_to_singleplayer = true,
|
||||
}
|
||||
)
|
||||
|
||||
minetest.register_chatcommand("factions",
|
||||
{
|
||||
params = "<cmd> <parameter 1> .. <parameter n>",
|
||||
description = "faction administration functions",
|
||||
privs = { interact=true },
|
||||
func = factions_chat.cmdhandler,
|
||||
}
|
||||
)
|
||||
|
||||
minetest.register_chatcommand("af",
|
||||
{
|
||||
params = "text",
|
||||
description = "send message to all factions",
|
||||
privs = { faction_user=true },
|
||||
func = factions_chat.allfactions_chathandler,
|
||||
}
|
||||
)
|
||||
|
||||
minetest.register_chatcommand("f",
|
||||
{
|
||||
params = "<factionname> text",
|
||||
description = "send message to a specific faction",
|
||||
privs = { faction_user=true },
|
||||
func = factions_chat.chathandler,
|
||||
}
|
||||
)
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: cmdhandler(playername,parameter)
|
||||
--
|
||||
--! @brief chat command handler
|
||||
--! @memberof factions_chat
|
||||
--! @private
|
||||
--
|
||||
--! @param playername name
|
||||
--! @param parameter data supplied to command
|
||||
-------------------------------------------------------------------------------
|
||||
function factions_chat.cmdhandler(playername,parameter)
|
||||
|
||||
local player = minetest.env:get_player_by_name(playername)
|
||||
local params = parameter:split(" ")
|
||||
local cmd = params[1]
|
||||
|
||||
--handle common commands
|
||||
if parameter == nil or
|
||||
parameter == "" then
|
||||
|
||||
local playerfactions = factions.get_factions(player)
|
||||
|
||||
local tosend = "Factions: " .. playername .. " factions:"
|
||||
for i,v in ipairs(playerfactions) do
|
||||
if i ~= #playerfactions then
|
||||
tosend = tosend .. " " .. v .. ","
|
||||
else
|
||||
tosend = tosend .. " " .. v
|
||||
end
|
||||
end
|
||||
minetest.chat_send_player(playername, tosend, false)
|
||||
return
|
||||
end
|
||||
|
||||
if cmd == "claim" then
|
||||
minetest.chat_send_player(playername,"Trust me, we're working on it",false)
|
||||
return
|
||||
end
|
||||
if cmd == "unclaim" then
|
||||
return
|
||||
end
|
||||
--list all known factions
|
||||
if cmd == "list" then
|
||||
local list = factions.get_faction_list()
|
||||
local tosend = "Factions: current available factions:"
|
||||
|
||||
for i,v in ipairs(list) do
|
||||
if i ~= #list then
|
||||
tosend = tosend .. " " .. v .. ","
|
||||
else
|
||||
tosend = tosend .. " " .. v
|
||||
end
|
||||
end
|
||||
minetest.chat_send_player(playername, tosend, false)
|
||||
return
|
||||
end
|
||||
|
||||
--show factions mod version
|
||||
if cmd == "version" then
|
||||
minetest.chat_send_player(playername, "Factions: version " .. factions_version , false)
|
||||
return
|
||||
end
|
||||
|
||||
--show description of faction
|
||||
if cmd == "info" then
|
||||
if params[2] ~= nil then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: " .. params[2] .. ": " ..
|
||||
factions.get_description(params[2]), false)
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
if cmd == "leave" then
|
||||
if params[2] ~= nil then
|
||||
if params[3] ~= nil then
|
||||
local toremove = minetest.env:get_player_by_name(params[3])
|
||||
--allowed if faction_admin, admin of faction or player itself
|
||||
if minetest.check_player_privs(playername,{ faction_admin=true }) or
|
||||
factions.is_admin(params[2],playername) and
|
||||
toremove ~= nil then
|
||||
|
||||
factions.member_remove(params[2],toremove)
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: " .. params[3] .. " has been removed from "
|
||||
.. params[2], false)
|
||||
return
|
||||
end
|
||||
else
|
||||
factions.member_remove(params[2],player)
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: You have left " .. params[2], false)
|
||||
return
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
--handle superadmin only commands
|
||||
if minetest.check_player_privs(playername,{ faction_admin=true }) then
|
||||
--create new faction
|
||||
if cmd == "create" then
|
||||
if params[2] ~= nil then
|
||||
if factions.add_faction(params[2]) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: created faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to created faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
if cmd == "join" then
|
||||
if params[2] ~= nil then
|
||||
if params[3] ~= nil and
|
||||
minetest.check_player_privs(playername,{ faction_admin=true }) then
|
||||
|
||||
local toadd = minetest.env:get_player_by_name(params[3])
|
||||
|
||||
if toadd ~= nil then
|
||||
if factions.member_add(params[2],toadd) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: " .. params[3] .. " joined faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: " .. params[3] .. " FAILED to join faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
--check for invitation
|
||||
if factions.is_invited(params[2],playername) then
|
||||
if factions.member_add(params[2],player) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: joined faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to join faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: you are not allowed to join " .. params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
--all following commands require at least two parameters
|
||||
if params[2] ~= nil then
|
||||
if minetest.check_player_privs(playername,{ faction_admin=true }) or
|
||||
factions.is_admin(params[2],playername) then
|
||||
|
||||
--delete faction
|
||||
if cmd == "delete" then
|
||||
if factions.delete_faction(params[2]) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: deleted faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to deleted faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
if cmd == "set_free" then
|
||||
if params[3] ~= nil and
|
||||
(params[3] == "true" or params[3] == "false")then
|
||||
|
||||
local value = false
|
||||
if params[3] == "true" then
|
||||
value = true
|
||||
end
|
||||
|
||||
if factions.set_free(params[2],value) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: free to join for " .. params[2] ..
|
||||
" has been set to " .. params[3],
|
||||
false)
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to set free to join for " ..
|
||||
params[2],
|
||||
false)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
--set player admin status
|
||||
if cmd == "admin" then
|
||||
if params[3] ~= nil and params[4] ~= nil and
|
||||
(params[4] == "true" or params[4] == "false") then
|
||||
|
||||
local value = false
|
||||
if params[4] == "true" then
|
||||
value = true
|
||||
end
|
||||
|
||||
if factions.set_admin(params[2],params[3],value) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: adminstate of " .. params[3] ..
|
||||
" has been set to " .. params[4],
|
||||
false)
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to set admin privileges for " ..
|
||||
params[3],
|
||||
false)
|
||||
end
|
||||
end
|
||||
return
|
||||
end
|
||||
|
||||
if cmd == "description" and
|
||||
params[2] ~= nil and
|
||||
params[3] ~= nil then
|
||||
|
||||
local desc = params[3]
|
||||
for i=4, #params, 1 do
|
||||
desc = desc .. " " .. params[i]
|
||||
end
|
||||
if factions.set_description(params[2],desc) then
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: updated description of faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to update description of faction " ..
|
||||
params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
|
||||
if cmd == "invite" and
|
||||
params[2] ~= nil and
|
||||
params[3] ~= nil then
|
||||
if factions.member_invite(params[2],params[3]) then
|
||||
minetest.chat_send_player(params[3],
|
||||
"Factions: " .. params[3] ..
|
||||
" you have been invited to join faction " .. params[2],
|
||||
false)
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: " .. params[3] ..
|
||||
" has been invited to join faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: FAILED to invite " .. params[3] ..
|
||||
" to join faction " .. params[2],
|
||||
false)
|
||||
return
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
factions_chat.show_help(playername)
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: allfactions_chathandler(playername,parameter)
|
||||
--
|
||||
--! @brief chat handler
|
||||
--! @memberof factions_chat
|
||||
--! @private
|
||||
--
|
||||
--! @param playername name
|
||||
--! @param parameter data supplied to command
|
||||
-------------------------------------------------------------------------------
|
||||
function factions_chat.allfactions_chathandler(playername,parameter)
|
||||
|
||||
local player = minetest.env:get_player_by_name(playername)
|
||||
|
||||
if player ~= nil then
|
||||
local recipients = {}
|
||||
|
||||
for faction,value in pairs(factions.get_factions(player)) do
|
||||
for name,value in pairs(factions.dynamic_data.membertable[faction]) do
|
||||
local object_to_check = mientest.env:get_player_by_name(name)
|
||||
|
||||
if object_to_check ~= nil then
|
||||
recipients[name] = true
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
for recipient,value in pairs(recipients) do
|
||||
if recipient ~= playername then
|
||||
minetest.chat_send_player(recipient,playername ..": " .. parameter,false)
|
||||
end
|
||||
end
|
||||
return
|
||||
end
|
||||
factions_chat.show_help(playername)
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: chathandler(playername,parameter)
|
||||
--
|
||||
--! @brief chat handler
|
||||
--! @memberof factions_chat
|
||||
--! @private
|
||||
--
|
||||
--! @param playername name
|
||||
--! @param parameter data supplied to command
|
||||
-------------------------------------------------------------------------------
|
||||
function factions_chat.chathandler(playername,parameter)
|
||||
|
||||
local player = minetest.env:get_player_by_name(playername)
|
||||
|
||||
if player ~= nil then
|
||||
local line = parameter:split(" ")
|
||||
local target_faction = line[1]
|
||||
|
||||
local text = line[2]
|
||||
for i=3,#line,1 do
|
||||
text = text .. " " .. line[i]
|
||||
end
|
||||
|
||||
local valid_faction = false
|
||||
|
||||
for faction,value in pairs(factions.get_factions(player)) do
|
||||
if target_faction == faction then
|
||||
valid_faction = true
|
||||
end
|
||||
end
|
||||
|
||||
if faction ~= nil and valid_faction and
|
||||
factions.dynamic_data.membertable[faction] ~= nil then
|
||||
for name,value in pairs(factions.dynamic_data.membertable[faction]) do
|
||||
local object_to_check = mientest.env:get_player_by_name(name)
|
||||
factions_chat.show_help(playername)
|
||||
if object_to_check ~= nil and
|
||||
name ~= playername then
|
||||
minetest.chat_send_player(name,playername ..": " .. text,false)
|
||||
end
|
||||
end
|
||||
else
|
||||
minetest.chat_send_player(playername,
|
||||
"Factions: you're not a member of " .. dump(faction),false)
|
||||
end
|
||||
return
|
||||
end
|
||||
factions_chat.show_help(playername)
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: show_help(playername,parameter)
|
||||
--
|
||||
--! @brief send help message to player
|
||||
--! @memberof factions_chat
|
||||
--! @private
|
||||
--
|
||||
--! @param playername name
|
||||
-------------------------------------------------------------------------------
|
||||
function factions_chat.show_help(playername)
|
||||
|
||||
local MSG = function(text)
|
||||
minetest.chat_send_player(playername,text,false)
|
||||
end
|
||||
|
||||
MSG("Factions mod")
|
||||
MSG("Usage:")
|
||||
MSG("\tUser commands:")
|
||||
MSG("\t\t/factions -> info on your current factions")
|
||||
MSG("\t\t/factions info <factionname> -> show description of faction")
|
||||
MSG("\t\t/factions list -> show list of factions")
|
||||
MSG("\t\t/factions leave <factionname> -> leave specified faction")
|
||||
MSG("\t\t/factions join <factionname> -> join specified faction")
|
||||
MSG("\t\t/factions version -> show version number of mod")
|
||||
|
||||
MSG("\tAdmin commands:")
|
||||
MSG("\t\t/factions create <factionname> -> create a new faction")
|
||||
MSG("\t\t/factions delete <factionname> -> delete a faction faction")
|
||||
MSG("\t\t/factions leave <factionname> <playername> -> remove player from faction")
|
||||
MSG("\t\t/factions invite <factionname> <playername> -> invite player to faction")
|
||||
MSG("\t\t/factions set_free <factionname> <value> -> set faction free to join")
|
||||
MSG("\t\t/factions admin <factionname> <playername> <value> -> make player admin of faction")
|
||||
MSG("\t\t/factions description <factionname> <text> -> set description for faction")
|
||||
end
|
5
description.txt
Normal file
5
description.txt
Normal file
@ -0,0 +1,5 @@
|
||||
Version 1.1.5
|
||||
|
||||
Mod for handling in game factions and reputation
|
||||
|
||||
|
1774
doc/Doxyfile
Normal file
1774
doc/Doxyfile
Normal file
File diff suppressed because it is too large
Load Diff
779
factions.lua
Normal file
779
factions.lua
Normal file
@ -0,0 +1,779 @@
|
||||
-------------------------------------------------------------------------------
|
||||
-- factions Mod by Sapier
|
||||
--
|
||||
-- License WTFPL
|
||||
--
|
||||
--! @file factions.lua
|
||||
--! @brief factions core file containing datastorage
|
||||
--! @copyright Sapier
|
||||
--! @author Sapier
|
||||
--! @date 2013-05-08
|
||||
--
|
||||
-- Contact sapier a t gmx net
|
||||
-------------------------------------------------------------------------------
|
||||
|
||||
--read some basic information
|
||||
local factions_worldid = minetest.get_worldpath()
|
||||
|
||||
--! @class factions
|
||||
--! @brief main class for factions
|
||||
factions = {}
|
||||
|
||||
--! @brief runtime data
|
||||
factions.data = {}
|
||||
factions.data.factions = {}
|
||||
factions.data.objects = {}
|
||||
factions.dynamic_data = {}
|
||||
factions.dynamic_data.membertable = {}
|
||||
|
||||
factions.print = function(text)
|
||||
print("Factions: " .. dump(text))
|
||||
end
|
||||
|
||||
factions.dbg_lvl1 = function() end --factions.print -- errors
|
||||
factions.dbg_lvl2 = function() end --factions.print -- non cyclic trace
|
||||
factions.dbg_lvl3 = function() end --factions.print -- cyclic trace
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: add_faction(name)
|
||||
--
|
||||
--! @brief add a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.add_faction(name)
|
||||
|
||||
if factions.data.factions[name] == nil then
|
||||
factions.data.factions[name] = {}
|
||||
factions.data.factions[name].reputation = {}
|
||||
factions.data.factions[name].base_reputation = {}
|
||||
factions.data.factions[name].adminlist = {}
|
||||
factions.data.factions[name].invitations = {}
|
||||
|
||||
factions.dynamic_data.membertable[name] = {}
|
||||
|
||||
factions.save()
|
||||
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: set_base_reputation(faction1,faction2,value)
|
||||
--
|
||||
--! @brief set base reputation between two factions
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param faction1 first faction
|
||||
--! @param faction2 second faction
|
||||
--! @param value value to use
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.set_base_reputation(faction1,faction2,value)
|
||||
|
||||
if factions.data.factions[faction1] ~= nil and
|
||||
factions.data.factions[faction2] ~= nil then
|
||||
|
||||
factions.data.factions[faction1].base_reputation[faction2] = value
|
||||
factions.data.factions[faction2].base_reputation[faction1] = value
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_base_reputation(faction1,faction2)
|
||||
--
|
||||
--! @brief get base reputation between two factions
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param faction1 first faction
|
||||
--! @param faction2 second faction
|
||||
--!
|
||||
--! @return reputation/0 if none set
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_base_reputation(faction1,faction2)
|
||||
factions.dbg_lvl3("get_base_reputation: " .. faction1 .. "<-->" .. faction2)
|
||||
if factions.data.factions[faction1] ~= nil and
|
||||
factions.data.factions[faction2] ~= nil then
|
||||
if factions.data.factions[faction1].base_reputation[faction2] ~= nil then
|
||||
return factions.data.factions[faction1].base_reputation[faction2]
|
||||
end
|
||||
end
|
||||
return 0
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: set_description(name,description)
|
||||
--
|
||||
--! @brief set description for a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction
|
||||
--! @param description text describing a faction
|
||||
--!
|
||||
--! @return true/false (succesfully set description)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.set_description(name,description)
|
||||
|
||||
if factions.data.factions[name] ~= nil then
|
||||
factions.data.factions[name].description = description
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_description(name)
|
||||
--
|
||||
--! @brief get description for a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction
|
||||
--!
|
||||
--! @return description or ""
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_description(name)
|
||||
|
||||
if factions.data.factions[name] ~= nil and
|
||||
factions.data.factions[name].description ~= nil then
|
||||
return factions.data.factions[name].description
|
||||
end
|
||||
return ""
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: exists(name)
|
||||
--
|
||||
--! @brief check if a faction exists
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--! @param name name to check
|
||||
--!
|
||||
--! @return true/false
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.exists(name)
|
||||
|
||||
for key,value in pairs(factions.data.factions) do
|
||||
if key == name then
|
||||
return true
|
||||
end
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_faction_list()
|
||||
--
|
||||
--! @brief get list of factions
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--!
|
||||
--! @return list of factions
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_faction_list()
|
||||
|
||||
local retval = {}
|
||||
|
||||
for key,value in pairs(factions.data.factions) do
|
||||
table.insert(retval,key)
|
||||
end
|
||||
|
||||
return retval
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: delete_faction(name)
|
||||
--
|
||||
--! @brief delete a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to delete
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.delete_faction(name)
|
||||
|
||||
factions.data.factions[name] = nil
|
||||
|
||||
factions.save()
|
||||
|
||||
if factions.data.factions[name] == nil then
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: member_add(name,object)
|
||||
--
|
||||
--! @brief add an entity or player to a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--! @param object to add to faction
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.claim()
|
||||
end
|
||||
function factions.unclaim()
|
||||
end
|
||||
function factions.member_add(name, object)
|
||||
local new_entry = {}
|
||||
new_entry.factions = {}
|
||||
|
||||
if object.object ~= nil then
|
||||
object = object.object
|
||||
end
|
||||
|
||||
if not factions.exists(name) then
|
||||
print("Unable to add to NON existant faction >" .. name .. "<")
|
||||
return false
|
||||
end
|
||||
|
||||
new_entry.name,new_entry.temporary = factions.get_name(object)
|
||||
|
||||
factions.dbg_lvl2("Adding name=" .. dump(new_entry.name) .. " to faction: " .. name )
|
||||
|
||||
if new_entry.name ~= nil then
|
||||
if factions.data.objects[new_entry.name] == nil then
|
||||
factions.data.objects[new_entry.name] = new_entry
|
||||
end
|
||||
|
||||
if factions.data.objects[new_entry.name].factions[name] == nil then
|
||||
factions.data.objects[new_entry.name].factions[name] = true
|
||||
factions.dynamic_data.membertable[name][new_entry.name] = true
|
||||
factions.data.factions[name].invitations[new_entry.name] = nil
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
end
|
||||
|
||||
--return false if no valid object or already member
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: member_invite(name,playername)
|
||||
--
|
||||
--! @brief invite a player for joining a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--! @param name of player to invite
|
||||
--!
|
||||
--! @return true/false (succesfully added invitation or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.member_invite(name, playername)
|
||||
|
||||
if factions.data.factions[name] ~= nil and
|
||||
factions.data.factions[name].invitations[playername] == nil then
|
||||
factions.data.factions[name].invitations[playername] = true
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
|
||||
--return false if not a valid faction or player already invited
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: member_remove(name,object)
|
||||
--
|
||||
--! @brief remove an entity or player to a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--! @param object to add to faction
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.member_remove(name,object)
|
||||
|
||||
local id,type = factions.get_name(object)
|
||||
|
||||
factions.dbg_lvl2("removing name=" .. dump(id) .. " to faction: " .. name )
|
||||
|
||||
if id ~= nil and
|
||||
factions.data.objects[id] ~= nil and
|
||||
factions.data.objects[id].factions[name] ~= nil then
|
||||
factions.data.objects[id].factions[name] = nil
|
||||
factions.dynamic_data.membertable[name][id] = nil
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
|
||||
if id ~= nil and
|
||||
factions.data.factions[name].invitations[id] ~= nil then
|
||||
factions.data.factions[name].invitations[id] = nil
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: set_admin(name,playername,value)
|
||||
--
|
||||
--! @brief set admin priviles for a playername
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--! @param playername to change rights
|
||||
--! @param value true/false has or has not admin privileges
|
||||
--!
|
||||
--! @return true/false (succesfully changed privileges)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.set_admin(name,playername,value)
|
||||
mobf_assert_backtrace(type(playername) == "string")
|
||||
if factions.data.factions[name] ~= nil then
|
||||
if value then
|
||||
factions.data.factions[name].adminlist[playername] = true
|
||||
factions.save()
|
||||
return true
|
||||
else
|
||||
factions.data.factions[name].adminlist[playername] = nil
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
else
|
||||
print("FACTIONS: no faction >" .. name .. "< found")
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: set_free(name,value)
|
||||
--
|
||||
--! @brief set faction to be joinable by everyone
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--! @param value true/false has or has not admin privileges
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.set_free(name,value)
|
||||
|
||||
if factions.data.factions[name] ~= nil then
|
||||
if value then
|
||||
if factions.data.factions[name].open == nil then
|
||||
factions.data.factions[name].open = true
|
||||
factions.save()
|
||||
return true
|
||||
else
|
||||
return false
|
||||
end
|
||||
else
|
||||
if factions.data.factions[name].open == nil then
|
||||
return false
|
||||
else
|
||||
factions.data.factions[name].open = nil
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: is_free(name)
|
||||
--
|
||||
--! @brief check if a fraction is free to join
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to add object to
|
||||
--
|
||||
--! @return true/false (free or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.is_free(name)
|
||||
if factions.data.factions[name] ~= nil and
|
||||
factions.data.factions[name].open then
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: is_admin(name,playername)
|
||||
--
|
||||
--! @brief read admin privilege of player
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to check rights
|
||||
--! @param playername to change rights
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.is_admin(name,playername)
|
||||
|
||||
if factions.data.factions[name] ~= nil and
|
||||
factions.data.factions[name].adminlist[playername] == true then
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: is_invited(name,playername)
|
||||
--
|
||||
--! @brief read invitation status of player
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to check for invitation
|
||||
--! @param playername to change rights
|
||||
--!
|
||||
--! @return true/false (succesfully added faction or not)
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.is_invited(name,playername)
|
||||
|
||||
if factions.data.factions[name] ~= nil and
|
||||
( factions.data.factions[name].invitations[playername] == true or
|
||||
factions.data.factions[name].open == true) then
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_factions(object)
|
||||
--
|
||||
--! @brief get list of factions for an object
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param object to get list for
|
||||
--!
|
||||
--! @return list of factions
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_factions(object)
|
||||
|
||||
local id,type = factions.get_name(object)
|
||||
|
||||
local retval = {}
|
||||
if id ~= nil and
|
||||
factions.data.objects[id] ~= nil then
|
||||
for key,value in pairs(factions.data.objects[id].factions) do
|
||||
table.insert(retval,key)
|
||||
end
|
||||
end
|
||||
|
||||
return retval
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: is_member(name,object)
|
||||
--
|
||||
--! @brief check if object is member of name
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name of faction to check
|
||||
--! @param object to check
|
||||
--!
|
||||
--! @return true/false
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.is_member(name,object)
|
||||
|
||||
local retval = false
|
||||
|
||||
local id,type = factions.get_name(object)
|
||||
|
||||
if id ~= nil and
|
||||
factions.data.objects[id] ~= nil then
|
||||
for key,value in pairs(factions.data.objects[id].factions) do
|
||||
if key == name then
|
||||
retval = true
|
||||
break
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
return retval
|
||||
end
|
||||
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_reputation(name,object)
|
||||
--
|
||||
--! @brief get reputation of an object
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name name of faction to check for reputation
|
||||
--! @param object object to get reputation for
|
||||
--!
|
||||
--! @return number value -100 to 100 0 being neutral, -100 beeing enemy 100 friend
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_reputation(name,object)
|
||||
|
||||
local id,type = factions.get_name(object)
|
||||
|
||||
factions.dbg_lvl3("get_reputation: " .. name .. "<-->" .. dump(id))
|
||||
|
||||
if id ~= nil and
|
||||
factions.data.factions[name] ~= nil then
|
||||
|
||||
factions.dbg_lvl3("get_reputation: object reputation: " .. dump(factions.data.factions[name].reputation[id]))
|
||||
|
||||
if factions.data.factions[name].reputation[id] == nil then
|
||||
factions.data.factions[name].reputation[id]
|
||||
= factions.calc_base_reputation(name,object)
|
||||
end
|
||||
|
||||
return factions.data.factions[name].reputation[id]
|
||||
else
|
||||
factions.dbg_lvl3("get_reputation: didn't find any factions for: " .. name)
|
||||
end
|
||||
|
||||
return 0
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: modify_reputation(name,object,delta)
|
||||
--
|
||||
--! @brief modify reputation of an object for a faction
|
||||
--! @memberof factions
|
||||
--! @public
|
||||
--
|
||||
--! @param name name of faction to modify reputation
|
||||
--! @param object object to change reputation
|
||||
--! @param delta value to change reputation
|
||||
--!
|
||||
--! @return true/false
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.modify_reputation(name,object,delta)
|
||||
|
||||
local id,type = factions.get_name(object)
|
||||
|
||||
if factions.data.factions[name] ~= nil then
|
||||
if factions.data.factions[name].reputation[id] == nil then
|
||||
factions.data.factions[name].reputation[id]
|
||||
= factions.calc_base_reputation(name,object)
|
||||
end
|
||||
|
||||
factions.data.factions[name].reputation[id]
|
||||
= factions.data.factions[name].reputation[id] + delta
|
||||
factions.save()
|
||||
return true
|
||||
end
|
||||
|
||||
return false
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: get_name(object)
|
||||
--
|
||||
--! @brief get textual name of object
|
||||
--! @memberof factions
|
||||
--! @private
|
||||
--
|
||||
--! @param object fetch name for this
|
||||
--!
|
||||
--! @return name or nil,is temporary element
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.get_name(object)
|
||||
if object == nil then
|
||||
return nil,true
|
||||
end
|
||||
|
||||
if object.object ~= nil then
|
||||
object = object.object
|
||||
end
|
||||
|
||||
if object:is_player() then
|
||||
return object:get_player_name(),false
|
||||
else
|
||||
local luaentity = object:get_luaentity()
|
||||
|
||||
if luaentity ~= nil then
|
||||
return tostring(luaentity),true
|
||||
end
|
||||
end
|
||||
|
||||
return nil,true
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: calc_base_reputation(name,object)
|
||||
--
|
||||
--! @brief calculate initial reputation of object within a faction
|
||||
--! @memberof factions
|
||||
--! @private
|
||||
--
|
||||
--! @param name name of faction
|
||||
--! @param object calc reputation for this
|
||||
--!
|
||||
--! @return reputation value
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.calc_base_reputation(name,object)
|
||||
|
||||
--calculate initial reputation based uppon all groups
|
||||
local object_factions = factions.get_factions(object)
|
||||
local rep_value = 0
|
||||
|
||||
factions.dbg_lvl3("calc_base_reputation: " .. name .. " <--> " .. tostring(object))
|
||||
|
||||
if object_factions ~= nil then
|
||||
factions.dbg_lvl3("calc_base_reputation: " .. tostring(object) .. " is in " .. #object_factions .. " factions")
|
||||
for k,v in pairs(object_factions) do
|
||||
if factions.data.factions[v] == nil then
|
||||
print("FACTIONS: warning object is member of faction " .. v .. " which doesn't exist")
|
||||
else
|
||||
factions.dbg_lvl3("calc_base_reputation: " .. name .. " <--> " .. v .. " rep=" .. dump(factions.data.factions[v].base_reputation[name]))
|
||||
if factions.data.factions[v].base_reputation[name] ~= nil then
|
||||
rep_value =
|
||||
rep_value + factions.data.factions[v].base_reputation[name]
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
rep_value = rep_value / #object_factions
|
||||
end
|
||||
|
||||
return rep_value
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: save()
|
||||
--
|
||||
--! @brief save data to file
|
||||
--! @memberof factions
|
||||
--! @private
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.save()
|
||||
|
||||
--saving is done much more often than reading data to avoid delay
|
||||
--due to figuring out which data to save and which is temporary only
|
||||
--all data is saved here
|
||||
--this implies data needs to be cleant up on load
|
||||
|
||||
local file,error = io.open(factions_worldid .. "/" .. "factions.conf","w")
|
||||
|
||||
if file ~= nil then
|
||||
file:write(minetest.serialize(factions.data))
|
||||
file:close()
|
||||
else
|
||||
minetest.log("error","MOD factions: unable to save factions world specific data!: " .. error)
|
||||
end
|
||||
|
||||
end
|
||||
|
||||
-------------------------------------------------------------------------------
|
||||
-- name: load()
|
||||
--
|
||||
--! @brief load data from file
|
||||
--! @memberof factions
|
||||
--! @private
|
||||
--
|
||||
--! @return true/false
|
||||
-------------------------------------------------------------------------------
|
||||
function factions.load()
|
||||
local file,error = io.open(factions_worldid .. "/" .. "factions.conf","r")
|
||||
|
||||
if file ~= nil then
|
||||
local raw_data = file:read("*a")
|
||||
file:close()
|
||||
|
||||
if raw_data ~= nil and
|
||||
raw_data ~= "" then
|
||||
|
||||
local raw_table = minetest.deserialize(raw_data)
|
||||
|
||||
|
||||
--read object data
|
||||
local temp_objects = {}
|
||||
|
||||
if raw_table.objects ~= nil then
|
||||
for key,value in pairs(raw_table.objects) do
|
||||
|
||||
if value.temporary == false then
|
||||
factions.data.objects[key] = value
|
||||
else
|
||||
temp_objects[key] = true
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
if raw_table.factions ~= nil then
|
||||
for key,value in pairs(raw_table.factions) do
|
||||
factions.data.factions[key] = {}
|
||||
factions.data.factions[key].base_reputation = value.base_reputation
|
||||
factions.data.factions[key].adminlist = value.adminlist
|
||||
factions.data.factions[key].open = value.open
|
||||
factions.data.factions[key].invitations = value.invitations
|
||||
|
||||
factions.data.factions[key].reputation = {}
|
||||
for repkey,repvalue in pairs(value.reputation) do
|
||||
if temp_objects[repkey] == nil then
|
||||
factions.data.factions[key].reputation[repkey] = repvalue
|
||||
end
|
||||
end
|
||||
|
||||
factions.dynamic_data.membertable[key] = {}
|
||||
end
|
||||
end
|
||||
|
||||
--populate dynamic faction member table
|
||||
for id,object in pairs(factions.data.objects) do
|
||||
for name,value in pairs(factions.data.objects[id].factions) do
|
||||
if value then
|
||||
factions.dynamic_data.membertable[name][id] = true
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
else
|
||||
local file,error = io.open(factions_worldid .. "/" .. "factions.conf","w")
|
||||
|
||||
if file ~= nil then
|
||||
file:close()
|
||||
else
|
||||
minetest.log("error","MOD factions: unable to save factions world specific data!: " .. error)
|
||||
end
|
||||
end
|
||||
|
||||
--create special faction players
|
||||
factions.add_faction("players")
|
||||
|
||||
--autojoin players to faction players
|
||||
minetest.register_on_joinplayer(
|
||||
function(player)
|
||||
if player:is_player() then
|
||||
factions.member_add("players",player)
|
||||
end
|
||||
end
|
||||
)
|
||||
end
|
29
init.lua
Normal file
29
init.lua
Normal file
@ -0,0 +1,29 @@
|
||||
-------------------------------------------------------------------------------
|
||||
-- factions Mod by Sapier
|
||||
--
|
||||
-- License WTFPL
|
||||
--
|
||||
--! @file init.lua
|
||||
--! @brief factions mod to be used by other mods
|
||||
--! @copyright Sapier
|
||||
--! @author Sapier
|
||||
--! @date 2013-05-08
|
||||
--!
|
||||
-- Contact sapier a t gmx net
|
||||
-------------------------------------------------------------------------------
|
||||
|
||||
local factions_version = "0.1.6"
|
||||
|
||||
core.log("action", "MOD: factions (by sapier) loading ...")
|
||||
|
||||
--!path of mod
|
||||
factions_modpath = minetest.get_modpath("factions")
|
||||
|
||||
|
||||
dofile (factions_modpath .. "/factions.lua")
|
||||
dofile (factions_modpath .. "/chatcommands.lua")
|
||||
|
||||
factions.load()
|
||||
factions_chat.init()
|
||||
|
||||
core.log("action","MOD: factions (by sapier) " .. factions_version .. " loaded.")
|
Loading…
Reference in New Issue
Block a user