egghelp/eggheads community

about bind flud

2021-04-25T03:15:32-04:00

ok, thanks CrazyCat

I read this thread

very well explained

Statistics: Posted by geek — Sun Apr 25, 2021 3:15 am

about bind flud

2021-04-24T18:05:37-04:00

It's normal. You create an anonymous procedure, so variables from the main proc which are not global are unknown from it.

You'd better create a proc "unlock" and call it from utimer whith the relevant arguments ($chan) to get ride of this trouble

Statistics: Posted by CrazyCat — Sat Apr 24, 2021 6:05 pm

about bind flud

2021-04-24T13:20:18-04:00

thanks CrazyCat

your code resolve error 1) but still have error 2) can't read "chan": no such variable

edit:

it's VERY VERY strange

if I use:

Code:

 utimer $unlocktime { set islock 0 } utimer $unlocktime [list putquick "MODE $chan -$joinlockmodes"]

works!

Statistics: Posted by geek — Sat Apr 24, 2021 1:20 pm

about bind flud

2021-04-24T12:59:48-04:00

You'd better not unset islock and have it global:

Code:

set joinlockmodes "i" # eggdrop will unlock the channel after the specified time in seconds you will set belowset unlocktime "60" # set the reason you wantset jreason "test test" set islock 0 bind flud - join joinflood:mytest proc joinflood:mytest {nick uhost hand type chan} {   global joinlockmodes unlocktime jreason botnick islock   if {![botisop $chan] || [matchattr $hand "of|of" $chan]} { return 0 }   if { $islock < 1 } {      putquick "MODE $chan +$joinlockmodes"      set islock 1   }   set banmask "*!*@[lindex [split $uhost @] 1]"   # set banmask "*!*@[lindex [split [maskhost $uhost] "@"] 1]"   putquick "MODE $chan +b $banmask"   # putquick "KICK $chan $nick $jreason"   utimer $unlocktime {      set islock 0      if {[string match *i* [lindex [split [getchanmode $chan]] 0]]} {         [list putquick "MODE $chan -$joinlockmodes"]      }   }   return 1}

Statistics: Posted by CrazyCat — Sat Apr 24, 2021 12:59 pm

about bind flud

2021-04-24T12:40:40-04:00

Try this

Code:

...    set islock 1    if { $islock < 1 } {...

this can't work :)

Statistics: Posted by geek — Sat Apr 24, 2021 12:40 pm

about bind flud

2021-04-24T12:04:20-04:00

Try this

Code:

set joinlockmodes "i" # eggdrop will unlock the channel after the specified time in seconds you will set belowset unlocktime "60" # set the reason you wantset jreason "test test"  bind flud - join joinflood:mytest proc joinflood:mytest {nick uhost hand type chan} {    global joinlockmodes unlocktime jreason botnick    if {![botisop $chan] || [matchattr $hand "of|of" $chan]} { return 0 }    set islock 1    if { $islock < 1 } {        putquick "MODE $chan +$joinlockmodes"    }    set banmask "*!*@[lindex [split $uhost @] 1]"#   set banmask "*!*@[lindex [split [maskhost $uhost] "@"] 1]"    putquick "MODE $chan +b $banmask"#   putquick "KICK $chan $nick $jreason"    utimer $unlocktime {        unset islock        if {[string match *i* [lindex [split [getchanmode $chan]] 0]]} {            putquick "MODE $chan -$joinlockmodes"        }    }     return 1}

Statistics: Posted by ComputerTech — Sat Apr 24, 2021 12:04 pm

about bind flud

2021-04-24T11:33:50-04:00

I write this:

Code:

set joinlockmodes "i" # eggdrop will unlock the channel after the specified time in seconds you will set belowset unlocktime "60" # set the reason you wantset jreason "test test"  bind flud - join joinflood:mytest proc joinflood:mytest {nick uhost hand type chan {islock 0}} {    global joinlockmodes unlocktime jreason botnick    if {![botisop $chan] || [matchattr $hand "of|of" $chan]} { return 0 }    if { $islock < 1 } {        putquick "MODE $chan +$joinlockmodes"        set islock 1    }    set banmask "*!*@[lindex [split $uhost @] 1]"#   set banmask "*!*@[lindex [split [maskhost $uhost] "@"] 1]"    putquick "MODE $chan +b $banmask"#   putquick "KICK $chan $nick $jreason"    utimer $unlocktime {        unset islock        if {[string match *i* [lindex [split [getchanmode $chan]] 0]]} {            [list putquick "MODE $chan -$joinlockmodes"]        }    }     return 1}

lock works fine but I got two errors when it try to execute utimer:
1) Tcl error in script for 'timer': can't unset "islock": no such variable
2) Tcl error in script for 'timer': can't read "chan": no such variable

how can i fix it?

Statistics: Posted by geek — Sat Apr 24, 2021 11:33 am

Re: about bind flud

2021-04-24T08:37:14-04:00

...
what is the normal punishment?
...

I think it is kick only.

As to whether even that is on or off - and if on, the config - do:
.chaninfo #channel
in the partyline and see the flood settings at the bottom of the info returned.

Statistics: Posted by willyw — Sat Apr 24, 2021 8:37 am

about bind flud

2021-04-24T07:18:10-04:00

thanks @ComputerTech

Statistics: Posted by geek — Sat Apr 24, 2021 7:18 am

about bind flud

2021-04-24T03:56:46-04:00

Yeah, you need return 1 to prevent the "normal punishments"

Read more on bind flud here
https://docs.eggheads.org/mainDocs/tcl-commands.html

Code:

bind FLUD - join jo:inproc jo:in {nick host hand type chan} {  if {![botisop $chan] || [matchattr $hand ofmn|ofmn]} {return}      set banmask "*!*@[lindex [split $host @] 1]"         newchanban $chan $banmask $::botnick flood            putquick "KICK $chan $nick flood"            putquick "MODE $chan +i"                   utimer 90 [list putquick "MODE $chan -i"]            return 1}

Statistics: Posted by ComputerTech — Sat Apr 24, 2021 3:56 am

about bind flud

2021-04-24T03:42:19-04:00

I read the documentation about this kind of bind

I have two questions:

1) "if the proc returns 0, the bot will do its normal punishment for the flood"
what is the normal punishment? ban+kick maybe?

2) I would like add an additional behavior to normal punishment, I want set the channel +i
how can I write this tcl?

I think something like:

Code:

bind flud - join mytestproc mytest {nick uhost hand type chan} {if {![botisop $chan] || [matchattr $hand "of|of" $chan]} { return 0 }#set banmask "*!*@[lindex [split $uhost @] 1]"#newchanban $chan $banmask $botnick flood#putquick "KICK $chan $nick flood"putquick "MODE $chan +i"utimer 90 [list putquick "MODE $chan -i"]  return 0}

it's correct?
and with this code the channel is set +i every time for every bad user in flood? or only once?
and if I want to overwrite eggdrop default behavior, can I uncomment ban and kick line, and set return 1? right?

Statistics: Posted by geek — Sat Apr 24, 2021 3:42 am