Boþ zamanýmda yazdýðým bu kod sayesinde, belirlediðiniz identler hariç herhangi bir saldýrý durumunda tekrar tekrar kullanýlan identleri spama alarak güvenlik botunuzu ekstra yükten kurtarabilirsiniz. Sadece ident deðil, ident'in belirlediðiniz bir kýsmýný da spama alabilirsiniz. Kýrmýzýyla belirttiðim yerleri kendinize göre deðiþtirebilirsiniz. Identler muaf tutulacaktýr. Diðer yandan, kýrmýzýyla yazýlan 4 olan kýsým ise bakýlacak ident karakteri sayýsý, mesela DENEME identiyle saldýrý geliyorsa ve sayý 4 ise DENE.* þeklinde spama alýr, böylece DENE kelimesinden sonra gelen harfleri veya rakamlarý da spama alacaktýr. Maviyle yazýlan 4 rakamý ise 30 saniye içinde kaç tane ayný ident girerse devreye gireceðini belirtir.
Kod
on $*:snotice:/.+(port|lanan).*:\s*(.+)\s\((.+)@(.+)\)/: {
var %ip89 = $regml(5), %chk = $regml(4), %idnt = $regml(4), %spdf = $left(%chk,4)
.hinc -mu30 rpfd %chk | .hinc -mu30 eps %spdf
if $hget(rpfd,%chk) >= 4 || $hget(eps,%spdf) >= 4 {
if !$istok(ident ident2 ident3,%spdf,32) && !$hget(checked,%chk) {
.timer -oc 1 900 .dgac %chk
.msg #opers 1Muhtemelen 4 %chk 1identinden saldýrý alýyoruz, bu sebeple 15 dk spamda kalacak.
.dgline %chk
.hinc -m checked %chk
}
if $len(%spdf) >= 4 && !$hget(cdks,%spdf) && !$istok(ident ident2 ident3,%spdf,32) {
.timer -oc 1 900 .dgac $+(%spdf,.*)
.dgline $+(%spdf,.*)
.msg #opers 1Muhtemelen ilk %isayi karakteri 4 %spdf 1 olan ident grubundan saldýrý alýyoruz, bu sebeple 15 dk spamda kalacak.
.hinc -m cdks %spdf
}
}
}
alias dgline { spamfilter add u gzline - 1Kurallara_aykiri_davranislar_sebebiyle_uzaklastirildiniz. ^( $+ .+! $+ $1 $+ @.+:.+)$ }
alias dgac { spamfilter del u gzline - 1Kurallara_aykiri_davranislar_sebebiyle_uzaklastirildiniz. ^( $+ .+! $+ $1 $+ @.+:.+)$ }