| youmycure | 24 Temmuz 2019 14:52 |
GSS (IRC Girişlerinde Webden Link İle Kontrol)
Mantık: 1) Kullanıcı IRC Sunucusuna Bağlanır,
2) Bot Web Sistemine Entegreli PHP Dosyasına Kullanıcının Nick ve IP Adresi Bilgilerini Gönderir,
3) Bot Kullanıcıya Doğrulama Linki Gönderir,
4) Kullanıcı Bu Linki Tıklayıp Doğrulamayı Yaparsa Kanallara Alınır. Yapmazsa Ban Yer. * Sunucunuzda m_igs modulu kurulu ise _gecmodul seçeneğini "yes" yapın değilse "no" yapın, kurmak için: --> https://www.ircforumlari.com.tr/geri...engelleme.html * Windows Üzerinde Dinlenecek ve Veri Gönderilecek Bir "TCP" Port Açmanız Gerekir ve bu portu gerekli yerlere yazmanız gerekir. açmak için --> https://www.sordum.net/39597/windows...le-port-acmak/ PHP Kodları: **Not: Kodu Burada Herkese Açık Şekilde Paylaştığım İçin; Güvenlik Açığı Oluşuyor, Bunu Önlemek İçin Kırmızı, Mavi, Yeşil, Turuncu, ve Pembe Alanları Random Şekilde Değiştiriniz ve .txt dosyasını Oluşturup chmod Değerini " 333" Yapınız. Kod:
<!DOCTYPE html><html><head><title>(GSS) Güvenli Giriş Sistemi</title><style>
body { background-color: #93B874; }
h1 { background-color: #00b33c; }
</style></head><body>
<?php
//eger nick verisi varsa
if (isset($_GET["yaz"]) && ($_GET["password"] == rw4354tf3515w34))
{
//nick değişkenine aktar
$nick = $_GET["yaz"];
// dosya yoksa oluşur ve aç
$dosya = fopen("veriler.txt","a");
// gelen nicki yaz
fwrite($dosya,$nick);
// dosyayı kapat
fclose($dosya);
echo "<ymc>yazdim</ymc>";
} else if(isset($_GET["yaz"]) && $_GET["password"] != rw4354tf3515w34) {
echo "<ymc>yanlis sifre</ymc>";
//eger ara verisi varsa
} else if(isset($_GET["ara"])) {
//nick degiskeni
$nicks = $_GET["ara"];
$ips = $_SERVER['REMOTE_ADDR'];
//dosyada nicki bul
if(strstr(fgets(fopen("veriler.txt", "r")),"$nicks|$ips")) {
//ip adresini değikene ata
//mirc bota baglan
$fp = stream_socket_client("35.197.54.78:1741", $errno, $errstr, 30);
//islev
if (!$fp) {
echo "$errstr ($errno)<br />\n";
} else {
$nick = $_GET["ara"];
fwrite($fp, "$ips $nicks \r\n\r\n");
while (!feof($fp)) {
echo fgets($fp, 1024);
fwrite($fp, "*/*\r\n\r\n");
}
//islev sonu socketi kapat
fclose($fp);
//nicki txtden sil giris codesi bulunamasın
$dosya="veriler.txt";
$oku=fread(fopen($dosya,"r"),filesize($dosya));
$str=str_replace("$nicks|$ips","",$oku);
fwrite(fopen($dosya,"w"),$str);
}
//giris code bulunamadı yazısı
} else { echo "<center><h1>Sizin Aktif Giriş Kodunuz Bulunmuyor !!!! veya Nick ve IP Adresi Birbirini Tutmuyor.!!!</h1></center>"; }
//hatalı link yazısı
} else { echo "<center><h1>Lütfen Geçerli Bir Link Tıkladığınızdan Emin Olun. !!!</h1></center>"; }
?>
</body></html>
mIRC Socket Kodları: Burada Yine Aynı Renk Olan Yerleri Değiştirin. Kod:
;################AYARLAR################
alias _gssnick return GSS
alias _nickpass return rf1d4dg6fd54h
alias _sunucu return irc.dedikodu.org 6667
alias _oper return Koruma r56e4f56r4egf56re4g5fd
alias _supass return pr4fsa1equal
alias _logchan return #Opers
alias _muafport return 2018 2099 9741
alias _gecmodul return yes
alias _password return rw4354tf3515w34
alias _winports return 1741
;###########################################
on *:start: { if $sock(gss) { sockopen gss $_sunucu } | gecdinle }
alias _n return $remove($gettok($1,1,33),:)
alias swgss if ($sock(gss).status == active) sockwrite -n gss $1-
on *:sockclose:gss:{ sockopen gss $_sunucu }
on *:sockopen:gss:{ if ($sockerr) { sockclose gss | sockopen gss $_sunucu | return } | swgss NICK $+($_gssnick,$rand(100000,9999999)) | swgss USER GSS "" " GSS System }
on *:sockread:gss:{
if ($sockerr) { sockclose gss | sockopen gss $_sunucu | return } | var %; | sockread %; | tokenize 32 %; | if ($1 = ping) swgss pong $remove($2,:)
if ($2 == 001) { swgss oper $_oper | swgss join 0,0 | swgss nick $_gssnick | swgss chghost gss Guvenli.Giris.Sistemi | $+(.timer,girs,$sockname) 1 3 sockwrite -n $sockname join $_logchan }
if $1 == error && $2 == :closing || $2 = 451 { .sockclose gss | sockopen gss $_sunucu }
elseif $2 == JOIN && $_n($1) == $_gssnick { swgss mode $remove($3,:) +h $_gssnick }
elseif ($regex($2,/481|411|001)) { swgss oper $_oper | .timer 1 5 swgss nick $_gssnick | swgss nickserv identify $_nickpass | .timer 1 2 swgss os su $_supass }
elseif $2 == 433 { swgss ns ghost $_gssnick $_nickpass | swgss ns release $_gssnick $_nickpass | swgss nick $_gssnick }
elseif $2 == PRIVMSG || $2 == NOTICE || $2 == ACTION && $left($3,1) != $chr(35) {
if $4 == :TIME { swgss NOTICE $_nick($1)($1) TIME $time | return }
elseif $4 == :VERSION { swgss NOTICE $_nick($1)($1) VERSION 2mIRC v6.35 Recep Şentürk | swgss NOTICE $_n($1)($1) VERSION GSS System | return }
elseif $4 == :FINGER { swgss NOTICE $_nick($1)($1) FINGER GSS System $+ ( $+ GSS $+ @) Idle 1 seconds | return }
elseif $4 == :PING { swgss NOTICE $_nick($1)($1) PONG $5- | return }
elseif $regex($1-,/(\/whois on you|rumuzu size whois komutunu)/Si) { $+(sw,$sockname) privmsg $_logchan :[WHOIS] - Nick: $5 Ident: $gettok($gettok($6,1,64),1,40) Ip: $gettok($gettok($6,2,64),1,41) }
elseif (Client connecting on port isin $1-) {
var %:gss:port $remove($11,:),%:gss:nick $12,%:gss:ip $left($token($13,2,64),-1)
if $istok($_muafport,%:gss:port,32) { $iff($_gecmodul = yes,swgss gec $token(%i,2,32),swgss sajoin $token(%i,2,32) #Radyo,#Sohbet,#Oyun) | return }
var %:qs $+($ticks,$r(1000,999999))
sockopen $+(gssyolla,%:qs) www.bilisimtc.com 80
sockmark $+(gssyolla,%:qs) $+(%:gss:nick,|,%:gss:ip)
}
}
}
alias gecdinle { socklisten gecdinle $_winports }
on *:socklisten:gecdinle: { sockaccept $+(gecs,$r(1,9999)) }
on *:sockread:gecs*: {
sockread %i | sockwrite $sockname <center><h1> $token(%i,2,32) Girişiniz Doğrulandı Kanallara Alınıyorsunuz.! </h1></center>
$+(.timer,$token(%i,2,32)) off
if $_gecmodul = yes { swgss notice $token(%i,2,32) 7*** Giriş Başarılı Birazdan Kanallara Alınacaksınız. | swgss gec $token(%i,2,32) }
else { swgss shun $+(-*@,$token(%i,1,32))) | swgss sajoin $token(%i,2,32) #Radyo,#Sohbet,#Oyun }
sockclose $sockname
}
on *:sockopen:gssyolla*:{
sockwrite -n $sockname GET $+(/proje/giris.php?yaz=,$sock($sockname).mark,&password=,$_password) HTTP/1.1
sockwrite -n $sockname Host: $sock($sockname).addr
sockwrite -n $sockname $crlf
}
on *:sockread:gssyolla*:{
if ($sockerr) { echo -a hata. | return } | sockread %i
if <ymc>yazdim</ymc></body> = %i {
$iif($_gecmodul = no,swgss shun $token($sock($sockname).mark,1,124))
$+(.timer,$token($sock($sockname).mark,1,124)) 1 60 swgss gzline $token($sock($sockname).mark,1,124) +5h Lütfen Daha Sonra Tekrar Giriş Deneyin.
swgss privmsg $token($sock($sockname).mark,1,124) Lütfen Girişinizi Tamamlamak İçin Tıklayın -->4 $+(https://www.bilisimtc.com/proje/giris.php?ara=,$token($sock($sockname).mark,1,124))
swgss notice $token($sock($sockname).mark,1,124) Lütfen Girişinizi Tamamlamak İçin Tıklayın -->4 $+(https://www.bilisimtc.com/proje/giris.php?ara=,$token($sock($sockname).mark,1,124))
}
}
Deneme IRC: irc.dedikodu.org
Herkez İstediği Gibi Düzenleyip Kullanabilir (Tasarım verebilir, Geliştirebilir, proxy koruması ekleyebilir, web üzerine captcha veya güvenlik kodu koyabilir), Yapamayan Olursa pm Atabilir. |
