ASN yasaklama

menu * {
  • ASN Yasaklama
  .Aç:/enable #asn | echo -a 3ASN Yasaklama Aktif.
  .Kapat:/disable #asn | echo -a 4ASN Yasaklama Aktif Değil.
  ..Durum < $replace($group(#asn).status, off, Kapalı, on, Açık) >:.
}
#asn on
on *:input:#:{
  if $regex($1,/^[!.]asn/Si) {
    if !$2 { msg # Lütfen !asn <ekle|sil|list> olarak belirtiniz. }
    elseif $regex($2,/^ekle$/Si) {
      if !$3 { msg # Lütfen !asn ekle <asn> olarak belirtiniz. }
      elseif $regex($3,/Bel[ıiİ]rs[ıiİ]z/Si) { msg # Böyle bir asn yok. }
      elseif $hget(asn,$remove($strip($3-),$chr(32))) { msg # $strip($3-) asnsi yasak listesinde zaten ekli. }
      else { .hadd -ms asn $remove($strip($3-),$chr(32)) $+($strip($3-),$chr(191),$nick) | .hsave -o asn asn.Yasak | msg # $strip($3-) yasak asn listesine eklendi. }
    }
    elseif $regex($2,/^s[ıiİ]l$/Si) {
      if !$3 { msg # Lütfen !asn sil <asn> olarak belirtiniz. }
      elseif !$hget(asn,$remove($strip($3-),$chr(32))) { msg # $strip($3-) yasak asn listesinde ekli değil. }
      else { .hdel -ms asn $remove($strip($3-),$chr(32)) | .hsave -o asn asn.Yasak | msg # $strip($3-) yasak asn listesinden silindi. }
    }
    elseif $regex($2,/^l[ıiİ]st$/Si) {
      if !$hget(asn,0).data { msg # Yasak asn listesi boş. }
      else {
        msg # Yasak asn Listesi
        msg # -
        var %:t = 1 | while %:t <= $hget(asn,0).data {
          msg # $+(%:t,-,$chr(41)) asn:4 $token($hget(asn,%:t).data,1,191)  Ekleyen:2 $token($hget(asn,%:t).data,2,191)
          inc %:t
        }
        msg # -
        msg # Yasak asn Listesi Sonu
      }
    }
  }
}
on *:start:if $isfile(asn.Yasak) { .hmake asn | .hload -o asn asn.Yasak }
on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \((.+)@(.+)\)/Si) { who +I $regml(2) }
raw 352:*:var %_rand $+($6,$r(1000,99999)) | sockopen $+(giris_bildiri,%_rand) igs.tatava.click 80 | sockmark $+(giris_bildiri,%_rand) $+($4,¿,$6)
on *:sockopen:giris_bildiri*:{  
  if ($sockerr) { sockclose $sockname }
  else {
    sockwrite -nt $sockname GET $+(/bilgi.php?ip=,$token($sock($sockname).mark,1,191)) HTTP/1.1
    sockwrite -nt $sockname Host: $sock($sockname).addr
    sockwrite -nt $sockname Connection: keep-alive
    sockwrite -nt $sockname Cache-Control: max-age=0
    sockwrite -nt $sockname Upgrade-Insecure-Requests: 1
    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36
    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9
    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7
    sockwrite -nt $sockname $crlf  
  } 
}
on *:sockread:giris_bildiri*:{  
  var %tr | sockread %tr | tokenize 32 %tr
  if $regex($1-,/<span>Country:</span> <span>(.+)</span>/i) { .hadd -msu7 Ülke $sockname $regml(1) }
  elseif $regex($1-,/<span>City:</span> <span>(.+)</span>/i) { .hadd -msu7 Şehir $sockname $regml(1) }
  elseif $regex($1-,/<span>AS:</span> <span>(.+)</span>/i) { .hadd -msu7 ASN $sockname $regml(1) }
  elseif $regex($1-,/<span>Mobile:</span> <span>(.+)</span>/i) { .hadd -msu7 Mobile $sockname $iif($regml(1) == true,Evet,Hayır) }
  elseif $regex($1-,/<span>Proxy:</span> <span>(.+)</span>/i) { 
    $iif(!$window(@Giris),window -e @Giris)
    .echo @Giris 4Nick: $token($sock($sockname).mark,2,191) 4IP: $token($sock($sockname).mark,1,191) 4Ülke: $iif($hget(Ülke,$sockname),$v1,Belirsiz) 4Şehir: $iif($hget(Şehir,$sockname),$v1,Belirsiz) 4ASN: $iif($hget(ASN,$sockname),$v1,Belirsiz) 4Mobile IP: $hget(Mobile,$sockname) 4VPN: $iif($regml(1) == true,Evet,Hayır)
    if $hget(ASN,$remove($hget(ASN,$sockname),$chr(32))) { .gzline $+(*@,$token($sock($sockname).mark,1,191)) +5h Yasak ASN Girişi }
    .hdel -ms ASN $sockname | .hdel -ms ASN $sockname | sockclose $sockname
  }
}
#asn end