IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Proxy Koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/487733-proxy-korumasi.html)

aLone 14 Temmuz 2013 20:11

Cevap: Proxy Koruması
 
on *:Snotice:*:if (*Client connecting on port* iswm $1-) && !$regex($left($8,-1),(198[4-9])) { who +I $9 }

+I kaldırıp denesene CR de sanırım böyle bu
{ who $9 }

By_ATMACA 15 Temmuz 2013 00:11

Cevap: Proxy Koruması
 
Bu Koda bir türlü muaf ekleyemedim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] , @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Bakarsaniz Sevinirim

Narsinha 16 Temmuz 2013 16:35

Cevap: Proxy Koruması
 
on *:snotice:*client connecting*:{ who +I $9 }

yerine

on *:SNOTICE:*Client*connecting*:if !$regex($left($8,-1),(666(6|7|8|9)))) { who $9 }

ekle sonda ayraç eksikmiş

6667,6667,6668,6669 portlarından muaf tutar

Not: /umode +c girmeyi unutma çalışmaz kod.

Dangerous123 23 Temmuz 2013 21:29

Cevap: Proxy Koruması
 
Kod:

raw 352:*:{  proxy $4 } on *:snotice:*Client connecting*: {  .who +I $9 } alias proxy {  var %rand $rand(0,99999)  sockopen $+(ktor,%rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80  sockmark $+(ktor,%rand) $1 }  on *:sockopen:ktor*: {  var %komut sockwrite -nt $sockname, %post $+(ip=,$sock($sockname).mark,&GO%21=GO%21)  %komut POST /ip_check HTTP/1.1  %komut Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Connection: keep-alive  %komut Content-Length: $len(%post)  %komut Cache-Control: max-age=0  %komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8  %komut Origin:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31  %komut Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Accept-Encoding: gzip,deflate,sdch  %komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4  %komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3  %komut Cookie: PHPSESSID=90b5ae6ed385b312ea3dcccb50c126e1; ck_lang=en; __atuvc=18%7C1  %komut    %komut %post } on *:sockread:ktor*: {  var %x | sockread %x | tokenize 32 %x  if $regex($1-,/(XBL|SBL|XBL|SPAMCOP|CBL|NJABL|SURBL|HTTP:BL).+red/i) {    gzline $+(*@,$sock($sockname).mark) 1h 1IP adresinizde 4PROXY 1girişi tespit edilmiştir.    if !$window(@prxy-tor) { window -neg1 @prxy-tor } | echo @prxy-tor ( $+ $time $+ ) $+(4 $chr(32),$sock($sockname).mark),$chr(32)) 1IP adresinizde 4PROXY 1girişi tespit edilmiştir.      sockclose $sockname        halt  } }

h3pp3n hocanın bu koduna muaf port 6669 nasıl ekleriz acaba

Toprak 23 Temmuz 2013 21:48

Cevap: Proxy Koruması
 
Buyur

Kod:

on *:snotice:*Client connecting*:if $remove($8,:) == 6669 { .who +I $9 }

Dangerous123 23 Temmuz 2013 22:09

Cevap: Proxy Koruması
 
Kod:

on *:snotice:*client connecting*:{
  var %s = $left($10,-1)
  if ip-pool.com isin %s { halt }
  if club-internet.fr isin %s { halt }
  if hinet.net isin %s { halt }
  if netcologne.de isin %s { halt }
  if turkmetro.net isin %s { halt }
  if bgwan.com isin %s { halt }
  if telenet.be isin %s { halt }
  if optonline.net isin %s { halt }
  if unitymediagroup.de isin %s { halt }
  if $regex(%s,/(net|com|org|hr)\b) { gzline $9 3d 14Host Banned

Toprak birde şuna 6669 portunu muaf eklesek harika olcak

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 22:09 -->-> Daha önceki mesaj 22:09 --

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Toprak 23 Temmuz 2013 22:15

Cevap: Proxy Koruması
 
aynı işte ondan alıp buna ekleyin yani ;

Kod:

if $remove($8,:) == 6669 { return }

CoCoRiCo 24 Temmuz 2013 03:30

Cevap: Proxy Koruması
 
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:

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:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

ProxyKiller Multi Network Düzenlemesi: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

IRC-Dancer 24 Temmuz 2013 06:36

Cevap: Proxy Koruması
 
:):):):)

Dangerous123 10 Ağustos 2013 22:42

Cevap: Proxy Koruması
 
Kod:

