egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

AllProtection.tcl (Stable: v4.8 / Beta: v4.9b4)
Goto page Previous  1, 2, 3 ... 88, 89, 90
 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases
View previous topic :: View next topic  
Author Message
Sir_Fz
Revered One


Joined: 27 Apr 2003
Posts: 3793
Location: Lebanon

PostPosted: Fri Apr 14, 2017 2:34 pm    Post subject: Re: rehash Reply with quote

gembels wrote:
Tested with putdcc $antispam(idx) quit

It didnt change ident, realname and IP, it just change the nickname only.


Can you share your changes so I can understand what you're trying to do?
_________________
Follow me on GitHub

- Opposing

Public Tcl scripts
Back to top
View user's profile Send private message Visit poster's website
gembels
Voice


Joined: 07 Jul 2012
Posts: 26

PostPosted: Sat Apr 15, 2017 11:58 am    Post subject: Reply with quote

Code:

proc timerehash {} {
  rehash
 }

 set listnamabot [list "sinagabonar" "rukiyati"]
 set listident [list "bonar" "yati"]
 set listrealname [list "android" "andro"]
 set listip [list "64.125.185.73" "64.125.185.104" ]


on antispamcore because I only use IPV4 so I bypass your var from the top.. I changed to old version and I am using timerehash to disconnected them and reconnected with new ip, new nick, new ident and new realname..

Code:

  proc antispamcore {m h args} {
     variable antispam; variable Sec
     if {![info exists antispam(idx)] || ![valididx $antispam(idx)]} {
         if {[info exists antispam(idx)]} {unset antispam(idx)}
         if {[info exists antispam(cnick)]} {unset antispam(cnick)}
         foreach {s p} [split [lindex [lindex $::servers [expr {[incr antispam(next)]%[llength $::servers]}]] 0] :] {break}
         foreach c [channels] {
             if {[vcg $c ap:antispam] && [lindex [split [channel get $c ap:antispam]] 0] == "+"} {
                 #####set_vhosts
                 set ::my-ip $antispam(ip); set ::my-hostname $antispam(host)
                 control [connect $s $p] [namespace current]::antispambot
     putlog "\002AP\002: AntiSpamBot: Connecting to $s:$p..."
     putlog "\002AP\002: AntiSpamBot: IP $antispam(ip)"   
                 break
             }
         }
         return
     }
     set asbc 0
     foreach c [channels] {
         set mins [expr {[scan $m %d]+([scan $h %d]*60)}]
         foreach {off greet cycle idle} [split [channel get $c ap:antispam]] {break}
         if {$off == "+"} {incr asbc}
         if {[onchan $antispam(cnick) $c] && $off != "+"} {
                 putdcc $antispam(idx) "part $c"
                 timerehash
         } elseif {$cycle != 0 && $mins%$cycle == 0 && [onchan $antispam(cnick) $c]} {
             if {![info exists antispam([set e [string tolower $c]:idle])]} {set antispam($e) [unixtime]}
             if {[unixtime]-$antispam($e) < $idle*60 && [botisop $c]} {
                 putlog "\002AP\002: AntiSpamBot: mondar mandir $c..."
         set listnamabot [list "telstrax" "dayplex"]
         set namabot [lindex $listnamabot [rand [llength $listnamabot]]]     
             putdcc $antispam(idx) "join $c"
             putdcc $antispam(idx) "nick $namabot"
             putdcc $antispam(idx) "privmsg $c :[lindex $antispam(r) [rand [llength $antispam(r)]]]"
             after 30000
         putdcc $antispam(idx) "part $c"
         timerehash
                 
             }
         } {if {![onchan $antispam(cnick) $c] && $off == "+"} {putdcc $antispam(idx) "join $c"}}
     }
     if {!$asbc} {
         putdcc $antispam(idx) quit
         putlog "\002AP\002: AntiSpamBot: Disconnected (disabled on all channels)..."
     }
 }


So i am looking for solution to make antispamcore quit without rehash comand..

thanks in advance
Back to top
View user's profile Send private message
m4s
Voice


Joined: 30 Jan 2017
Posts: 24

PostPosted: Sat Jul 01, 2017 3:54 pm    Post subject: bad nicks Reply with quote

Hi Sir_Fz!

The script is super but I found something.

I set the bot to watch bad nicks.
My config is: ap:bnicks: {+ 0 bk 11}

When the idiot with bad nick joined to my channel my bot kicked it then put the ban to the bad nick and the ban is not permanent.

According to the config the bot first should ban then kick, right?
Shall I change anything in the config?

Thank You! Smile
Back to top
View user's profile Send private message
taxick
Voice


Joined: 12 Jul 2007
Posts: 9

PostPosted: Tue Jul 18, 2017 8:04 am    Post subject: ChanServ (-l) Reply with quote

Hi.

I'm totally new to IRC, and I'm trying to go get allprotection to work in my channel, I'm running the AllProtection v4.9b4

The problem is, my channel get spammed by the bot / chanserv..

The bot (Blop) set +I and ChanServ remove it again.

How can I fix this? So it don't spam the chat - Please help.

