Nick ve ident Randomsa gzline - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Emrax · 29 Aralık 2009, 17:31

Hocam S.a..
Benim bir isteğim olacaktı coder hocalarımdan..
Sunucuya yapılan saldırılar %90 " randomnick!randomident@ " şeklinde..
Sadece random nick koruması eklesek bu kez user atılacak.. Yada sadece ident random olsa yine user atılma şansı olacak..
O yüzden sizden isteğim identi ve nick i aynı anda Randomsa gzline atılsın..
Foruma baktım bi kod verilmiş ama çalışmadı demiş arkadaş..
Gözümden de kaçmış olabilir başka konular..
Lütefen konum silinmesin varsa o kod link atılırsa memnun olurum..
Şimdiden teşekkür ederim..
Saygılar..

fatal · 29 Aralık 2009, 17:59

Kod: Kodu kopyalamak için üzerine çift tıklayın!

on @!*:JOIN:#:{  
if (!$regex($nick,/korunannick1|korunannick2/i)) {  
tokenize 33 $gettok($fulladdress,1,64) 
if (!$hget($+($chan,$cid,drone),$nick)) && (($len($1) > 4) || ($len($2) > 4)) && ($regex($1,/^[a-z]+$) && $regex($2,/^~?[a-z]+$)) { 
if ($regex($1,/^[^aeiou]{4}/)) || ($regex($2,/^(~?)[^aeiou]{4}/)) { goto end } 
elseif ($regex($1,/([a-z])\1{2}/)) || ($regex($2,/([a-z])\1{2}/)) { goto end } 
elseif ($regex($1,/[aeiou]{4/)) || ($regex($2,/[aeiou]{4}/)) { goto end } 
elseif ($regex($1,q[^u]) || $regex($2,q[^])) { goto end } 
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) || ($regex($2,/[^aeioux]x[^aeiouyx]/)) { goto end } 
else { halt } 
:end 
if ($nick ison $chan) { ban $chan $nick 2 | .timer 1 600 mode $chan -b $address($nick,2) | kick $chan $nick (Random (Rastgele) Nick ve/veya Ident..)[Drones Kicked: $+(%d.k,]) | inc %d.k } 
hadd -mu60 $+($chan,$cid,drone) $replace($fulladdress,!,$chr(32)) 
halt 
} 
;elseif ($regex($nick,/^[A-Z][a-z]+[^0-9][0-9]{2}$/)) && (Guest* !iswm $nick) { echo 4 -s ban -ku600 $chan $nick 2 autokicked: [exp/ma] You are infected with an IRC trojan/virus. } 
}

Ban atıyor şu anda, ban'ları line olarak değiştirirsen işine yarayabilir.

Emrax · 29 Aralık 2009, 18:06

Hocam aynı kişinin identi ve nicki randomsa atıyor dimi bu?

Emrax · 30 Aralık 2009, 00:46

Fikirlerinizi bekliyorum arkadaşlar.2 saattir forumda arıyorum ama ya ident random yada nick random olani atıyor.Ben sadece 2 side randomsa atmasını istiyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
(güncel olsun da bakın :S)

Skills · 30 Aralık 2009, 10:49

/Spamfilter add u kill - Nickiniz_ve_Identiniz_Ayni _Olamaz! ^(.+)!.?\1@

Spam ekle, sende kurtul bizde kurtulalım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Emrax · 30 Aralık 2009, 11:04

Hocam Litmus aramıyordum ben zatten ama CipriX halletti saolsun
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

SteNLie · 30 Aralık 2009, 12:13

Ciprix in verdiği kodu bizlede paylaşa bilirmisiniz.

Emrax · 30 Aralık 2009, 13:01

alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha && $1- islower {
if (($count($1,a,e,i,o,u) >= 4)) { return $false }
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
if ($regex($1,/^[^aeiou]{3}/)) { return $true }
elseif ($regex($1,/([a-z])\1{2}/)) { return $true }
elseif ($regex($1,/[aeiou]{3/)) { return $true }
elseif ($regex($1,q[^u])) { return $true }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
else { return $false }
}
}
}
alias randn {
if $1- isalpha && $1- islower {
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) == 7) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 8) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 9) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 10) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
else { return $false }
}
}
on !*:join:#:{
var %identd = $gettok($gettok($address($nick,5),1,64),2,33),-1)
if ($randomnick($nick)) && ($randomnick(%identd)) { ban -k $chan $nick 2 random nick/ident kullanımı yasaktır.. }
}

Hocam kod bu ben bir deneme yaptım çalıştı ancak 2 denemede çalışmadı :S

----------

