Scribd
Upload
25 views15 pages

Lua Script for User Ban Management

The document describes the functionality of a Lua script named 'cmd_ban.lua' that allows users to ban and unban others based on nicknames, CID, or IP addresses, along with options to show or clear banned users. It includes detailed usage instructions, command options, and various updates made across different versions of the script. Additionally, it outlines settings, messages, and functions related to the ban and unban processes.

Uploaded by

sandhyachaudhary1234567890
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
25 views15 pages

Lua Script for User Ban Management

The document describes the functionality of a Lua script named 'cmd_ban.lua' that allows users to ban and unban others based on nicknames, CID, or IP addresses, along with options to show or clear banned users. It includes detailed usage instructions, command options, and various updates made across different versions of the script. Additionally, it outlines settings, messages, and functions related to the ban and unban processes.

Uploaded by

sandhyachaudhary1234567890
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd

--[[

cmd_ban.lua by blastbeat

- this script adds a command "ban" and "unban" to ban/unban users by


nick/cid/ip or show/clear all banned users

- usage ban: [+!#]ban nick|cid|ip <NICK>|<CID>|<IP> [<time> <reason>] / [+!


#]ban show|showhis [<NICK>]|clear|clearhis
- usage unban: [+!#]unban nick|cid|ip <NICK>|<CID>|<IP>

- <time> are ban minutes; negative are not allowed


- <time> and <reason> are optional

v0.36: by pulsar
- added "years" to [Link]
- changed get_bantime()

v0.35: by pulsar
- prevent nick bans if user is not online/regged

v0.34: by pulsar
- added more tempban options / request by Tantrix
- Fix #150

v0.33: by pulsar
- removed the ban forever crap
- fix #32 -> [Link]

v0.32: by pulsar
- changed visuals

v0.31: by pulsar
- fix issue: [Link]
- add "del()" function to export unban functionality in other
scripts
- add feature: [Link]
- possibility to show the ban history of a user
- removed table lookups
- some changes in the rightclick menu

v0.30: by pulsar
- removed genOrderedIndex(), orderedNext() and orderedPairs() function,
using new [Link]() instead

v0.29: by pulsar
- ban export function: add()
- set default "user_level" from "100" to "60"
- if a script is using the ban import function then it uses
level "60" if user = nil
- added ban history / requested by Kungen
- added new vars, functions, table lookups, ucmds
- added ban state active/expired / requested by Sopor
- improved user:kill()

v0.28: by pulsar
- changed "addban" function, added additional routine (routine written
by Jerker) to check if the user still exists,
and if, rewrite old ban with the new one / thx Jerker, Sopor, Kungen
-changing some parts of code
-add ban export functionality to use the ban function in other scripts
-add complete unban command functionality from cmd_unban.lua
-removed send_report() function, using report import functionality now
-show default bantime in "ucmd_time" (rightclick bantime dialog) /
requested by Sopor
- using "clear" parameter instead of "clean" / requested by Sopor

v0.27: by pulsar
- typo fix / thx Kaas
- fixed "get_bantime()" / thx BlinG
- add "msg_forever"

v0.26: by pulsar
- removed "cmd_ban_minlevel" import
- using [Link]( tbl ) instead of "cmd_ban_minlevel"
- add is_integer() function to check if the used bantime is integer /
thx sopor
- add new cmd: [+!#]ban clean / requested by Tork
- cleans the complete ban table (only lvl 100)

v0.25: by pulsar
- check if opchat is activated

v0.24: by pulsar
- fix missing report msg if target was banned via CT1
- using "user:firstnick()" for "banned by"
- fix permissions
- add command: [+!#]ban show
- shows a list of all banned users

v0.23: by pulsar
- add function to calculate ban time in days, hours, minutes, seconds
- add some new table lookups

v0.22: by pulsar
- add some new table lookups
- add possibility to send report to opchat

v0.21: by pulsar
- changed listener: from "onLogin" to "onConnect" / thx fly out to
Kungen
- fixes problem where banned users can see userlist on login

v0.20: by Night
- permission fix

v0.19: by pulsar
- changed rightclick style

v0.18: by pulsar
- changed database path and filename
- from now on all scripts uses the same database folder

v0.17: by pulsar
- fix lang and rightclicks for the v0.16 modifications
- fix permission bug
- changed listener: from "onConnect" to "onLogin"
- if target is online and has higher level then he becomes a report

v0.16: by Night
- disallow banning users with same or lower reglevel
- allow higher reglevel than the banner to allways enter hub
- allow banning offline users by nick, ip, cid
- add [+!#]ban ip

v0.15: by pulsar
- bugfix: ban bots

v0.14: by pulsar
- export scriptsettings to "cfg/[Link]"

v0.13: by pulsar
- ban user by firstnick (without nicktag)

v0.12: by blastbeat
- updated script api
- regged hubcommand

v0.11: by blastbeat
- some clean ups

v0.10: by blastbeat
- added language module

v0.09: by blastbeat
- added usercommand

v0.08: by blastbeat
- added english and german language files

v0.07: by blastbeat
- added report function, removed opchat, some clean up

v0.06: by blastbeat
- updated script api, cached table lookups, cleaned up code

v0.05: by blastbeat
- added by_level to ban table

v0.04: by blastbeat
- renamend to cmd_ban.lua

v0.03: by blastbeat
- added ban by nick and cid
- added perm ban via negative ban time
- added public interface to banfile

v0.02: by blastbeat
- fixed typo
- added opchat setting

]]--

--------------
--[SETTINGS]--
--------------

local scriptname = "cmd_ban"


local scriptversion = "0.36"

local cmd = "ban"


local cmd2 = "unban"

--// imports - ban


local hubcmd, help, ucmd
local scriptlang = [Link]( "language" )
local lang, err = [Link]( scriptlang, scriptname ); lang = lang or {};
err = err and [Link]( err )
local default_time = [Link]( "cmd_ban_default_time" )
local permission = [Link]( "cmd_ban_permission" )
local report_activate = [Link]( "cmd_ban_report" )
local report_hubbot = [Link]( "cmd_ban_report_hubbot" )
local report_opchat = [Link]( "cmd_ban_report_opchat" )
local llevel = [Link]( "cmd_ban_llevel" )
local bans_path = "scripts/data/cmd_ban_bans.tbl"
local bans = [Link]( bans_path ) or {}
local history_path = "scripts/data/cmd_ban_history.tbl"
local history = [Link]( history_path ) or {}
local report = [Link]( "etc_report" )

--// imports - unban


local permission2 = [Link]( "cmd_unban_permission" )

--// msgs - ban


local help_title = lang.help_title or "cmd_ban.lua - Ban"
local help_usage = lang.help_usage or "[+!#]ban nick|cid|ip <NICK>|<CID>|<IP>
[<TIME> <REASON>] / [+!#]ban show|showhis [<NICK>]|clear|clearhis"
local help_desc = lang.help_desc or "bans user; <time> are ban minutes; negative
values means ban forever"

local msg_denied = lang.msg_denied or "You are not allowed to use this command."
local msg_notint = lang.msg_notint or "It's not allowed to use decimal numbers for
bantime."
local msg_import = lang.msg_import or "Error while importing additional module."
local msg_reason = lang.msg_reason or "No reason."
local msg_usage = lang.msg_usage or "Usage: [+!#]ban nick|cid|ip <NICK>|<CID>|<IP>
[<TIME> <REASON>] / [+!#]ban show|showhis [<NICK>]|clear|clearhis"
local msg_off = lang.msg_off or "User not found."
local msg_god = lang.msg_god or "You cannot ban user with higher level than you."
local msg_bot = lang.msg_bot or "User is a bot."
local msg_ban = lang.msg_ban or "[ BAN ]--> You were banned by: %s | reason: %s
| remaining ban time: " -- do not delete '%s'!
local msg_ok = lang.msg_ok or "[ BAN ]--> User: %s was banned by: %s |
bantime: %s | reason: %s"
local msg_ban_added = lang.msg_ban_added or "[ BAN ]--> %s: %s was banned by %s"
local msg_ban_attempt = lang.msg_ban_attempt or "[ BAN ]--> User: %s with lower
level than you has tried to ban you! because: %s"
local msg_clean_bans = lang.msg_clean_bans or "[ BAN ]--> Ban table was cleared by:
"
local msg_clean_banhistory = lang.msg_clean_banhistory or "[ BAN ]--> Ban history
was cleared by: "

local msg_years = lang.msg_years or " years, "


local msg_days = lang.msg_days or " days, "
local msg_hours = lang.msg_hours or " hours, "
local msg_minutes = lang.msg_minutes or " minutes, "
local msg_seconds = lang.msg_seconds or " seconds"

local ucmd_menu1 = lang.ucmd_menu1 or { "Ban", "1 hour" }


local ucmd_menu2 = lang.ucmd_menu2 or { "Ban", "2 hours" }
local ucmd_menu3 = lang.ucmd_menu3 or { "Ban", "6 hours" }
local ucmd_menu4 = lang.ucmd_menu4 or { "Ban", "12 hours" }
local ucmd_menu5 = lang.ucmd_menu5 or { "Ban", "1 day" }
local ucmd_menu6 = lang.ucmd_menu6 or { "Ban", "2 days" }
local ucmd_menu7 = lang.ucmd_menu7 or { "Ban", "1 week" }
local ucmd_menu7_1 = lang.ucmd_menu7_1 or { "Ban", "1 month" }
local ucmd_menu7_2 = lang.ucmd_menu7_2 or { "Ban", "6 months" }
local ucmd_menu7_3 = lang.ucmd_menu7_3 or { "Ban", "1 year" }
local ucmd_menu8 = lang.ucmd_menu8 or { "Ban", "other" }
local ucmd_menu9 = lang.ucmd_menu9 or { "User", "Control", "Ban", "by NICK" }
local ucmd_menu10 = lang.ucmd_menu10 or { "User", "Control", "Ban", "by CID" }
local ucmd_menu11 = lang.ucmd_menu11 or { "User", "Control", "Ban", "by IP" }
local ucmd_menu12 = lang.ucmd_menu12 or { "User", "Control", "Ban", "show",
"bans" }
local ucmd_menu13 = lang.ucmd_menu13 or { "User", "Control", "Ban", "clear", "bans"
}
local ucmd_menu14 = lang.ucmd_menu14 or { "User", "Control", "Ban", "show", "ban
history", "all" }
local ucmd_menu16 = lang.ucmd_menu16 or { "User", "Control", "Ban", "show", "ban
history", "by NICK" }
local ucmd_menu15 = lang.ucmd_menu15 or { "User", "Control", "Ban", "clear", "ban
history" }

local ucmd_time = lang.ucmd_time or "Time in minutes (default: %s)"


local ucmd_reason = lang.ucmd_reason or "Reason"

local lblNick = [Link] or " Nick: "


local lblCid = [Link] or " CID: "
local lblIp = [Link] or " IP: "
local lblReason = [Link] or " Reason: "
local lblBy = [Link] or " banned by: "
local lblTime = [Link] or " banned till: "

local msg_his_nick = lang.msg_his_nick or "Nick: "


local msg_his_ban = lang.msg_his_ban or "Ban #"
local msg_his_date = lang.msg_his_date or "Date: "
local msg_his_bantime = lang.msg_his_bantime or "Bantime: "
local msg_his_reason = lang.msg_his_reason or "Reason: "
local msg_his_by = lang.msg_his_by or "Banned by: "
local msg_his_state = lang.msg_his_state or "State: "
local msg_his_active = lang.msg_his_active or "active"
local msg_his_expired = lang.msg_his_expired or "expired"

local msg_out = lang.msg_out or [[

=== BANS
===================================================================================
==
%s
===================================================================================
== BANS ===
]]
local msg_out2 = lang.msg_out2 or [[

=== BAN HISTORY


===============================================================================
%s
=============================================================================== BAN
HISTORY ===
]]

--// msgs - unban


local help_title2 = lang.help_title2 or "cmd_ban.lua - Unban"
local help_usage2 = lang.help_usage2 or "[+!#]unban nick|cid|ip <NICK>|<CID>|<IP>"
local help_desc2 = lang.help_desc2 or "unbans user by NICK/CID/IP"

local msg_usage2 = lang.msg_usage2 or "Usage: [+!#]unban nick|cid|ip <NICK>|<CID>|


<IP>"
local msg_god2 = lang.msg_god2 or "You are not allowed to unban this user."
local msg_ok2 = lang.msg_ok2 or "[ UNBAN ]--> User: %s removed ban of: %s"

local ucmd_menu_ct1_1 = lang.ucmd_menu_ct1_1 or { "User", "Control", "Unban", "by


NICK" }
local ucmd_menu_ct1_2 = lang.ucmd_menu_ct1_2 or { "User", "Control", "Unban", "by
CID" }
local ucmd_menu_ct1_3 = lang.ucmd_menu_ct1_3 or { "User", "Control", "Unban", "by
IP" }

local ucmd_ip = lang.ucmd_ip or "IP:"


local ucmd_cid = lang.ucmd_cid or "CID:"
local ucmd_nick = lang.ucmd_nick or "Nick:"

----------
--[CODE]--
----------

local minlevel = [Link]( permission )


local minlevel2 = [Link]( permission2 )

local is_integer = function( num )


return num == [Link]( num )
end

local get_bantime = function( remaining )


if tostring( remaining ):find( "-" ) then
return remaining
else
local y, d, h, m, s = [Link]( remaining )
return y .. msg_years .. d .. msg_days .. h .. msg_hours .. m ..
msg_minutes .. s .. msg_seconds
end
end

local parsedate = function( date )


local str = tostring( date )
local Y, M, D = str:sub( 1, 4 ), str:sub( 5, 6 ), str:sub( 7, 8 )
local h, m, s = str:sub( 9, 10 ), str:sub( 11, 12 ), str:sub( 13, 14 )
return Y .. "-" .. M .. "-" .. D .. " / " .. h .. ":" .. m .. ":" .. s
end

local add = function( user, target, bantime, reason, script ) -- ban export
function
local key = #bans + 1
local user_firstnick, user_level
if user then
user_firstnick = user:firstnick()
user_level = user:level()
else
user_firstnick = ""
user_level = 60
end
local target_firstnick = target:firstnick()
local target_cid = target:cid()
local target_hash = target:hash()
local target_ip = target:ip()
if not script then script = user_firstnick end
for i, bantbl in ipairs( bans ) do
if [Link] == target_firstnick then
key = i
break
end
if [Link] == target_cid then
key = i
break
end
if [Link] == target_ip then
key = i
break
end
end
bans[ key ] = {
nick = target_firstnick,
cid = target_cid,
hash = target_hash,
ip = target_ip,
time = bantime,
start = [Link]( [Link]( "*t" ) ),
reason = reason,
by_nick = script,
by_level = user_level
}
local i
if type( history[ target_firstnick ] ) == "nil" then
history[ target_firstnick ] = {}
i = 1
else
i = #history[ target_firstnick ] + 1
end
history[ target_firstnick ][ i ] = { date = [Link](), reason = reason,
bantime = bantime, by_nick = script, start = [Link]( [Link]( "*t" ) ), }
[Link]( bans, bans_path )
[Link]( history, "history_tbl", history_path )
local target_msg = [Link]( msg_ban, script, reason ) ..
get_bantime( bantime )
target:kill( "ISTA 231 " .. [Link]( target_msg ) .. "\n", "TL" .. bantime
)
return PROCESSED
end

local del = function( target )


if target then
for i, ban_tbl in ipairs( bans ) do
if ban_tbl.nick == target then
[Link]( bans, i )
[Link]( bans, bans_path )
end
end
end
end

local addban = function( by, id, bantime, reason, level, nick, victim )
local key = #bans + 1
if not victim then
for i, bantbl in ipairs( bans ) do
if ( by == "nick" and [Link] == id ) then
key = i
break
elseif ( by == "cid" and [Link] == id and [Link] == "TIGR" )
then
key = i
break
elseif ( by == "ip" and [Link] == id ) then
key = i
break
end
end
end
bans[ key ] = {
nick = victim and victim:firstnick() or by == "nick" and id or "",
cid = victim and victim:cid() or by == "cid" and id or "",
hash = victim and victim:hash() or "TIGR",
ip = victim and victim:ip() or by == "ip" and id or "",
time = bantime,
start = [Link]( [Link]( "*t" ) ),
reason = reason,
by_nick = nick,
by_level = level
}
local n, i = victim and victim:firstnick() or by == "nick" and id or "", nil
if n ~= "" then
if type( history[ n ] ) == "nil" then
history[ n ] = {}
i = 1
else
i = #history[ n ] + 1
end
history[ n ][ i ] = { date = [Link](), reason = reason, bantime =
bantime, by_nick = nick, start = [Link]( [Link]( "*t" ) ), }
end
[Link]( bans, bans_path )
[Link]( history, "history_tbl", history_path )
end

local showbans = function()


local msg = ""
for i, banstbl in ipairs( bans ) do
local remaining = [Link] - [Link]( [Link](), [Link] )
msg = msg .. "\n [" .. i .. "]\n\t" ..
lblNick .. "\t" .. [Link] .. "\n\t" ..
lblCid .. "\t" .. [Link] .. "\n\t" ..
lblIp .. "\t" .. [Link] .. "\n\t" ..
lblReason .. "\t" .. [Link] .. "\n\t" ..
lblBy .. "\t" .. banstbl.by_nick .. "\n\t" ..
lblTime .. "\t" .. get_bantime( remaining ) .. "\n"
end
return [Link]( msg_out, msg )
end

local showhistory = function( hnick )


local msg, found = "", false
if hnick then
for k, v in [Link]( history ) do
if k == hnick then
found = true
msg = msg .. "\n" .. msg_his_nick .. k .. "\n"
for i, t in ipairs( v ) do
local remaining = [Link] - [Link]( [Link](), [Link] )
local state = msg_his_active
if tostring( remaining ):find( "-" ) then state =
msg_his_expired end
msg = msg .. "\n\t" .. msg_his_ban .. i .. ":\n" ..
"\t\t" .. msg_his_state .. state .. "\n" ..
"\t\t" .. msg_his_date .. parsedate( [Link] ) .. "\n" ..
"\t\t" .. msg_his_bantime .. get_bantime( [Link] ) ..
"\n" ..
"\t\t" .. msg_his_reason .. [Link] .. "\n" ..
"\t\t" .. msg_his_by .. t.by_nick .. "\n"
end
end
end
if not found then
return msg_off
end
return [Link]( msg_out2, msg )
else
for k, v in [Link]( history ) do
msg = msg .. "\n" .. msg_his_nick .. k .. "\n"
for i, t in ipairs( v ) do
local remaining = [Link] - [Link]( [Link](), [Link] )
local state = msg_his_active
if tostring( remaining ):find( "-" ) then state = msg_his_expired
end
msg = msg .. "\n\t" .. msg_his_ban .. i .. ":\n" ..
"\t\t" .. msg_his_state .. state .. "\n" ..
"\t\t" .. msg_his_date .. parsedate( [Link] ) .. "\n" ..
"\t\t" .. msg_his_bantime .. get_bantime( [Link] ) .. "\n"
..
"\t\t" .. msg_his_reason .. [Link] .. "\n" ..
"\t\t" .. msg_his_by .. t.by_nick .. "\n"
end
end
return [Link]( msg_out2, msg )
end
end
local cleanbans = function()
bans = {}
[Link]( bans, bans_path )
end

local cleanhistory = function()


history = {}
[Link]( history, "history_tbl", history_path )
end

local onbmsg = function( user, command, parameters )


local level = user:level( )
if level < minlevel then
user:reply( msg_denied, [Link]() )
return PROCESSED
end
local by, id = [Link]( parameters, "^(%S+) (%S+)" )
local mode = [Link]( parameters, "^(%S+)" )
local hnick = [Link]( parameters, "^%S+ (%S+)" )
local time = tonumber( [Link]( parameters, "^%S+ %S+ ([-]?%S+)" ) )
local reason = ( time and [Link]( parameters, "^%S+ %S+ [-]?%S+ (.*)" ) ) or
( ( time == nil ) and [Link]( parameters, "^%S+ %S+ (.*)" ) )
time = time or default_time
reason = reason or msg_reason
local bantime = time * 60
local usernick = [Link]( user:nick() )
local userfirstnick = [Link]( user:firstnick() )
if mode == "show" then
user:reply( showbans(), [Link]() )
return PROCESSED
end
if mode == "clear" then
if level < 100 then
user:reply( msg_denied, [Link]() )
return PROCESSED
end
cleanbans()
user:reply( msg_clean_bans .. user:nick(), [Link]() )
[Link]( report_activate, report_hubbot, report_opchat, llevel,
msg_clean_bans .. user:nick() )
return PROCESSED
end
-----------------------------------------------------------------------
if ( mode == "showhis" ) and hnick then
user:reply( showhistory( hnick ), [Link]() )
return PROCESSED
end
if mode == "showhis" then
user:reply( showhistory(), [Link]() )
return PROCESSED
end
-----------------------------------------------------------------------
if mode == "clearhis" then
if level < 100 then
user:reply( msg_denied, [Link]() )
return PROCESSED
end
cleanhistory()
user:reply( msg_clean_banhistory .. user:nick(), [Link]() )
[Link]( report_activate, report_hubbot, report_opchat, llevel,
msg_clean_banhistory .. user:nick() )
return PROCESSED
end

if not is_integer( time ) then


user:reply( msg_notint, [Link]() )
return PROCESSED
end
if not ( ( by == "sid" or by == "nick" or by == "cid" or by == "ip" ) and id )
then
user:reply( msg_usage, [Link]() )
return PROCESSED
end
local target = ( by == "nick" and [Link]( id ) ) or
( by == "sid" and [Link]( id ) ) or
( by == "cid" and [Link]( id ) ) or
( by == "ip" and [Link]( id ) )
if not target then
if by == "sid" then
user:reply( msg_off, [Link]() )
return PROCESSED
elseif by == "nick" then
local _, regnicks, _ = [Link]()
target = regnicks[ id ]
if not target then
user:reply( msg_off, [Link]() )
return PROCESSED
end
end
if [Link]( bantime, "-" ) then
user:reply( msg_usage, [Link]() )
return PROCESSED
else
addban( by, id, bantime, reason, level, userfirstnick, nil )
local message = [Link]( msg_ok, id, usernick,
get_bantime( bantime ), reason )
[Link]( report_activate, report_hubbot, report_opchat, llevel,
message )
user:reply( message, [Link]() )
return PROCESSED
end
end
if target:isbot() then
user:reply( msg_bot, [Link]() )
return PROCESSED
end
if permission[ level ] < target:level( ) then
user:reply( msg_god, [Link]() )
target:reply( [Link]( msg_ban_attempt, usernick, [Link]( reason
) ), [Link](), [Link]() )
return PROCESSED
end
local targetnick = target:nick()
-- This is special:
-- SID ban is with rightclick function so its good to assume its for online
user,
-- so lets ban by nick, cid, ip ( easier unbanning by nick as the only reason
really.. )
-- Otherwise its probobly better to respect the ban criteria since the user is
really
-- writing a command that spesifies only one ban criteria. (by Night)
local victim = nil
if by == "sid" then
victim = target
end
if [Link]( bantime, "-" ) then
user:reply( msg_usage, [Link]() )
return PROCESSED
else
addban( by, id, bantime, reason, level, userfirstnick, victim )
local message = [Link]( msg_ok, [Link]( targetnick ), usernick,
get_bantime( bantime ), reason )
[Link]( report_activate, report_hubbot, report_opchat, llevel, message
)
target:kill( "ISTA 230 " .. [Link]( message ) .. "\n", "TL" ..
bantime )
user:reply( message, [Link]() )
return PROCESSED
end
end

[Link]( "onBroadcast", {},


function( user, adccmd, txt )
local user_nick = user:nick()
local user_level = user:level()
local cmd = [Link]( txt, "^[+!#](%S+)" )
local by, id = [Link]( txt, "^[+!#]%S+ (%S+) (%S+)" )
if cmd == cmd2 then
if user_level < minlevel then
user:reply( msg_denied, [Link]() )
return PROCESSED
end
if not ( ( by == "ip" or by == "nick" or by == "cid" ) and id ) then
user:reply( msg_usage2, [Link]() )
return PROCESSED
end
for i, ban_tbl in ipairs( bans ) do
if ban_tbl[ by ] == id then
if permission2[ user_level ] < ( ban_tbl.by_level or 100 ) then
user:reply( msg_god2, [Link]() )
return PROCESSED
end
[Link]( bans, i )
[Link]( bans, bans_path )
local message = [Link]( msg_ok2, user_nick, id )
[Link]( report_activate, report_hubbot, report_opchat,
llevel, message )
user:reply( message, [Link]() )
return PROCESSED
end
end
user:reply( msg_off, [Link]() )
return PROCESSED
end
return nil
end
)

[Link]( "onConnect", {},


function( user )
local nick, cid, hash, ip = user:firstnick(), user:cid(), user:hash(),
user:ip()
local what, key, ban, message
for i, bantbl in ipairs( bans ) do
key = i
ban = bantbl
if [Link] == nick then
what = "nick"
break
elseif [Link] == cid and [Link] == hash then
what = "cid"
break
elseif [Link] == ip then
what = "ip"
break
end
end
if what then
if user:level() >= tonumber( ban.by_level ) then
[Link]( bans, key ) -- remove ban entry
[Link]( bans, bans_path ) -- save table
user:reply( [Link]( msg_ban_attempt, ban.by_nick, [Link] ),
[Link](), [Link]() ) -- and send info
return nil -- user can login without problems
end
--[[
local remaining, bantime, banstart = nil, tonumber( [Link] ),
tonumber( [Link] )
if bantime < 0 then
remaining = 1 -- ban 1 sec forever ^^
else
remaining = bantime - [Link]( [Link](), banstart )
end
if remaining > 0 then
local message
if remaining == 1 then
message = [Link]( msg_ban, ban.by_nick, [Link] ) ..
msg_forever
user:kill( "ISTA 231 " .. [Link]( message ) .. "\n", "TL-
1" )
return PROCESSED
else
message = [Link]( msg_ban, ban.by_nick, [Link] ) ..
get_bantime( remaining )
user:kill( "ISTA 231 " .. [Link]( message ) .. "\n", "TL"
.. remaining )
return PROCESSED
end
else
[Link]( bans, key )
[Link]( bans, bans_path )
end
]]
local remaining = [Link] - [Link]( [Link](), [Link] )
if [Link]( remaining, "-" ) then
[Link]( bans, key )
[Link]( bans, bans_path )
else
message = [Link]( msg_ban, ban.by_nick, [Link] ) ..
get_bantime( remaining )
-- remember: never fire listenter X inside listener X; will cause
infinite loop
-- also: never fire listener X in listener Y, where listener Y
fires listener X; will as well cause a infinite loop.
--[Link]( "onFailedAuth", user:nick( ), user:ip( ),
user:cid( ), "Banned for " .. get_bantime( remaining ) .. " (" .. [Link] ..
")" ) -- todo: i18n
user:kill( "ISTA 231 " .. [Link]( message ) .. "\n", "TL" ..
remaining )
return PROCESSED
end
end
return nil
end
)

[Link]( "onStart", {},


function( )
help = [Link]( "cmd_help" )
if help then
[Link]( help_title, help_usage, help_desc, minlevel )
[Link]( help_title2, help_usage2, help_desc2, minlevel2 )
end
ucmd = [Link]( "etc_usercommands" )
if ucmd then
local ucmd_time = [Link]( ucmd_time, default_time )
-- ban
[Link]( ucmd_menu9, cmd, { "nick", "%[line:User Nick]", "%[line:" ..
ucmd_time .. "]", "%[line:" .. ucmd_reason .. "]" }, { "CT1" }, minlevel )
[Link]( ucmd_menu10, cmd, { "cid", "%[line:User CID]", "%[line:" ..
ucmd_time .. "]", "%[line:" .. ucmd_reason .. "]" }, { "CT1" }, minlevel )
[Link]( ucmd_menu11, cmd, { "ip", "%[line:User IP]", "%[line:" ..
ucmd_time .. "]", "%[line:" .. ucmd_reason .. "]" }, { "CT1" }, minlevel )
[Link]( ucmd_menu12, cmd, { "show" }, { "CT1" }, minlevel )
[Link]( ucmd_menu13, cmd, { "clear" }, { "CT1" }, 100 )
[Link]( ucmd_menu14, cmd, { "showhis" }, { "CT1" }, minlevel )
[Link]( ucmd_menu16, cmd, { "showhis", "%[line:User Nick]" }, { "CT1"
}, minlevel )
[Link]( ucmd_menu15, cmd, { "clearhis" }, { "CT1" }, 100 )

[Link]( ucmd_menu1, cmd, { "sid", "%[userSID]", "60", "%[line:" ..


ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 1 hour
[Link]( ucmd_menu2, cmd, { "sid", "%[userSID]", "120", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 2 hours
[Link]( ucmd_menu3, cmd, { "sid", "%[userSID]", "360", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 6 hours
[Link]( ucmd_menu4, cmd, { "sid", "%[userSID]", "720", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 12 hours
[Link]( ucmd_menu5, cmd, { "sid", "%[userSID]", "1440", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 1 day
[Link]( ucmd_menu6, cmd, { "sid", "%[userSID]", "2880", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 2 days
[Link]( ucmd_menu7, cmd, { "sid", "%[userSID]", "10080", "%[line:" ..
ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 1 week
[Link]( ucmd_menu7_1, cmd, { "sid", "%[userSID]", "40320", "%
[line:" .. ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 1 month
[Link]( ucmd_menu7_2, cmd, { "sid", "%[userSID]", "241920", "%[line:"
.. ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 6 month
[Link]( ucmd_menu7_3, cmd, { "sid", "%[userSID]", "525600", "%[line:"
.. ucmd_reason .. "]" }, { "CT2" }, minlevel ) -- 1 year
[Link]( ucmd_menu8, cmd, { "sid", "%[userSID]", "%[line:" ..
ucmd_time .. "]", "%[line:" .. ucmd_reason .. "]" }, { "CT2" }, minlevel )
-- unban
[Link]( ucmd_menu_ct1_1, cmd2, { "nick", "%[line:" .. ucmd_nick ..
"]" }, { "CT1" }, minlevel2 )
[Link]( ucmd_menu_ct1_2, cmd2, { "cid", "%[line:" .. ucmd_cid ..
"]" }, { "CT1" }, minlevel2 )
[Link]( ucmd_menu_ct1_3, cmd2, { "ip", "%[line:" .. ucmd_ip .. "]" },
{ "CT1" }, minlevel2 )
end
hubcmd = [Link]( "etc_hubcommands" )
assert( hubcmd )
assert( [Link]( cmd, onbmsg ) )
return nil
end
)

[Link]( "** Loaded " .. scriptname .. " " .. scriptversion .. " **" )

--// public //--

return { -- export bans

add = add, -- use ban = [Link]( "cmd_ban"); [Link]( user, target,


bantime, reason, script ) in other scripts to ban a user (bantime = seconds)
del = del, -- use ban = [Link]( "cmd_ban"); [Link]( target ) in other
scripts to unban a user
bans = bans,
bans_path = bans_path,

Common questions

Powered by AI

Default values in the script play the role of setting a baseline for the duration of bans when specific input is absent or ambiguous. These default timings, like the default number of minutes for a ban, are formatted and incorporated into command execution to maintain uniformity across operations. Default values ensure that a ban duration is applied even if the user does not provide a specific time frame .

User commands are structured in a precise format that requires specific inputs such as 'nick', 'cid', or 'ip' for targeting users, and explicit detailing of ban durations and reasons. This fine-tuning prevents vague or incorrect usage, as commands must match exact patterns and provide necessary parameters to be processed. Error messages and usage hints are built-in to guide users, preventing misuse and maintaining clarity in communication with the system .

The system balances flexibility by allowing bans to be administered across various identifiers like 'nick', 'cid', 'ip', and 'sid', each facilitating different management needs. Security is maintained by ensuring a user's permission level meets or exceeds the minimum requirements for executing these bans. Additionally, the system carefully checks criteria before proceeding with a ban or unban, minimizing misuse and ensuring only authorized users can alter ban statuses .

The system uses specific commands to distinguish different types of user bans, such as banning by 'sid', 'nick', 'cid', or 'ip'. This distinction allows the system to target specific online users for banning through right-click functions, making it easier to manage bans. For SID bans in particular, the assumption is made that the SID pertains to an online user, which simplifies the unbanning process by primarily relying on the user's nick .

The script handles invalid ban inputs by terminating the process and providing a responsive message to the user highlighting the misuse, thus preventing the application of invalid or unintended bans. The ramifications of detecting an invalid input include halting the execution of the banning process, issuing a usage message, and maintaining system integrity by avoiding incorrect entries in the ban list .

Mechanisms such as detailed message formatting and reporting functions ensure accurate logging of ban actions within the script. Each execution of a ban or unban is followed by a formatted message that includes details about the action, such as the user performing the action and the duration or reason for the ban. These logs are sent across reporting channels, facilitating comprehensive records for administrative review and audits .

The script ensures ban commands target the correct users by evaluating specific criteria such as 'sid', 'nick', 'cid', or 'ip' provided in the command. It checks whether the identifiers correspond to online users using functions like hub.isnickonline or hub.issidonline, and verifies further with user details like level and registration status. This thorough validation prevents misapplication of ban commands .

A user is denied the ability to unban another user if their permission level is lower than required or if it is explicitly programmed that they cannot unban a specific user. The system checks the user's level against the ban's level or the minimum unban permission level. If the user lacks sufficient permissions, the system responds with a denial message, emphasizing that the user does not have the necessary authority .

Using a modular approach to implementing bans and unbans offers several advantages, such as improved manageability, adaptability, and scalability. Each function related to banning and unbanning operates independently but cohesively, allowing for easier updates and maintenance. This modularity facilitates customizable security policies and enhances reliability by reducing interdependencies between commands. Consequently, the system remains robust and less prone to errors, improving overall functionality and responsiveness to administrative demands .

The system dynamically checks each ban entry upon user connection to see if the ban has expired based on current time against the ban's start time and duration. If a ban is found to be expired, the system removes the entry from the ban list and updates the ban records using util.savearray, ensuring the ban no longer affects user access. This prevents expired bans from remaining active past their intended duration .

You might also like