Quote:
(14:00:02) - Blop (+l) 11
(14:00:02) - ChanServ (-l) #botheaven
(14:01:02) - Blop (+l) 11
(14:01:02) - ChanServ (-l) #botheaven
(14:02:02) - Blop (+l) 11
(14:02:02) - ChanServ (-l) #botheaven
(14:03:02) - Blop (+l) 11
(14:03:02) - ChanServ (-l) #botheaven
(14:04:02) - Blop (+l) 11
(14:04:02) - ChanServ (-l) #botheaven
(14:05:02) - Blop (+l) 11
(14:05:02) - ChanServ (-l) #botheaven
(14:06:02) - Blop (+l) 11
(14:06:02) - ChanServ (-l) #botheaven
(14:07:02) - Blop (+l) 11
(14:07:02) - ChanServ (-l) #botheaven
(14:08:02) - Blop (+l) 11
(14:08:02) - ChanServ (-l) #botheaven
(14:09:02) - Blop (+l) 11
(14:09:03) - ChanServ (-l) #botheaven
(14:10:02) - Blop (+l) 11
(14:10:02) - ChanServ (-l) #botheaven
(14:11:02) - Blop (+l) 11
(14:11:02) - ChanServ (-l) #botheaven


And it keep spamming this for ever..
Back to top
View user's profile Send private message
willyw
Owner


Joined: 15 Jan 2009
Posts: 923

PostPosted: Tue Jul 18, 2017 1:07 pm    Post subject: Re: ChanServ (-l) Reply with quote

taxick wrote:

...

The bot (Blop) set +I and ChanServ remove it again.
...


First, are you sure that is +I ?
Due to that "11" in there, it looks like it might be +l (lower case L)

Next:
It depends on what the problem really is.
Meaning - do you want the bot to monitor something such that it might need to set +l , or not?
If yes, then you need to examine the settings of Chanserv itself, to see why it is un-doing what the bot does. I suspect some sort of mode lock setting, but usually you can dig through all the settings descriptions with something like: /msg chanserv help

If no, then you might be satisfied to simply shut off that particular protection function in AP.
Try doing:
.chaninfo #channelname
and look for:
ap:limit: 0

If it is set to zero, like the example line above, then it is off.
If not zero, then it is on.
Read about it in the script itself.
Experiment with it, and see if that helps.

I hope this helps.
_________________
For a fun (and popular) Trivia game, visit us at: irc.librairc.net #science-fiction . Over 300K Q & A to play in BogusTrivia !
Back to top
View user's profile Send private message
aleepervaiz
Voice


Joined: 18 Apr 2012
Posts: 10
Location: Pakistan

PostPosted: Sat Aug 05, 2017 2:32 am    Post subject: Reply with quote

@Sir_Fz

I have observed one thing which is missing in all flood protection, when a mass join happens in a channel the bot just only set the modes +mR on the channel which is mostly in use but it wont kick all the flood bots who joins the channel.

I have noticed another thing that there are 2 type of mass join in the script

Code:
#
## 15 ## Join flood.
#

lappend ap:udefs {ap:cjoin "3:2 120 kb 2"}

# Join flood: Check for join flood from same idents as well? (0: no, 1: yes)
set joinflood(checkident) 1

# Join flood: Lock channel when triggered ? (1: yes , 0: no)
set joinflood(lockchan) 1

# Join flood: If lock channel is enable, what modes ?
set joinflood(lockmode) "mR-k clone.join.flood"

# Join flood: lock time in seconds.
set joinflood(locktime) 45

set joinflood(kmsg) "Join flood detected. $kckcount(form)"

set joinflood(wmsg) "Warning: you've triggered join flood protection, further offence will cause harsher actions."

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

set joinflood(ktype) 2

set joinflood(klmsg) "Join floods are not permissable on this network."

set joinflood(ktime) 0

and the second one is
Code:
#########################################
# BOTNET FLOOD PROTECTION (MASS FLOODS) #
#########################################

#
## 6 ## Botnet join flood.
#

lappend ap:udefs {ap:massjoin "9:3 mR-k join.flood 60"}


The bot only kicks on clone joining but wont kick on botnet flood, this script should kick those nicks over mass joining coming from different ip or idents, like i have seen now a days people use hash tables in mirc which kick all of them together in a one go without even any lag. This script is amazing have each and every feature but the only thing is missing is this which i have observed.
Razz
Back to top
View user's profile Send private message Visit poster's website
LoKii
Voice


Joined: 21 Oct 2009
Posts: 34

PostPosted: Thu Oct 05, 2017 7:24 am    Post subject: Problem with timers Reply with quote

Hello everyone,

I'm having a small snag here with the allprotection.tcl.

When the bot performs a channel lock for whatever reason,
it does not unlock them after the attack.

In DCC it spits out:
Quote:
<b0x> [13:20:25] Tcl error in script for 'timer31478':
<b0x> [13:20:25] couldn't compile regular expression pattern: quantifier operand invalid


Any ideas on how to get it to unlock the channel after the specified time (in my case its 20 secs) ?

Regards,
LoKii
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases All times are GMT - 4 Hours
Goto page Previous  1, 2, 3 ... 88, 89, 90
Page 90 of 90

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber