AllProtection.tcl (Stable: v4.8 / Beta: v4.9b4)

Post by **Sir_Fz** » Sun Nov 14, 2010 2:04 pm

Unfortunately there's no exempts-list for clones protection. You can, however, add the following check in the "clones"-clause of procedure joins which would look like this:

Code: Select all

...
"clones" {
 variable eclones  
 if {![string is integer $off] || $off <= 0} {return 0}
 # Add this line (make sure you modify it with your host)
 if {[string match -nocase *@yourhost.net $uhost]} {continue}
 set c 0
 foreach ccheck [chanlist $chan] {
 ...

hotcaps · Post by **hotcaps** » Mon Nov 22, 2010 5:50 pm

Why I get this error when i load the script?
im newbie pls help me..

Code: Select all

Debug (eggdrop v1.6.20) written Mon Nov 22 23:35:28 2010
Full Patch List: 
Tcl library: /usr/local/lib/tcl8.5
Tcl version: 8.5.6 (header version 8.4.9)
Compile flags: gcc -g -O2 -pipe -Wall -I.. -I.. -DHAVE_CONFIG_H  
Link flags: gcc
Strip flags: touch
Context: tclhash.c/721, []
         tclhash.c/706, []
         tclhash.c/710, [Tcl proc: *raw:PING, param:  $_raw1 $_raw2 $_raw3]
         tclhash.c/721, []
         tclhash.c/706, []
         tclhash.c/710, [Tcl proc: <null>, param:  $_raw1 $_raw2 $_raw3]
         tclhash.c/721, []
         tclhash.c/706, []
         tclhash.c/710, [Tcl proc: *raw:PONG, param:  $_raw1 $_raw2 $_raw3]
         tclhash.c/721, []
         tclhash.c/706, []
         tclhash.c/710, [Tcl proc: <null>, param:  $_raw1 $_raw2 $_raw3]
         tclhash.c/721, []
         tclhash.c/706, []
         tclhash.c/710, [Tcl proc: *dcc:rehash, param:  $_dcc1 $_dcc2 $_dcc3]
         tclhash.c/721 []

Diamond85 · Post by **Diamond85** » Sun Nov 28, 2010 10:04 am

channel:
28/11/10 14:36:30 test3 [Diamond85@n40.05n.5m1c0p.IP] heißt nun hure
28/11/10 14:36:31 <@EggDrop> hure : Warning! you are using a bad nick, type /nick <nick> to change it.

dcc settings:
28/11/10 14:38:59 <EggDrop> ap:bnicks: {+ 360 w:k:kb 11}

code:

Code: Select all

# Use .chanset #channel ap:bnicks + <btime> <pmeth> <btype> (in DCC to enable)

# Set default value here: (+ enabled, - disabled)

lappend ap:udefs {ap:bnicks "- 360 w:k:kb 11"}



set bnicks(global) {

}



set bnick(kmsg) "Bad nick detected. \[%date\] (Banned %btime min) \[%kcount\]"



set bnick(wmsg) "Warning! you are using a bad nick, type /nick <nick> to change it."



set bnick(caw) 60



## Edit the following only if you choose a punish method above 5 (oper commands):



set bnick(ktype) 2



set bnick(klmsg) "Bad nicks are not allowed on this network."



set bnick(ktime) 0

dcc error message:
28/11/10 14:37:30 <EggDrop> [14:37:30] Tcl error in script for 'timer87479':
28/11/10 14:37:30 <EggDrop> [14:37:30] wrong # args: should be "::AllProtection::pubms flood nick uhost hand chan arg"

can you help me please.
or tell me what I need to change to make it work properly?

Post by **Sir_Fz** » Fri Dec 03, 2010 5:59 pm

Diamond85 wrote:dcc error message:
28/11/10 14:37:30 <EggDrop> [14:37:30] Tcl error in script for 'timer87479':
28/11/10 14:37:30 <EggDrop> [14:37:30] wrong # args: should be "::AllProtection::pubms flood nick uhost hand chan arg"

Looks like you're not using the latest version? As far as I can see, this error wouldn't occur if you're using the latest version. Please upgrade to v4.6b9.

Diamond85 · Post by **Diamond85** » Sun Dec 05, 2010 10:42 am

Sir_Fz wrote:Looks like you're not using the latest version? As far as I can see, this error wouldn't occur if you're using the latest version. Please upgrade to v4.6b9.

Sir_Fz I've been using many months of the current beta version!

Look after your time but if you can find a solution so that I can use the Warn badnicks.

Bhola420 · Post by **Bhola420** » Sun Dec 05, 2010 9:36 pm

i dont know how to figure this all

help me out, i loaded AllProtection v4.6b9 by Opposing and .rehash my eggdro, then with an other nick i flooded my own Channel, and i got following instead of kick, help me. am new to all this. DALnet user. thx in advance

Code: Select all

<Sipahi> [16:49:54] Rehashing ...
<Sipahi> [16:49:54] Listening at telnet port 4***1 (all).
<Sipahi> [16:49:54] Userinfo TCL v1.07 loaded (URL BF GF IRL EMAIL DOB PHONE ICQ).
<Sipahi> [16:49:54] use '.help userinfo' for commands.
<Sipahi> [16:49:54] auto identify to nickserv tcl is loaded - #AnyChannel
<Sipahi> [16:49:54] [LOADED] ChanServ Auto Reop Script  #AnyChannel
<Sipahi> [16:49:54] *ENABLED* Auto Reop for Sipahi on: #AnyChannel
<Sipahi> [16:49:54] [b]AllProtection v4.6b9 by Opposing Loaded...[/b]
<Sipahi> [16:49:54] Userfile loaded, unpacking...
<Sipahi> [16:50:00] @#AnyChannel (+tMn) : [m/40 o/5 h/0 v/10 n/25 b/0 e/- I/-]
<Sipahi> [16:50:24] Tcl error [btext:chars]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [repeat:kick]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [caps:kick]: can't read "p": no such variable
<Sipahi> [16:50:24] Tcl error [text:char]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [text:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:chars]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [repeat:kick]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [caps:kick]: can't read "p": no such variable
<Sipahi> [16:50:24] Tcl error [text:char]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [text:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:chars]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [repeat:kick]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [caps:kick]: can't read "p": no such variable
<Sipahi> [16:50:24] Tcl error [text:char]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [text:line]: can't read "o": no such variable
<Sipahi> [16:50:24] Tcl error [btext:chars]: can't read "o": no such variable

Post by **Sir_Fz** » Fri Dec 10, 2010 12:33 pm

Diamond85 wrote:Sir_Fz I've been using many months of the current beta version!

Look after your time but if you can find a solution so that I can use the Warn badnicks.

Please paste the output of '.set errorInfo' (from partyline) so I can have more details about the error.

Post by **Sir_Fz** » Fri Dec 10, 2010 12:35 pm

Bhola420 wrote:i dont know how to figure this all help me out, i loaded AllProtection v4.6b9 by Opposing and .rehash my eggdro, then with an other nick i flooded my own Channel, and i got following instead of kick, help me. am new to all this. DALnet user. thx in advance

The errors you pasted are not from v4.6, your Eggdrop is still using v4.5 (and you have invalid configurations in the script causing it to throw an error). Please make sure you have the correct version (4.6b9) loaded and .restart your eggdrop.

Diamond85 · Post by **Diamond85** » Sun Dec 12, 2010 4:52 pm

Sir_Fz wrote:.set errorInfo

partyline:
12/12/10 21:42:50 Diamond85 .ap:add bnicks global *bitch*
12/12/10 21:42:50 }[-_-]{ AP: Succesfully added *bitch* to global bnicks list.

12/12/10 21:43:06 }[-_-]{ [21:43:06] AP: Warned bitch on #bestircd: Warning! you are using a bad nick, type /nick <nick> to change it.

12/12/10 21:44:05 }[-_-]{ [21:44:05] Tcl error in script for 'timer238':
12/12/10 21:44:06 }[-_-]{ [21:44:05] wrong # args: should be "::AllProtection::pubms flood nick uhost hand chan arg"

12/12/10 21:44:09 Diamond85 .set errorInfo
12/12/10 21:44:09 }[-_-]{ [21:44:09] #Diamond85# set errorInfo
12/12/10 21:44:10 }[-_-]{ Currently: wrong # args: should be "::AllProtection::pubms flood nick uhost hand chan arg"
12/12/10 21:44:10 }[-_-]{ Currently: while executing
12/12/10 21:44:10 }[-_-]{ Currently: "::AllProtection::pubms bnicks bitch teeest@e9u.hko.ri3lnn.IP * #bestircd"

chan:
12/12/10 21:43:06 ( N ) Nickname: teeest (teeest@e9u.hko.ri3lnn.IP) changed his nickname to: bitch
12/12/10 21:43:06 (@}[-_-]{) bitch : Warning! you are using a bad nick, type /nick <nick> to change it.

chanset:
12/12/10 21:56:01 }[-_-]{ ap:bnicks: {+ 360 w:k:kb 11}

speechles · Post by **speechles** » Sun Dec 12, 2010 7:36 pm

Sir_Fz wrote:
Diamond85 wrote:dcc error message:
28/11/10 14:37:30 <EggDrop> [14:37:30] Tcl error in script for 'timer87479':
28/11/10 14:37:30 <EggDrop> [14:37:30] wrong # args: should be "::AllProtection::pubms flood nick uhost hand chan arg"
Looks like you're not using the latest version? As far as I can see, this error wouldn't occur if you're using the latest version. Please upgrade to v4.6b9.

Incorrect. This is clearly a flaw within the script (4.6b9 current). For example...

Code: Select all

proc pubms {flood nick uhost hand chan arg} {

Your pubms procedure takes 6 arguments. In the code segment directly below, you give it 5.

Code: Select all

     utimer $bnick(caw) [list ${nsc}::pubms bnicks $jn $ju [nick2hand $jn $c] $c]
    } elseif {[info exists bident($ch)]} {
     utimer $bident(caw) [list ${nsc}::pubms bidents $jn $ju [nick2hand $jn $c] $c]

Make one of the two changes below...

Code: Select all

     utimer $bnick(caw) [list ${nsc}::pubms bnicks $jn $ju [nick2hand $jn $c] $c ""]
    } elseif {[info exists bident($ch)]} {
     utimer $bident(caw) [list ${nsc}::pubms bidents $jn $ju [nick2hand $jn $c] $c ""]

This changes the utimer invocation to support the missing 6th arg.

Code: Select all

proc pubms {flood nick uhost hand chan {arg ""}} {

This changes the procedure header to accept 5 args and null the 6th.

Wallah, no more timerXXX errors with either of those changes.. YAY

Football · Post by **Football** » Mon Dec 13, 2010 1:12 pm

Is the new version out yet?

Post by **Sir_Fz** » Tue Dec 21, 2010 4:42 pm

speechles wrote:Incorrect. This is clearly a flaw within the script (4.6b9 current). For example...

Weird, the copy I got has that fixed :s (I probably forgot to log the change and update the version, my bad). The proper utimers are supposed to be:

Code: Select all

} elseif {[info exists bnick($ch)]} {
 utimer $bnick(caw) [list ${nsc}::joins bnicks $jn $ju [nick2hand $jn $c] $c]
} elseif {[info exists bident($ch)]} {
 utimer $bident(caw) [list ${nsc}::joins bidents $jn $ju [nick2hand $jn $c] $c]
}

I'm going to release the fixed version and it's going to be the last version I release (hopefully) and it's stable (not beta).

Post by **Sir_Fz** » Tue Dec 21, 2010 5:40 pm

As announced on my blog, AllProtection v4.7 STABLE has been finally released! This hopefully means that there will no longer be any newer releases of the script, v4.7 is supposed to be bug-free and stable (no beta).

Download the new version (v4.7) from: http://www.4shared.com/file/ub1lfsTA/al ... ion47.html

Enjoy!

Diamond85 · Post by **Diamond85** » Sat Dec 25, 2010 2:39 am

hello Sir_Fz.

I now have the latest version of you. the badnicks now works with the wonderful ...

I now have a new problem: I have 2 nick changes made in 60 seconds.

if the user changes nicks now 2 times the bot will first warn then kick and then kickban.

the only thing he does is just warn. and then only after changing x nick kick. with reason Banned

partyline:
25/12/10 07:17:23 (EggDrop) ap:nickf: {2:60 180 w:k:kb 2}

channel:
25/12/10 07:23:46 Joins: t5 (teeest@e9u.hko.ri3lnn.IP)

25/12/10 07:23:57 (N) Nickname: t5 changed his nickname to: a1
25/12/10 07:23:58 (N) Nickname: a1 changed his nickname to: a2

25/12/10 07:23:58 (@EggDrop) a1 : Warning: You've triggered nick flood protection, slow down your nick changes.

25/12/10 07:24:05 (M) Channel Mode: @EggDrop sets mode: (+l

25/12/10 07:24:06 (N) Nickname: a2 changed his nickname to: a3
25/12/10 07:24:08 (N) Nickname: a3 changed his nickname to: a4
25/12/10 07:24:09 (N) Nickname: a4 changed his nickname to: a5
25/12/10 07:24:10 (N) Nickname: a5 changed his nickname to: a6

25/12/10 07:24:11 (M) Channel Mode: @EggDrop sets mode: (+b *!*@e9u.hko.ri3lnn.IP)

25/12/10 07:24:12 Kicks: a6 was kicked from: #test by: @EggDrop [Banned]

without error message!

maybe you have a solution for me?

Bhola420 · Post by **Bhola420** » Mon Dec 27, 2010 1:04 am

can anyone explain this?

Code: Select all

# You can change the name of the namespace (AllProtection).
namespace eval AllProtection {

egghelp/eggheads community

AllProtection.tcl (Stable: v4.8 / Beta: v4.9b4)

hello Sir_Fz I have a problem with Bnicks setting

Re: hello Sir_Fz I have a problem with Bnicks setting

Re: hello Sir_Fz I have a problem with Bnicks setting

Help!!!!!!!!

Re: hello Sir_Fz I have a problem with Bnicks setting

Re: Help!!!!!!!!

Re: hello Sir_Fz I have a problem with Bnicks setting

AllProtection v4.7 STABLE Released!!

AllProtection v4.7: ap:nickf: {2:60 180 w:k:kb 2}