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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Proxy/VPN Koruma (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1060198-proxy-vpn-koruma.html)

Proxy/VPN Koruma

Kullanıcı kanala giriş yaptığında ip adresini /dns komutuyla çeker ve proxy kontrolü için ip adresi, DroneBL' de sorgulanır.

Eğer ip adresi bir proxy/vpn olarak listelenmişse, kullanıcı kanaldan yasaklanır (kick+ban). (proxy/vpn değilse, bilgi mesajı gönderir.)

Kod:

on *:JOIN:#: {

  ; Kendi nick'inizi hariç tut

  if ($nick != $me) {

    ; Kullanıcının IP'sini al

    .dns $nick

  }

}
 

on *:RESOLVED:*: {

  if ($dns(0).ip) {

    var %ip = $dns(0).ip

    var %chan = $dns(0).chan

    ; Proxy kontrolü için socket aç

    sockopen proxyche dronebl.org 80

    set %proxyche.ip %ip

    set %proxyche.chan %chan

    set %proxyche.nick $dns(0).nick

  }

}
 

on *:SOCKOPEN:proxyche: {

  if ($sockerr) { echo -a Hata: Bağlantı başarısız! | return }

  ; DroneBL'ye HTTP isteği gönder

  sockwrite -n $sockname GET /RPC2/lookup?ip=%proxyche.ip HTTP/1.1

  sockwrite -n $sockname Host: dronebl.org

  sockwrite -n $sockname Connection: close

  sockwrite -n $sockname $crlf

}
 

on *:SOCKREAD:proxyche: {

  var %data

  sockread %data

  ; DroneBL yanıtı kontrol et

  if (listed isin %data) {

    ; Proxy tespit edildi, kullanıcıyı yasakla

    ban -k %proxyche.chan %proxyche.nick 2 Proxy/VPN tespit edildi!

    msg %proxyche.chan %proxyche.nick Proxy/VPN kullandığı için yasaklandı.

  }

  elseif (not listed isin %data) {

    ; Proxy bulunmadı

    msg %proxyche.chan %proxyche.nick Proxy/VPN kullanmıyor.

  }

  sockclose $sockname

  unset %proxyche.*

}

Cevap: Proxy/VPN Koruma

Güzel paylaşım. Eline sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].

Cevap: Proxy/VPN Koruma

emeğine sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Proxy/VPN Koruma

Kod:

; Kanal katılımında IP sorgulama

on *:JOIN:#: {

  if ($nick != $me) {

    ; Kullanıcı için DNS sorgusu başlat

    dns -h $nick

  }

}
 

; DNS sonucu geldiğinde işlenir

on *:RESOLVED:*: {

  if ($dns(0).ip) {

    var %ip = $dns(0).ip

    var %nick = $dns(0).nick

    var %id = $+($ctime,.,$rand(1000,9999)) ; benzersiz ID oluştur

    ; Kullanıcı bilgilerini ID ile sakla

    set %proxyche. [ %id $+ .ip ] %ip

    set %proxyche. [ %id $+ .nick ] %nick

    set %proxyche. [ %id $+ .chan ] $dns(0).chan

    ; Socket başlat

    sockopen proxyche. [ %id ] dronebl.org 80

  }

}
 

; Socket açıldığında

on *:SOCKOPEN:proxyche.*: {

  if ($sockerr) {

    echo -s [ProxyCheck] Bağlantı hatası: $sockname

    return

  }
 

  var %id = $gettok($sockname,2,46)

  var %ip = %proxyche. [ %id $+ .ip ]
 

  sockwrite -n $sockname GET /RPC2/lookup?ip= $+ %ip HTTP/1.1

  sockwrite -n $sockname Host: dronebl.org

  sockwrite -n $sockname Connection: close

  sockwrite -n $sockname $crlf

}
 

; DroneBL yanıtı geldiğinde

on *:SOCKREAD:proxyche.*: {

  var %data

  sockread %data

  if ($sockerr > 0) return
 

  var %id = $gettok($sockname,2,46)

  var %nick = %proxyche. [ %id $+ .nick ]

  var %chan = %proxyche. [ %id $+ .chan ]
 

  if (listed isin %data) {

    ; Proxy tespit edildi

    ban -k %chan %nick 2 [Proxy Tespiti] VPN/Proxy kullanımı yasak!

    msg %chan %nick IP adresiniz bir proxy listesinde bulundu ve yasaklandınız.

  }

  elseif (not listed isin %data) {

    ; Temiz

    echo -s [ProxyCheck] %nick (%ip) temiz.

  }
 

  ; Temizlik

  unset %proxyche. [ %id $+ .* ]

  sockclose $sockname

}

buda benden

Cevap: Proxy/VPN Koruma

Alıntı:

Che Nickli Üyeden Alıntı (Mesaj 1043017196)

Kod:

on *:JOIN:#: {

  ; Kendi nick'inizi hariç tut

  if ($nick != $me) {

    ; Kullanıcının IP'sini al

    .dns $nick

  }

}
 

on *:RESOLVED:*: {

  if ($dns(0).ip) {

    var %ip = $dns(0).ip

    var %chan = $dns(0).chan

    ; Proxy kontrolü için socket aç

    sockopen proxyche dronebl.org 80

    set %proxyche.ip %ip

    set %proxyche.chan %chan

    set %proxyche.nick $dns(0).nick

  }

}
 

on *:SOCKOPEN:proxyche: {

  if ($sockerr) { echo -a Hata: Bağlantı başarısız! | return }

  ; DroneBL'ye HTTP isteği gönder

  sockwrite -n $sockname GET /RPC2/lookup?ip=%proxyche.ip HTTP/1.1

  sockwrite -n $sockname Host: dronebl.org

  sockwrite -n $sockname Connection: close

  sockwrite -n $sockname $crlf

}
 

on *:SOCKREAD:proxyche: {

  var %data

  sockread %data

  ; DroneBL yanıtı kontrol et

  if (listed isin %data) {

    ; Proxy tespit edildi, kullanıcıyı yasakla

    ban -k %proxyche.chan %proxyche.nick 2 Proxy/VPN tespit edildi!

    msg %proxyche.chan %proxyche.nick Proxy/VPN kullandığı için yasaklandı.

  }

  elseif (not listed isin %data) {

    ; Proxy bulunmadı

    msg %proxyche.chan %proxyche.nick Proxy/VPN kullanmıyor.

  }

  sockclose $sockname

  unset %proxyche.*

}

abi eline sağlık :)