[10:37:14] * Ayrıldı: mIRCIndir-92154 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:37:14] * Giriş: mIRCIndir-92154 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:37:57] * mIRCIndir-92154 Nick değişerek sdjkhsadjsd Oldu
[10:38:04] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:04] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:43] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:38:43] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:42] * Ayrıldı: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:43] * Giriş: sdjkhsadjsd (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[10:39:43] * X-ir mod değiştirdi:+b *!*@2DD80C33.199DC7D0.71A06DCE.IP
[10:39:44] * sdjkhsadjsd X-ir Tarafından Kanaldan Atıldı (random nick/ident kullanımı yasaktır..)

CoCoRiCo · 31 Aralık 2009, 09:17

username 16 ile 52 karakter arasında attıgım PM'e bakılırsa..
bunu en kolay spamfilter ile cözersin
/spamfilter + u gzline - Clone_yasaktir! :[a-z]{16,32}
en köklü cözüm AntiRandom modülü kurmak.

Emrax · 31 Aralık 2009, 09:51

alias randomnick if ($randn2($1)) || ($randn($1)) { return $true } | else { return $false }
alias randn2 {
if $1- isalpha {
if (($count($1,a,e,i,o,u) >= 4)) { return $false }
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) >= 4) && ($regex($1,/^[a-z]+$)) {
if ($regex($1,/^[^aeiou]{3}/)) { return $true }
elseif ($regex($1,/([a-z])\1{2}/)) { return $true }
elseif ($regex($1,/[aeiou]{3/)) { return $true }
elseif ($regex($1,q[^u])) { return $true }
elseif ($regex($1,/[^aeioux]x[^aeiouyx]/)) { return $true }
else { return $false }
}
}
}
alias randn {
if $1- isalpha {
if ($regex($1-,/([[:print:]])\1\1/gi) >= 1) { return $false }
if ($len($1) == 7) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 8) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 9) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,4),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,3,4),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
elseif ($len($1) == 10) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
if $regex($left($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($right($1,3),/(o|i|a|e|u)/g) <= 0) { return $true }
elseif $regex($mid($1,4,5),/(o|i|a|e|u)/g) <= 0) { return $true }
else { return $false }
}
if ($regex($1,/(o|i|a|e|u)/g) <= 0) && ($len($1) == 4) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 5) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 1) && ($len($1) == 6) {
var %son = $mid($1,$len($1),1)
var %son2 = $mid($1,$calc($len($1) - 1),1)
if (%son == %son2) { return $false }
else { return $true }
}
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) == 10) { return $true }
elseif ($regex($1,/(o|i|a|e|u)/g) <= 3) && ($len($1) >= 11) { return $true }
else { return $false }
}
}
on !*:join:#mIRCTR:{
var %identd = $gettok($gettok($address($nick,5),1,64),2,33),-1)
if !$istok(Ahus neXGen_v2 aSk Admin SoylemIRC burak Dark izmIRC King Neveda asiL trnc zurna is0hbet kArA.qoSLu Sensizim mIRCKalbim IRC MT.Gops Turk ikiSohbet T-Mirc Sohbet TRSohbetLi Numberone Nickserv MultiMRC Quiet diE Damn lcX X K-Turk Kursun-v2 Bjk Love filmdizizl kuzu AfyoK Constantin SCScript yAkLaSmA mIRCindirU mIRCTRWeb KLBKvTurk TriviaBot mIRCIndir_ SohbetIRC Bitanem-v4 keleweb Intel MoDe mIRCTR KLBKBETA KTurkce KLBKveLite SohbeTTurk mIRCIndir KlbkTurkce kelebek d4rkL0rd KelebekTR ekelebek Sturk bad vXy,$right($gettok($10,1,64),-1),32) {
if ($randomnick($nick)) && ($randomnick(%identd)) { ban -k $chan $nick 2 0,1X-ir 5,1Security 0,1System5,1™9,1[0,10,1Råñdøm 0,1ñi¢k9,1] }
}

Hocam bu koddaki muaf identler işe yarar mı?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
nick inde sesli harf olmayanlara gzline	Dangerous123	mIRC Scripting Sorunları	6	13 Mayıs 2013 20:38
nick girişinde gzline	Dangerous123	mIRC Scripting Sorunları	1	18 Şubat 2012 22:32
aynı ident yada benzerliği gzline	angry1	mIRC Scripting Sorunları	9	17 Aralık 2011 19:13
Aynı ident mass join'e gzline	Emrax	mIRC Scripting Sorunları	12	22 Mayıs 2010 15:27
SpamFilter; Nick, ident	PeaCh	Unreal IRCd	1	31 Mayıs 2009 10:46

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.