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

- TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)

- - Proxy-Tor Koruması (https://www.ircforumlari.net/tcl-scriptler/545177-proxy-tor-korumasi.html)

Proxy-Tor Koruması

Selamun Aleyküm arkadaşlar. Forumda bulunan bir çok proxy tor tcl, addon v.s ne varsa kullandım hiç biri bir işe yaramadı.

Çalışan proxy-Tor koruma tcl addon elinde olan varsa paylaşırsa sevinirim.

Teşekkürler.

Cevap: Proxy-Tor Koruması

Kod:

package require http
 

bind raw * notice tor_join
 

proc tor_join {from keyword text} {

  if {![string match -nocase "*client connecting*" $text] || [string match -nocase "*!*@*" $from]} { return 0;}

  set uhost [lindex [split $text] 9]

  set q [lindex [split $uhost @] 1]

  

::http::config -useragent "UserAgent"

set url [::http::geturl "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
15000]

set data [::http::data $url]

::http::cleanup $url
 

regexp -- {<div class="ueberschrift">(.*?)</div>} $data "" listed
 

regsub -all {\n} $data {} data
 

if {[string match -nocase "*blacklist for*" $listed] && [string match -nocase "*Schwarze Liste*" $listed]} {

   putquick "gzline *@$q :bizi tercih ettiğiniz için teşekkür ederiz...Selametle güzel insan evladı..."

   } else {

   return 0

   }

}
 

putlog "ok..."

şurda tarama / kontrol yapan sitelerin bir listesi var [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]tamamına olmasada çoğuna baktım..
baktıklarımın büyük bölümüde ölmüştü.. hala aktif olanlarsa büyük ölçüde böyle bir iş için sorunluydu.. ya captcha / onay kodu isteniyor sorgulama için yada site
son derece yavaş/geç cevap veriyordu..
içlerinde bana göre en sağlıklı/hızlı çalışanı bu...
(ayrıca sadece Ip'leri değil tor hostlarınıda tarayabiliyor ayrıca dnslookup yaptırmak gerekmiyor.onlar kendi hallediyor ..böylede bi güzelliği var)
ayrıca benim bildiğim kadarıyla burası bir datacenter almanya'da yanlışım yoksa ya hamburg ya bremen'de olmalı...
(bir alman arkadaşla vakti zamanında sohbet ederken konusu geçmişti..)

eğerki bir sorgu sınırlaması vs gibi bi korumaları yoksa site üzerinde,
yani yoğun girişlerde arka arkaya sorgu yapmak durumda kalacaktır bot.böyle bir flood koruması varsa sitelerinde problem olacaktır.
ancak onun dışında sanırım bulunabilecek en sağlam yerlerden biri olmalı bu iş için...

sorgu için sağlam bir site bulmak çokda kolay değil gibi görünüyor...

Cevap: Proxy-Tor Koruması

biraz daha uğraşayım dedim (uyku olmayınca...) -> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

# tcllib yüklü olmalı yada 

# http.tcl scripts klasörüne atılıp 

# .conf içinde yüklenmeli.

# bu durumda http.tcl'nin bu script'ten

# evvel yüklenmiş olması gerekir.

# o nedenle daha üst bir satırda 

# gösterebilirsiniz.

# tcllib yüklüyse  buna gerek yoktur.

;##############################################
 

package require http
 

;# yapılan işlemin rapor edileceği kanal:

set rapor "#raporkanal"
 

;# işlem yapılırken gönderilecek sebep;

set sebep "bizi tercih ettiğiniz için teşekkür ederiz...Selametle güzel insan evladı..."
 

;# hangi sayıdan itibaren yapılan işlemleri saydırmaya başlıyacak:

set torno "0"
 

;###################burdan sonrasını değişmemelisiniz########################
 

;# sunucu girişlerinde yakalanacak notice:

set grsnotc "*client connecting*"
 

;# tor yakalandığını bildiren siteden alınan mesajlardan biri:

set msj1 "*blacklist for*"
 

;# tor yakalandığını bildiren siteden alınan mesajlardan biri:

set msj2 "*Schwarze Liste*"
 

;# taramada kullandığımız adres;

set link "
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kısmı sonlandı######################################
 

bind raw * notice tor_join
 

proc tor_join {from keyword text} {

  if {![string match -nocase $::grsnotc $text] || [string match -nocase "*!*@*" $from]} { return 0;}

  

  set uhost [lindex [split $text] 9]

  set q [lindex [split $uhost @] 1]

  

  set stamp "[concat $::torno - [clock format [expr {3600 + [clock seconds]}] -format "Tarih: %d/%m/%Y - Saat: %H:%M:%S %z"]]"

  set uagent "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.0.1) Gecko/2008070208 Firefox/3.0.1"

  

::http::config -useragent $uagent

catch { set url [::http::geturl $::link$q -timeout 40000] } error

set data [::http::data $url]

::http::cleanup $url
 

if {[string match -nocase "*couldn't open socket*" $error] && [string equal -nocase [::http::status $url] "*timeout*"]} {

 putcmdlog " $q taranamadı ... hata oluştu... : [clock format [expr {3600 + [clock seconds]}] -format "Tarih: %d/%m/%Y - Saat: %H:%M:%S %z"]"

 return 0

 } else {
 

regexp -- {<div class="ueberschrift">(.*?)</div>} $data "" listed
 

regsub -all {\n} $data {} data
 

if {[string match -nocase $::msj1 $listed] && [string match -nocase $::msj2 $listed]} {

    incr ::torno

   putquick "gzline *@$q :$::sebep:$stamp"

   puthelp "privmsg $::rapor :$q yakalandı...sunucudan uzaklaştırıldı...: $stamp"

   } else {

   putcmdlog "$q tarandı...tor bulunmadı...: $stamp"

      return 0

      }

   }

}
 

putlog "ok..."

Cevap: Proxy-Tor Koruması

merhaba
sanirim elimdeki http.tcl nin versionu düsük geldi uygun versionu nereden bulabiliriz

conflicting versions provided for package "http": 2.5.2, then 2.5.001
while executing

Cevap: Proxy-Tor Koruması

Ellerinize sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam .. Fakat ya ben çalıştıramadım yada 2 side yakalamıyor.

Cevap: Proxy-Tor Koruması

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

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] bana sunucudan kullanıcı girişlerinde gördüğünüz "*client connecting" li giriş notice'inden bir örnek postalayın....büyük ihtimal ip kısmını yakalayamıyordur.

bende sunucu olmadığından ...tahminen yazıyorum. görebilirsem o notice'i ona göre düzenlemem mümkün olabilir.

birde kodu denerken bota bağlı olursanız kod içinde putcmdlog satırlarıyla bota bilgi verdirdim.olası her durum için bot bilgi ileticek ama görmeniz için bota bağlı olmalısınız.

eğer bu notice :
-admin.sunucu- *** Notice -- Client connecting at bla.sunucu: nick (~
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) şeklinde görülüyorsa.:

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

yukardakilerin hepsini boşverin bana başka bir site bulun bu iş için sağlam onda yapayım...

diğer tor status sitesinden aldığım IP'leri hostları denedim bu yukardakinde..birine tor diyor diğerine temiz diyor...

bana başka bi site gösterin......

Cevap: Proxy-Tor Koruması

Client girislerin de asagidaki gibi hata veriyor

[21:29] -NOTICE- *** Notice -- Client connecting on port 6667: nick-382 (Sohbetodal@95.8.49.38) [clients]
[21:29] nick-382 (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
) joined #Sohbet.
[21:29] -NOTICE- [error] Invalid mask.

Cevap: Proxy-Tor Koruması

sizde de yukarda resimdeki örnekteki gibi 10. sıraya denk geliyormuş tcl için bu 9'a denk geliyor.

ancak bu siteye güvenilmezmiş.hiç iyi tarama yapmıyor..yakalama oranı değmeyecek kadar düşük kalıyormuş..
denedim tor IP'leri arka arka sorgulattım bi tor diyor bi temiz diyor..

başka bi site bulmak lazım...yada bu site kodlarını tümüyle bırakıp listeden okuyan kod üzerine çalışmak lazım.ben sildim dün bu site için yazdıklarımı...değmeyecek kadar düşük bi yakalama oranı var...

ya başka doğru düzgün bi tarama işi yapan bi site yada diğer konuda açtığım txt'e listeyi alıp onun üzerinde işlem yapma üstünde durmak lazım..

ama başka bi yer bulursanız ki ben bulamadım..güya bu yukardaki bulabildiklerimin en iyisiydi ama kelek çıktı işin doğrusu...

Cevap: Proxy-Tor Koruması

Evet sizin yukaridaki mesajinizdan sonra bende aramaya basladim site ama bende elle tutulur birsey bulamadim sizinde bahsettiginiz gibi bircogunun sistemi düzgün calısmıyor aynı ip adresini 5 sefer sorgulatiyorum farklı cevaplar aliyorum

düzgün bir proxy korumasi yok malesef bir ara ircproxy.net vardi digerlerine nazaran cok güzel di ama oda kapatti sitesini sanirim

Cevap: Proxy-Tor Koruması

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ' a ilgi alakasından ötürü Teşekkürlerimi iletirim.

Bu konuda bize tam anlamı ile çözüm olabilecek başka önerileri olan var mı?