but you can easily implement it yourself by extending the spam detection regexp in proc handler:
Code: Select all
if {[regexp {(?i)(http://|www\.|irc\.|\s#\w|^#\w|\001DCC)} $text]} {
Code: Select all
if {[regexp {(?i)(http://|www\.|irc\.|\s#\w|^#\w|\001DCC)} $text]} {
Code: Select all
tag when posting logs, code
Code: Select all
if {$len > 3 && 100*$n/$len >= $pct} {
punish $nick $uhost $hand $chan caps
}
Code: Select all
tag when posting logs, code
Code: Select all
[19:03] Creating x:limit:slack (type 2)
[19:03] Creating x:caps:percent (type 2)
[19:03] Creating x:bad:file (type 3)
[19:03] * Last context: tclhash.c/684 [Tcl proc: source $::xchannel::script;#, param: $_event1]
[19:03] * Please REPORT this BUG!
[19:03] * Check doc/BUG-REPORT on how to do so.
[19:03] * Wrote DEBUG
[19:03] * SEGMENT VIOLATION -- CRASHING!
Segmentation fault (core dumped)
addamorpheous wrote:I would really like a fix for the above bug.
Code: Select all
return 0
1) I've no ideaMausam wrote:1.) Does anybody still use it? I see this thread hasn't had a post in a long time....
2.) How long is the offense period, before it resets? That is, in the w,k.b sequence, if a channel user gets kicked, how much time must go by with no more offenses, for this user to be back to the beginning of the sequence, and on his next offense get a warning, and not a ban?
Nice! I didn't ask this, but was sure glad to see you'd replied to it!user wrote:addamorpheous wrote:I would really like a fix for the above bug.as the last line within the proc called "mass" (line 520 in version 4.2)Code: Select all
return 0
EDIT: you may have to add it to the end of the proc named "punish" too (line 430)
I will have to experiment, I think - to try to figure out what time applies to which controls.1) I've no ideaMausam wrote:1.) Does anybody still use it? I see this thread hasn't had a post in a long time....
2.) How long is the offense period, before it resets? That is, in the w,k.b sequence, if a channel user gets kicked, how much time must go by with no more offenses, for this user to be back to the beginning of the sequence, and on his next offense get a warning, and not a ban?
2) I'm not familiar with the script, so I have no idea what these 4 things are, but the expiration times (in minutes) seem to be:
offenses: 720, repeats: 5, clones: 60, whoises: 240 (at line 174 in version 4.2)
(PS: I just skimmed the code (i didn't run it), so there could be things i missed)
Add "return 0" to the end of the following procs:willyw wrote:I've tried what you've said.
It does not work, 100%.
Unfortunately, bot computer is down for hw changes, etc. Hopefully it will be back up in a day or two. Looking forward to making those changes then, plus anything else you come up with in the mean time.user wrote:Add "return 0" to the end of the following procs:willyw wrote:I've tried what you've said.
It does not work, 100%.
punish (line 430), clone (line 458), repeat (line 484) and mass (line 520) ... I'm too tired to read the rest of the script to make more sense of the timing stuff right now...let's hope I at least solved the logging problem
Code: Select all
.chanset #MyChannel+x:pspam
Successfully set modes { +x:pspam } on #MyChannel.
.chanset #MyChannelx:pspam:cycle 10
Successfully set modes { x:pspam:cycle { 10 } } on #MyLair.
Code: Select all
Tcl error [::xchannel::timer]: DNS lookup failed
Code: Select all
Currently: DNS lookup failed
Currently: while executing
Currently: "connect $server $port"
Currently: (procedure "::xchannel::timer" line 13)
Currently: invoked from within
Currently: "::xchannel::timer $_time1 $_time2 $_time3 $_time4 $_time5"
Code: Select all
Currently: can't unset "idx": no such variable
Currently: while executing
Currently: "unset idx"