Gogoasa Advanced Ban List Manager v1.0

[Adrenalin]

This script is used on a channel(100+) more than 1 year.
Decided today to release it to public, maybe someone can use it to make something better.

About the script:

On Undernet for example channel ban list is limited to 45 bans so channels with high amount of bans to set new bans need to remove periodically old bans from the list.

When the ban list are not too loaded with bans, expiration time is higher, when there's more bans, expiration time of a ban is lower.

There's is 3 levels of ban list load, for each you can define after how much time a ban will be removed from the channel ban list.

If a ban arrive into ban list too frequently, it being sticky.

If there's too many bans and no one can be removed (because they are too young), the secure +mi flags are setted.
--
Download.
--

Sended this script some hours ago to http://www.egghelp.org/tcl.htm, hope it will be accepted.

[rosc2112]

Not bad! If I can make one comment, I see no reason the script could not handle more than 1 channel, simply use a 'foreach' in your proc unbaned_list_cleaner

eg:

Code: Select all

    global unbanCheckChan
    foreach channel $unbanCheckChan {
          rest of proc
    }
}

[Adrenalin]

Oops, there seem to be some code not from this script