Added ExpGamingAdmin

modules/ExpGamingAdmin/Reports/control.lua

@@ -0,0 +1,126 @@
+--- Desction <get from json>
+-- @module ThisModule@X.Y.Z
+-- @author <get from json>
+-- @license <get from json>
+-- @alais ThisModule 
+
+-- Module Require
+local Admin = require('ExpGamingAdmin.AdminLib@^4.0.0')
+local Server = require('ExpGamingCore.Server@^4.0.0')
+local Ranking = require('ExpGamingCore.Ranking@^4.0.0')
+local Game = require('FactorioStdLib.Game@^0.8.0')
+local Color = require('FactorioStdLib.Color@^0.8.0')
+local Sync -- ExpGamingCore.Sync@^4.0.0
+
+-- Module Define
+local module_verbose = false
+local ThisModule = {
+    on_init=function()
+        if loaded_modules['ExpGamingCore.Sync@^4.0.0'] then Sync = require('ExpGamingCore.Sync@^4.0.0') end
+    end
+}
+
+-- Global Define
+local global = global{
+    reports={},
+    varified={}
+}
+
+-- Local Varibles
+local report_to_warnings = 1 -- used in count_reports
+local varified_to_warings = 3 -- used in count_reports
+local reports_needed_for_jail = 6
+
+-- Function Define
+local function valid_players(player,by_player)
+    local player = Game.get_player(player)
+    local by_player_name = Game.get_player(by_player) and Game.get_player(by_player).name or '<server>'
+    return player, by_player_name
+end
+
+local function report_message(player,by_player,reason)
+    local low_rank = Ranking.get_group('User').highest
+    local high_rank = Ranking.get_group('Admin').lowest
+    local player, by_player_name = valid_players(player,by_player)
+    if not player then return end
+    if Admin.is_banned(player,true) == 'report' then return end
+    Ranking.print(low_rank,{'ExpGamingAdmin@4-0-0.low-print',player.name,reason},defines.text_color.info,true)
+    Ranking.print(high_rank,{'ExpGamingAdmin@4-0-0.high-print',player.name,by_player_name,reason},defines.text_color.med)
+    if Sync then Sync.emit_embeded{
+        title='Player Report',
+        color=Color.to_hex(defines.text_color.med),
+        description='A player was reported.',
+        ['Player:']='<<inline>>'..player.name,
+        ['By:']='<<inline>>'..by_player_name,
+        ['Reason:']=reason
+    } end
+end
+
+local function cheak_reports(player)
+    local player = Game.get_player(player)
+    if not player then return end
+    local reports = Admin.count_reports(player)
+    if reports >= reports_needed_for_jail and global.actions[player.name] ~= 'report-jail' and Ranking.get_rank(player).group.name ~= 'Jail' then
+        global.actions[player.name] = actions.report
+        Admin.jail(player,'<server>','Too many user reports. Contact an Admin to be unjailed.')
+    end
+end
+
+function Admin.count_reports(player)
+    local player = Game.get_player(player)
+    if not player then return 0 end
+    local _count = 0
+    if global.reports[player.name] then
+        for _,report in pairs(global.reports[player.name]) do
+            _count=_count+report_to_warnings
+        end
+    end
+    if global.varified[player.name] then
+        for _,report in pairs(global.varified[player.name]) do
+            _count=_count+varified_to_warings
+        end
+    end
+    return _count
+end
+
+function Admin.report(player,by_player,reason)
+    local player, by_player_name = valid_players(player,by_player)
+    if not player or Ranking.get_rank(player):allowed('no-report') then return end
+    if Admin.is_banned(by_player) or Ranking.get_group(by_player).name == 'Jail' then return end
+    if Ranking.get_rank(by_player):allowed('varified') then 
+        global.varified[player.name] = global.varified[player.name] or {} 
+        local reports = global.varified[player.name]
+        for _,value in pairs(reports) do
+            if value[1] == by_player_name then return end
+        end
+        table.insert(reports,{by_player_name,reason})
+    else
+        global.reports[player.name] = global.reports[player.name] or {}
+        local reports = global.reports[player.name]
+        for _,value in pairs(reports) do
+            if value[1] == by_player_name then return end
+        end
+        table.insert(reports,{by_player_name,reason}) 
+    end
+    report_message(player,by_player,reason)
+    cheak_reports(player)
+end
+
+function Admin.clear_reports(player,by_player,no_emit)
+    local player, by_player_name = valid_players(player,by_player)
+    if not player then return end
+    global.reports[player.name]={}
+    global.varified[player.name]={}
+    if not no_emit and Sync then
+        Sync.emit_embeded{
+            title='Player Clear',
+            color=Color.to_hex(defines.text_color.low),
+            description='A player had their reports cleared.',
+            ['Player:']='<<inline>>'..player.name,
+            ['By:']='<<inline>>'..by_player_name,
+        }
+    end
+end
+
+-- Module Return
+return ThisModule