IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu sekershell
bizimkiler sosyalchat


Like Tree4Beğeni(ler)
  • 4 Post By Sessiz
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 12 Mayıs 2016, 21:43   #1
Çevrimdışı
Girişte Nickin Ülke/Şehir/ISP Gösterme


Reklam

Merhaba,
Bayadır hazır kod yazmıyordum sunucumuza lamer bir arkadaş saldırmaya başladı saldırı derken modem reset yapıp gelip kanala küfür edip atılıyor. Böyle bir kod yazmaya gerek duydum ki giren kişinin şehir ve ISP adresini bileyim ki ona göre müdahale hızlı olsun dedim ve yazdım saldıran arkadaş sunucuya giriş yaptığında şehir ve isp olarak takip edip atıyorum adam bıraktı bir daha gelmedi
Sizlerlede paylaşayım işinize yarayabilir..
Sunucuya giriş yapan kişilerin ülke/şehir/isp adreslerini #Opers kanalında gösterir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting*:who +I $token($token($4-,2,58),1,32) raw 315:*:halt raw 352:*:{ var %:r $r(1000,99999) | sockopen $+(nrdn,%:r) www.ipaddresslocation.org 80 | sockmark $+(nrdn,%:r) $+($4,¿,$6) halt } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:nrdn*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: $sock($sockname).addr sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */* sockwrite -nt $sockname Accept-Language: tr-TR sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729) sockwrite -nt $sockname Connection: Keep-Alive sockwrite -nt $sockname $crlf } on *:sockread:nrdn*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) msg #Opers Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp .hfree -sw %:n sockclose $sockname } }

Merhaba,
Bayadır hazır kod yazmıyordum sunucumuza lamer bir arkadaş saldırmaya başladı saldırı derken modem reset yapıp gelip kanala küfür edip atılıyor. Böyle bir kod yazmaya gerek duydum ki giren kişinin şehir ve ISP adresini bileyim ki ona göre müdahale hızlı olsun dedim ve yazdım saldıran arkadaş sunucuya giriş yaptığında şehir ve isp olarak takip edip atıyorum adam bıraktı bir daha gelmedi
Sizlerlede paylaşayım işinize yarayabilir..
Sunucuya giriş yapan kişilerin ülke/şehir/isp adreslerini #Opers kanalında gösterir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*Client connecting*:who +I $token($token($4-,2,58),1,32) raw 315:*:halt raw 352:*:{ var %:r $r(1000,99999) | sockopen $+(nrdn,%:r) www.ipaddresslocation.org 80 | sockmark $+(nrdn,%:r) $+($4,¿,$6) halt } alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } on *:sockopen:nrdn*:{ sockwrite -nt $sockname GET $+(/ip-address-locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host: $sock($sockname).addr sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */* sockwrite -nt $sockname Accept-Language: tr-TR sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729) sockwrite -nt $sockname Connection: Keep-Alive sockwrite -nt $sockname $crlf } on *:sockread:nrdn*:{ if ($sockerr) { .sockclose $sockname | return } var %:pro | sockread -f %:pro if (IP Country: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Ülke $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (IP City: isin %:pro) { .hadd -ms $token($sock($sockname).mark,2,191) Sehir $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) } if (ISP Provider: isin %:pro) { var %:isp $iif($token($htmlfree(%:pro),2,58) == $null,Belirsiz,$token($htmlfree(%:pro),2,58)) var %:n $token($sock($sockname).mark,2,191), %ip $token($sock($sockname).mark,1,191), %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) msg #Opers Nick:4 %:n - IP:4 %ip - Ulke:4 %ülke - Sehir:4 %sehir - ISP:4 %:isp .hfree -sw %:n sockclose $sockname } }

SucLu, immortaL, Soğuk ve 1 diğer(leri) bunu beğendi
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Alt 24 Temmuz 2016, 23:42   #2
Çevrimdışı
Cevap: Girişte Nickin Ülke/Şehir/ISP Gösterme



Kod güncellendi.

  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
girişte, gösterme, nickin, Ülke or Şehir or isp
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler Arama
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık