egghelp.org community

awyeah · Posted: Sat Oct 30, 2004 9:07 am Post subject:

If you can't make yourself one, don't blame others scripts for being worthless, atleast they put effort to build them, but as we can clearly see you don't seem to do that as well. If your reply is "I DON'T KNOW HOW TO SCRIPT TCL", neither did I a year ago, but I learned from seeing other scripts and by gaining knowledge by reading manuals and seeing tutorials.

Since you seem to be criticizing other people's fine codes too much and do not have worth yourself to make one, here try mine:

(It's not released publicly so there is nothing a user can set or do, neither it is in the best shape of code, so make use if it, if you can!)

greenbear · Owner Joined: 24 Sep 2001 Posts: 733 Location: Norway

/me calls the regexp police

caesar · Posted: Sat Oct 30, 2004 7:55 pm Post subject:

Regardless of what he (I'm talking about [R] user) said is it's opinion on things, which should be kept for yourself not expressed in public, at least not in that way. Anyway, don't start an argue on this! Evil or Very Mad

@ awyeah:
Man, you got a lot of regexp'es wich can be replaced with just a bigger one which will at least speed it a bit. Also, IMHO there is no point of the "(![isop $nick $chan]) && (![isvoice $nick $chan]) " since as I've said before is an on-join check. Mr. Green

_________________
Once the game is over, the king and the pawn go back in the same box.

awyeah · Posted: Sun Oct 31, 2004 11:41 am Post subject:

That's why I said caesar, ITS NOT IN THE BEST OF SHAPE.

Btw how do I add multiple regexp's like combine these ones to fit into one? I was rather thinking to set the patterns as a list and do a string match with a foreach loop for each element in the list. Wouldn't that be better you say? string match is also faster. Plus I can also match numbers, regexp doesn't give me the choice to match specific numbers (0-9).

Like this?

greenbear · Owner Joined: 24 Sep 2001 Posts: 733 Location: Norway

You can use | as a seperator.
And you can search for specific numbers, you do that the same way you would search for any other char, or if you want a number within a range, use, say [3-9], if you want to check for a number between 3-9.

Stealthx · Halfop Joined: 01 Oct 2004 Posts: 68 Location: StealthBox

- awyeah

How does your code (the code with lots of regexp) works? It's base on the drone random nick name and if it matched, it does a ban on the particular drone's IP?
_________________
+ Stealth Box +

awyeah · Posted: Mon Nov 01, 2004 12:33 pm Post subject:

Stealthx:
If it doesn't work I wouldn't be pasting it over here now, would I? Read the code and you will understand. It matches words between the " "'s in the regexp's but has a threshold for matching as well.

gb:
I was pertaining to:

if {[regexp -nocase "xyz0" $text]} {
#Will give an error

However [0-9] will not give an error, but here I want to match a specific number, not any number within a given range.
_________________
·awyeah·

==================================
Facebook: jawad@idsia.ch (Jay Dee)
PS: Guys, I don't accept script helps or requests personally anymore.
==================================

greenbear · Owner Joined: 24 Sep 2001 Posts: 733 Location: Norway

demond · Posted: Mon Nov 01, 2004 1:56 pm Post subject:

random nick drone flood would be more effectively detected & prevented if all that regexp stuff is implemented in a module

in C you have regcomp() and regexec() which compile & respectively execute a regexp; that means you only have to regcomp() once and then repeatedly to regexec(); in TCL you don't have separate compile & execute functions and every time you do a [regexp] it gets compiled again, slowing down the check-on-join process which would have a significant performance impact during drone join/part flood (I can only imagine the CPU usage of awyeah's solution Razz

no offense; mine should be faster, but nevertheless still far less effective compared to an equivalent C module)

caesar · Posted: Mon Nov 01, 2004 2:15 pm Post subject:

Modules are faster than tcl scripts and that's a proved fact. But since not all users know how to make a c module they stick with either they (think or realy do) know or others that can help, like tcl scripting. Mr. Green

_________________
Once the game is over, the king and the pawn go back in the same box.

awyeah · Posted: Wed Nov 03, 2004 9:19 am Post subject:

Wish I was good in C, unfortunately am not.
_________________
·awyeah·

==================================
Facebook: jawad@idsia.ch (Jay Dee)
PS: Guys, I don't accept script helps or requests personally anymore.
==================================

awyeah · Posted: Sun Apr 10, 2005 3:02 pm Post subject:

I was wondering if there could be a way to minimize this and combine all these regexps into one maybe, hence time can be saved especially if we are dealing with fast onjoin flood bots with random nicks and so.