someone can help for this idea

[xGame]

somebody here write this TCL script remove abuse from Aop channel list if begin masskick and not working propably. i need to change this TCL to this idea.


1- I have 2 bots connect togather by botnet ( one is HUB and another is LEAF ).
2- "HUB bot" inside my channel as a normal user and "LEAF bot" outside my channel.
3- If any Sop or Aop in my channel begin Masskick, i need "HUB bot" send abusenick to "LEAF bot" through BOTNET connection.
4- I need "LEAF bot" do /cs why #chan abusenick, When the bot get respone from chanserv get truenick in channel list and remove truenick. if SOP do /cs sop #chan del truenick else /cs aop #chan del truenick. and deop abusenick.



why i ask here because i can't do that script i need advanced coder to do that and it's new idea to control channel from MassKick and must this script work with 2 botnet . I will be thanks alot if somecoder here do it.


This old script but not work propably and work with one bot only:

Code: Select all

# Full name of channel services 
set chanserv "chanserv@Services.dal.net" 

# Channel *not* to function in 
set nogo "#botest" 

bind kick - * kick:remove 
bind notc - "* Identification to the nickname *" check:verify 
bind notc - "*Password accepted for Nick*"

proc kick:remove {nick uhost hand chan targ rsn} { 
if {$targ == $::botnick && [string match [split $rsn] "*Masskick*"]} { 
if {![string match $chan $::nogo]} { 
putserv "PRIVMSG $::chanserv :why $chan [lindex [split [lindex [split $rsn] 2] "!"] 0]" 
} 
} 
} 

proc check:verify {nick host hand arg {dest ""}} { 
set arg [ctrl:filter $arg] 
if {[string equal $dest $::botnick]} { 
set offender [lindex [split $arg] 0] 
set aop [lindex [split $arg] 2] 
set chan [string trim [lindex [split $arg] 5] .] 
set opnick [string trim [lindex [split $arg] end] .] 
set thehand [findhand $offender [getchanhost $offender]] 
if {$offender != "" && $thehand != "*"} { 
deluser $thehand 
} 
putquick "PRIVMSG $::chanserv :$aop $chan del $opnick" 
putquick "MODE $chan -o $offender" 
putkick $chan $offender "Hey MassKick Here u con't do, you just lost access!" 
} 
} 

# ctrl:filter <string> 
# Strip all control characters. Thanks to Ppslim.  

proc ctrl:filter {str} { 
regsub -all -- {\003[0-9]{0,2}(,[0-9]{0,2})?|\017|\037|\002|\026|\006|\007} $str "" str 
return $str 
} 

# findhand - tries to find a handle 

proc findhand {nick host} { 
if {[validuser $nick]} { 
return $nick 
} else { 
set thehand [nick2hand $nick] 
if {[validuser $thehand]} { 
return $thehand 
} 

set thehand [finduser $host] 
return $thehand 
} 
} 

### End ###
putlog "TCL \002loaded\002: MassKick Remove." 

[Sir_Fz]

A better idea to completely (or atleast) prevent masskick would be to delete the sop/aop of any nick who kicks/deops the bot. This way the abuser might not be able to masskick if the bot deletes him quickly. A slight modification to your code would do that.

[xGame]

. what about if abusenick make masskick from outside channel then the bot will try to remove ChanServ nick because this's abusenick . That's not my idea. i need script to work with 2 botnet . You know some abuse user do masskick from outside and change him nick quickly and do masskick again and change him nickname again that's more masskick with random abuse nickname.

[demond]

automating such things on a network with services doesn't make much sense

you can simply check the bot's logs and then ditch whoever is responsible - it shouldn't matter if they are deleted 1 minute or several hours later

[Sir_Fz]

. what about if abusenick make masskick from outside channel then the bot will try to remove ChanServ nick because this's abusenick . That's not my idea. i need script to work with 2 botnet . You know some abuse user do masskick from outside and change him nick quickly and do masskick again and change him nickname again that's more masskick with random abuse nickname.

He can't masskick from the outside if the bot has higher access (unless it's different on your network which I doubt), thus he'll have to join and kick or deop the bot in order to masskick the channel. As for the changing his nick issue, It won't be any different if the leaf bot issued the why command.

[^DooM^]

bah bring back the good old days where servers were basic and nick colliding was fun

[demond]

bah bring back the good old days where servers were basic and nick colliding was fun

whoa, you remember that??

EFnet has TS and IRCnet has nick delay code since like 1996...

[^DooM^]

