sunu peşinen söylemek lazım yeri gelmişken illa bi ip adresi DNS sonucunda domain dönüyor diye proxy olmaz
Proxy mantıgı nasıl baglanılıyorsa aynı yöntemler kontrol etmek
atıyorum.. giren ip : 213.1.34.56 buna soketle proxy gibi elinizdeki hazır portlardan baglantı acarsınız
sockopen 213.1.34.56 8080 gibi
soket sonucu size baglantı denediginizde proxy metodu verisini döndürür döndürmezse sıradaki portu denersiniz
elinizde 10-15 portu deneyerek proxy yada degil anlarsınız... bu kadar basit... ProxyKiller bu felsefe ile calısan bir bot forumda bir cok editi var..
bunun dısında 145 le baslayan yok efendim 10. baslayan ipleri yasaklarsanır yurt dısından girilmez
üstelik IPv4 de ip kalmamıs dünya kadar yerli baglantı yabancı ip alıyor.. sizde kullanıcı kaybediyorsunuz..
--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 03:30 -->-> Daha önceki mesaj 03:02 --
buda bu yöntemin koda dökülmüş hali..
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias po {
return 3128 8080 22 1080 80 3124 6588 9090 80
}
alias to { return 10 }
alias tr {
set %prx $ticks | .dns $1
set %ip $1 | var %pi = 1
while (%pi < $gettok($po,0,32)) {
var %ki = $gettok($po,%pi,32)
var %pxn $+(prx-, $left($md5($+($r(a,z),$r(1,999),$ticks,$r(A,Z))),$r(2,30) ),=,$1)
sockopen %pxn %ip %ki
$+(.timer,%pxn) 1 $to .sockclose %pxn
inc %pi
}
; echo 4Taranan portlar:3 $gettok($po,0,32) (Ad.) :2 $po
}
on *:sockopen:prx-*: {
if ($sockerr) { sockclose $sockname | return }
echo 2 $chr(32)4PORT: $sock($sockname).port 4TIP: $sock($sockname).type 4AÇIK\KAPALI: $portfree($sockerr) 4HATA\WS_Err: $sock($sockname).wserr 4MESAJ\WS_Msg: $sock($sockname).wsmsg
if ($portfree($sockerr)) && (o isincs $usermode) {
; gzline $+(*@,$sock($sockname).ip) 1D Proxy yasaktir.- $+ $left($sock($sockname).ip,-3) $+ ***: $+ $sock($sockname).port
return
}
.sockclose $sockname
}
on *:sockread:prx-*:{
if ($sockerr > 0) { echo :HATA: $sock($sockname).wserr | return }
echo 4 -s :---> $sock($sockname).ip $sock($sockname).port
sockclose $sockname
}
on *:dns:{
if (%prx) {
var %di = $dns(0)
while (%di > 0) {
echo 2 $chr(32) 4DNS: $dns(%di) 4ADRES: $dns(%di).addr \ $dns(%di).ip
dec %di
}
unset %prx | unset %ip
halt
}
unset %prx | unset %ip
}
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sitesinden rastgele bi ip alındeneyin..
tarama sekli /tr ip
/tr 101.109.251.207
sonuc:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ProxyKiller Multi Network Düzenlemesi:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]