on *:SNOTICE:*Client*connecting*:if !$regex($left($8,-1),(665(6|7|8|9)))) { who $9 }
raw 352:*: {
  tor_ $4
  kontrol1 $4
  torproxy $4
}
alias tor_ {
  if ($1) {
    inc %xx
    sockopen $+(tor*,%xx) rbls.org 80
    sockmark $+(tor*,%xx) $1
  }
}
on *:sockopen:tor*:{
  var %s sockwrite -n $sockname
  %s GET / $+ $sock($sockname).mark HTTP/1.1
  %s Host: rbls.org
  %s $crlf
}
on *:sockread:tor*:{
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if (*<tr class="rblred">*tor.dan.me* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
  if (*<tr class="rblred">*rbl.efnetrbl* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
}
alias kontrol1 {
  if ($1) {
    var %xxx $rand(0,999999999999999999999999)
    sockopen $+(torr*,%xxx) anonymouse.org 80
    sockmark $+(torr*,%xxx) $1
    sockopen $+(dtor*,%xxx) rbls.org 80
    sockmark $+(dtor*,%xxx) $1
    sockopen $+(btor*,%xxx) anonymouse.org 80
    sockmark $+(btor*,%xxx) $1
    sockopen $+(ctor*,%xxx) anonymouse.org 80
    sockmark $+(ctor*,%xxx) $1
  }
}
on *:sockopen:torr*:{
  var %s sockwrite -n $sockname
  %s GET /cgi-bin/anon-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
HTTP/1.1
  %s Host: anonymouse.org
  %s $crlf
}
on *:sockread:torr*:{
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if (*listed in tor* iswm %x [ $+ [ $sockname ] ]) {
    if (%proxy == on) {
      gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
      sockclose $sockname
    }
  }
  if (*listed in rbl* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
}
on *:sockopen:dtor*:{
  var %s sockwrite -n $sockname
  %s GET / $+ $sock($sockname).mark HTTP/1.1
  %s Host: rbls.org
  %s $crlf
}
on *:sockread:dtor*:{
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if (*<tr class="rblred">*opm.tornevall.org* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
  if (*<tr class="rblred">*rbl.efnet* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
  if (*<tr class="rblred">*dnsbl.ahbl.org* iswm %x [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
}
on *:sockopen:btor*:{
  var %s sockwrite -n $sockname
  %s GET /cgi-bin/anon-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
HTTP/1.1
  %s Host: anonymouse.org
  %s $crlf
}
on *:sockread:btor*:{
  var %xx [ $+ [ $sockname ] ]
  sockread %xx [ $+ [ $sockname ] ]
  if (*There is an entry for the IP or ID * iswm %xx [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
}
on *:sockopen:ctor*:{
  var %s sockwrite -n $sockname
  %s GET /cgi-bin/anon-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
HTTP/1.1
  %s Host: anonymouse.org
  %s $crlf
}
on *:sockread:ctor*:{
  var %xx [ $+ [ $sockname ] ]
  sockread %xx [ $+ [ $sockname ] ]
  if (*There have been listings for the host* iswm %xx [ $+ [ $sockname ] ]) {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    sockclose $sockname
  }
}
alias torproxy {
  if ($1) {
    inc %x1
    sockopen $+(mor*,%x1) rbls.org 80
    sockmark $+(mor*,%x1) $1
  }
}
on *:sockopen:mor*:{
  var %m sockwrite -n $sockname
  %m GET / $+ $sock($sockname).mark HTTP/1.1
  %m Host: rbls.org
  %m $crlf
}
on *:sockread:mor*:{
  var %x [ $+ [ $sockname ] ]
  sockread %x [ $+ [ $sockname ] ]
  if *is listed in opm.tornevall.org* iswm %x [ $+ [ $sockname ] ] || *is listed in rbl.efnetrbl.org* iswm %x [ $+ [ $sockname ] ] || *is listed in tor.dan.me.uk* iswm %x [ $+ [ $sockname ] ]  {
    gline $+(*@,$sock($sockname).mark) - 4,1 • 14,1L4,1a14,1m4,1e14,1r Cl4,1ea14,1r Sy4,1s4,1t4,1e14,1m 4,1• 
    if !$read(tor.txt,w,$sock($sockname).mark) { write tor.txt $sock($sockname).mark }
    sockclose $sockname
  }
}

slm arkadaslar hayırlı bayramlar.. bu kodu bi türlü çalıstıramadım
6669 portunu muaf tutup calıstırcam fakat yukardakı muaf bölümünde sorun var sanırım calısmıyor tepkı yok az daha kurcaladığım da who yu tanımsız gördü

ilgilenirseniz memnun kalırım..

calısırsa sanırım iş görecek bir koruma daha iyisi var diyede önereceğiniz varsa oda olur tşkler..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:43.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net