Heh I have been around since the old BBS days. Cut my teeth on Ircnet whilst on demon dialup with a spankingnew fast 14.4 pace linnet modem and 14.4's were damn quick back then a whole 4k/sec. These young whipper snappers dont know they're born with there 2, 4, 8 mbit lines /sigh

[awyeah]

I don't think this is a good idea. To implement this the bot must have channel founder access to the channel otherwise it is no good, and giving such high access can cause catastrophe -- if you know what I mean.

[xGame]

. what about if abusenick make masskick from outside channel then the bot will try to remove ChanServ nick because this's abusenick . That's not my idea. i need script to work with 2 botnet . You know some abuse user do masskick from outside and change him nick quickly and do masskick again and change him nickname again that's more masskick with random abuse nickname.

He can't masskick from the outside if the bot has higher access (unless it's different on your network which I doubt), thus he'll have to join and kick or deop the bot in order to masskick the channel. As for the changing his nick issue, It won't be any different if the leaf bot issued the why command.

Will I try your tcl script "allfloodprotection3.8b.tcl" it's not working propably with arabic channel letters name. like #الرياض only work with one channel and when i try restart my bot i find the scrit not work. what's problem you think ?.

Regards

[Sir_Fz]

I guess it's an eggdrop or tcl problem rather than a problem with my script.

[Alchera]

I guess it's an eggdrop or tcl problem rather than a problem with my script.

Eggdrop cannot decipher Arabic alphabet. Maybe a mod to the script using string map might solve the problem?

Something along these lines:

Code: Select all

set mapfile [string map {" ' & & [ ( \\ / ] ) \{ ( \} ) £ £ ¨ ¨ © © « « ­ ­ ® ®} $tempfile]
set mapfile [string map {´ ´ · · ¹ ¹ » » ¼ ¼ ½ ½ ¾ ¾ À À Á Á Â Â } $mapfile]
set mapfile [string map {Ã Ã Ä Ä Å Å Æ Æ Ç Ç È È É É Ê Ê Ë Ë Ì Ì Í Í Î Î Ï Ï Ð Ð Ñ Ñ Ò Ò Ó Ó Ô Ô Õ Õ Ö Ö } $mapfile]
set mapfile [string map {× × Ø Ø Ù Ù Ú Ú Û Û Ü Ü Ý Ý Þ Þ ß ß à à á á â â ã ã ä ä å å æ æ ç ç è è é é ê ê } $mapfile]
set mapfile [string map {ë ë ì ì í í î î ï ï ð ð ñ ñ ò ò ó ó ô ô õ õ ö ö ÷ ÷ ø ø ù ù ú ú û û ü ü ý ý þ þ } $mapfile]
return $mapfile

[Sir_Fz]

And how exactly should that be applied ? to the channel name you mean ?

[Alchera]

And how exactly should that be applied ? to the channel name you mean ?

Yup. Was just a thought to throw up. The Arabic alphabet it kind of unique and will always cause a problem for scripts that use channel names.

[Sir_Fz]

Ok, then I can suggest the following to xGame:

Add this proc to the script:

Code: Select all

proc mapfile tempfile {
 set mapfile [string map {\" ' & & [ ( \\ / ] ) \{ ( \} ) £ £ ¨ ¨ © © « « ­ ­ ® ®} $tempfile]
 set mapfile [string map {´ ´ · · ¹ ¹ » » ¼ ¼ ½ ½ ¾ ¾ À À Á Á Â Â } $mapfile] 
 set mapfile [string map {Ã Ã Ä Ä Å Å Æ Æ Ç Ç È È É É Ê Ê Ë Ë Ì Ì Í Í Î Î Ï Ï Ð Ð Ñ Ñ Ò Ò Ó Ó Ô Ô Õ Õ Ö Ö } $mapfile] 
 set mapfile [string map {× × Ø Ø Ù Ù Ú Ú Û Û Ü Ü Ý Ý Þ Þ ß ß à à á á â â ã ã ä ä å å æ æ ç ç è è é é ê ê } $mapfile] 
 set mapfile [string map {ë ë ì ì í í î î ï ï ð ð ñ ñ ò ò ó ó ô ô õ õ ö ö ÷ ÷ ø ø ù ù ú ú û û ü ü ý ý þ þ } $mapfile] 
 return $mapfile
}

and just add

Code: Select all

set chan [mapfile $chan]

at the beginning of each proc.

Try it, and if it works I'll add it to the script. Thanx Alchera for the suggestion