egghelp/eggheads community

devoice on ban

2020-07-20T08:38:11-04:00

tnx crazycat

Statistics: Posted by simo — Mon Jul 20, 2020 8:38 am

devoice on ban

2020-07-20T08:31:49-04:00

bind mode - "* +b" devoice-bans

proc devoice-ban {nick uhost hand chan mc ban} {

Use same name in bind and proc.

And when you have an error, use .set errorInfo to have more information.

Statistics: Posted by CrazyCat — Mon Jul 20, 2020 8:31 am

devoice on ban

2020-07-20T08:36:56-04:00

fixed the errors seems to be working proper now thnx CrazyCat and Caesar
much apreciated

this is what i have as end result:

Code:

bind mode - "* +b" devoice-banproc devoice-ban {nick uhost hand chan mc ban} {   if {[isbotnick $nick] || ![botisop $chan]} returnif { [string first ":" $ban] != -1 } {   set ban [lindex [split $ban ":"] 1]}   foreach user [chanlist $chan] {      if {[isbotnick $user] || ![isvoice $user $chan]} continue      if {[isop $user $chan] || [ishalfop $user $chan]} continue      if {[matchattr [nick2hand $user] fnmo|fnmo $chan]} continue      if {![string match -nocase $ban $user![getchanhost $user $chan]]} continue      pushmode $chan -v $user   }   flushmode $chan}

Statistics: Posted by simo — Mon Jul 20, 2020 8:30 am

devoice on ban

2020-07-20T08:24:40-04:00

took the error out this is what i got atm:

Code:

bind mode - "* +b" devoice-bansproc devoice-ban {nick uhost hand chan mc ban} {   if {[isbotnick $nick] || ![botisop $chan]} return   foreach user [chanlist $chan] {      if {[isbotnick $user] || ![isvoice $user $chan]} continue      if {[isop $n $chan] || [ishalfop $user $chan]} continue      if {[matchattr [nick2hand $user] fnmo|fnmo $chan]} continue      if {![string match -nocase $ban $user![getchanhost $user $chan]]} continue      pushmode $chan -v $user   }   flushmode $chan}

noting happens tho it doesnt devoice

Statistics: Posted by simo — Mon Jul 20, 2020 8:24 am

devoice on ban

2020-07-20T08:08:58-04:00

i tried your proc caesar :

Code:

bind mode - "* +b" devoice-bansproc devoice-ban {nick uhost hand chan mc ban} {   if {[isbotnick $nick] || ![botisop $chan]} return   foreach user [chanlist $chan] {      if {[isbotnick $user] || ![isvoice $user $chan]} continue      if {[isop $n $chan] || [ishalfop $user $chan]} continue      if {[matchattr [nick2hand $user] fnmo|fnmo $chan]}} continue      if {![string match -nocase $ban $user![getchanhost $user $chan]]} continue      pushmode $chan -v $user   }   flushmode $chan}

and got this error:

Error loading script 'test.tcl': can't read "chan": no such variable

Statistics: Posted by simo — Mon Jul 20, 2020 8:08 am

devoice on ban

2020-07-20T06:54:58-04:00

Use continue instead of return inside a loop.

Didn't see that, caesar is right.
If the user has clones, you will only devoice the first seen, not the others.

Statistics: Posted by CrazyCat — Mon Jul 20, 2020 6:54 am

devoice on ban

2020-07-20T07:17:36-04:00

Use continue instead of return inside a loop.

And you should loop over the channel user list you should skip those that don't have voice in the first place and then do the matching and whatnot.

Apart this I see this:

Code:

if {[isbotnick $nick] || ![botisop $chan]} { return }

and then again in the loop:

Code:

if {![botisop $chan]} { return 0 }

Your loop should make more sense like:
- if the user is bot OR the user isn't voiced continue with the next user in the chanlist
- if the user is channel operator or halfop continue with the next user in the chanlist
- if the user has fnmo|fnmo continue with the next user in the chanlist
- if the host doesn't match user's host continue with the next user in the chanlist
- else devoice the user

Code:

proc devoice-ban {nick uhost hand chan mc ban} {if {[isbotnick $nick] || ![botisop $chan]} returnforeach user [chanlist $chan] {if {[isbotnick $user] || ![isvoice $user $chan]} continueif {[isop $n $chan] || [ishalfop $user $chan]} continueif {[matchattr [nick2hand $user] fnmo|fnmo $chan]}} continueif {![string match -nocase $ban $user![getchanhost $user $chan]]} continuepushmode $chan -v $user}flushmode $chan}

Edit: fixed a typo and pushed the host check last.

Statistics: Posted by caesar — Mon Jul 20, 2020 6:42 am

devoice on ban

2020-07-20T04:58:23-04:00

excellent that seems to do the trick flawlessly
thnx CrazyCat

Statistics: Posted by simo — Mon Jul 20, 2020 4:58 am

devoice on ban

2020-07-20T04:03:37-04:00

the $ban string contains "m:", so it will never match.
You'll have to adapt the $ban string if needed:

Code:

if { [string first ":" $ban] != -1 } {   set ban [lindex [split $ban ":"] 1]}

Statistics: Posted by CrazyCat — Mon Jul 20, 2020 4:03 am

devoice on ban

2020-07-20T02:19:38-04:00

hey there i was using this to have it check if a banned user is voiced to devoice
in the case of a normal ban like +b nick!ident@host it works fine
but on some servers it has extended bans like

muteban: +b ~q:nick!ident@host

or

muteban: +b m:nick!ident@host

is there a way to have it check for all these scenarios and devoice if banned nick has voice

using this at the moment:

Code:

bind mode - "* +b" devoice-banproc devoice-ban {nick uhost hand chan mc ban} {  if {[isbotnick $nick] || ![botisop $chan]} { return } foreach n [chanlist $chan] {  if {[string match -nocase $ban $n![getchanhost $n $chan]]} { if {![botisop $chan]} { return 0 }    if {[isop $n $chan]} { return 0 }    if {[ishalfop $n $chan]} { return 0 }    if {[matchattr [nick2hand $n] fnmo|fnmo $chan]} { return 0 }    if {[isbotnick $n]} { return 0}   if {[isvoice $n $chan] && ![isop $n $chan] && ![ishalfop $n $chan] && ![matchattr [nick2hand $n] fnmo|fnmo $chan]} { pushmode $chan -v $n }  } } flushmode $chan}

heres an example of what happens:

this devoices as well:
09:20:44 +[simo] Sets Mode on #opers to: +b *!*@33.34.104.17
09:20:45 @TCL-Tester Sets Mode on #opers to: -v Peachey

this doesnt devoice while nick is voiced
09:21:18 +[simo] Sets Mode on #opers to: +b m:*!*@33.34.104.17

thnx in advance gents.

Statistics: Posted by simo — Mon Jul 20, 2020 2:19 am