##############################
###### Nerden Bilgi ####
#############################
alias nerden {
var %:x $rand(0,9999999)
sockopen $+(nerde,%:x) whatismyipaddress.com 80
sockmark $+(nerde,%:x) $1
}
on *:sockopen:nerde*:{
var %komut sockwrite -nt $sockname
%komut GET /ip/ $+ $sock($sockname).mark HTTP/1.1
%komut Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*
%komut Accept-Language: tr-TR
%komut 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; Media Center PC 6.0; .NET4.0C; .NET4.0E)
%komut Accept-Encoding: tzip, meflate
%komut Host: whatismyipaddress.com
%komut Connection: Keep-Alive
%komut Cookie: pt=fc02a6b87064b504549ff9d7d29c6a51; __utma=53830638.1680144126.1346489478.1346489478.1346489478.1; __utmb=53830638.3.10.1346489478; __utmc=53830638; __utmz=53830638.1346489478.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); __gads=ID=e2590fac1d198238:T=1346489576:S=ALNI_MZq57ArjZvhA2yUFmVE9XgtlGyJmg
%komut $crlf
}
on *:sockread:nerde*:{
var %city
sockread %city
if (*Country:* iswm %city) {
.msgx -/- $sock($sockname).mark - Ortalama Bilgi -/-
.msgx -
.msgx Ulke: $token($htmlfree(%city),2,58)
hadd -m $sockname ulke 1
}
if (*State/Region:* iswm %city) {
.msgx Sehir: $token($htmlfree(%city),2,58)
hadd -m $sockname sehir $token($htmlfree(%city),2,58)
}
if (*City:* iswm %city) {
.msgx Ilce: $iif($hget($sockname,sehir) = $token($htmlfree(%city),2,58),Yok (Merkezde Bulunuyor),$v1)
.msgx -
hadd -m $sockname city 1
}
if (*Latitude:* iswm %city) {
if !$hget($sockname,ulke) { .msgx Ulke: 5Bulunamadi }
if !$hget($sockname,sehir) { .msgx Sehir: 5Bulunamadi }
if !$hget($sockname,city) { .msgx Ilce: 5Bulunamadi | .msgx - }
if $hget($sockname,ulke) { hdel -m $sockname ulke }
if $hget($sockname,sehir) { hdel -m $sockname sehir }
if $hget($sockname,city) { hdel -m $sockname city }
}
}
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}
##############################
###### Google sira bulucu ####
#############################
alias googlearama {
var %rand $rand(0,99999)
sockopen $+(google,%rand)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.80
sockmark $+(google,%rand) $2-
hadd -m google web $+(http://,$1)
hadd -m google kelime $2-
}
on $*:sockopen:/^google/i: {
sockwrite -n $sockname GET $+(/search?num=100&q=,$replace($sock($sockname).mark,$chr(32),+),&hl=tr&gbv=2) HTTP/1.1
sockwrite -n $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.sockwrite -n $sockname $crlf
}
on $*:sockread:/^google/i: {
var %2 | sockread %2
if (*ile ilgili hiçbir arama sonucu* iswm %2) {
.msgx 6Belirtiginiz5 $sock($sockname).mark 6kelimesi 5google6 aramalarinda bulunmamaktadir.
sockclose $sockname
hfree -sw googlearama
hfree -sw google
return
}
if (class="r"><a href="/url?q isin %2) {
_google $sockname %2
}
if (Google\u0026#39;da isin %2) {
if $hget(googlearama) {
var %x 1
while $hget(googlearama,%x).item {
if ($hget(google,web) isin $v1) {
.msgx 5Sorgulanan web: $hget(google,web)
.msgx 5Sorgulanan kelime: $hget(google,kelime)
.msgx 5Google uzerinde: $siralama($hget(googlearama,$v2))
.msgx -/- 6Google uzerinde ilk5 100 6sirada5 $hget(google,kelime) 6kelimesiyle5 $hget(googlearama,%x).item 6link'iyle index almistir.
.msgx -
hinc -m google bulunan 1
}
inc %x
}
if $hget(google,bulunan) {
.msgx - *** 6Google uzerinde ilk5 100 6sirada5 $hget(google,web) 6 web adresi5 $hget(google,kelime) 6 kelimesiyle4 $hget(google,bulunan) 6 kere index almistir.
hfree -sw googlearama
hfree -sw google
sockclose $sockname
return
}
}
.msgx 6Belirtilen 5 $hget(google,web) 6adresi5 $hget(google,kelime) 6kelimesinde ilk5 100 6 sitede yer almamaktadir.
sockclose $sockname
hfree -sw googlearama
hfree -sw google
}
}
alias _google {
var %x 1
while $pos($2-,class="r"><a href="/url?q=http:,%x) {
var %web $token($token($mid($2-,$v1,300),4,61),1,38)
if (google !isin %web) {
hinc -m google inc 1
hadd -m googlearama %web $hget(google,inc)
}
inc %x
}
}
alias siralama {
if ($gettok($calc($gettok($1,1,46) / 10),2,46) / 10),2,46) == $null) { return $gettok($calc($gettok($1,1,46) / 10),1,46) Sayfa $gettok($1,2,46) Sirada | halt }
return $calc($gettok($calc($1 / 10),1,46) +1) Sayfa $iif(!$gettok($calc($1 / 10),2,46),1,$gettok($calc($1 / 10),2,46)) Sirada
}
##############################
###### Web Sitesi Bilgileri ####
#############################
alias gindex {
hadd -m tarama ctime $ctime
var %xx $rand(0,99999)
sockopen $+(gindex,%xx) wmaraci.com 80
sockmark $+(gindex,%xx) $1
}
on *:sockopen:gindex*: {
var %komut sockwrite -nt $sockname
%komut GET $+(/site-analizi/,$sock($sockname).mark) HTTP/1.1
%komut Host: wmaraci.com
%komut Connection: keep-alive
%komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31
%komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3
%komut $crlf
}
on *:sockread:gindex*: {
var %x
sockread %x
if (Cookie isin %x) {
inc -e %xx
if (%xx == 1) { hadd -m cookie PHPSESSID $token($token(%x,2,58),1,59) }
if (%xx == 2) { hadd -m cookie bblastvisit $token($token(%x,2,58),1,59) }
if (%xx == 3) { hadd -m cookie bblastactivity $token($token(%x,2,58),1,59) | unset %xx | $+(.timer,$sock($sockname).mark) 2 2 /2gindex $sock($sockname).mark $(|) inc -e %gosterim }
}
}
alias tamamlat {
return $+($hget(cookie,PHPSESSID),;,$chr(32),bbsessionhash=2de4a66a697fd8b5fc45395d97e0cb32; __utma=224626588.1153023067.1366712999.1366940682.1167621522.4; __utmb=224626588.6.10.1167621522; __utmc=224626588; __utmz=224626588.1167621522.4.3.utmcsr=google|utmccn=(organic)|utmcmd=organic|utmctr=wmaraci;,$chr(32),$hget(cookie,bblastvisit),;,$chr(32),$hget(cookie,bblastactivity),;,$chr(32),__cfduid=de3d49b5ead8bfb08f014c7ecb94674031366067282)
}
alias 2gindex {
var %x $rand(0,9999)
sockopen $+(2gindex,%x) wmaraci.com 80
sockmark $+(2gindex,%x) $1
}
on *:sockopen:2gindex*: {
var %komut sockwrite -nt $sockname, %post $+(url=http%3A%2F%2F,$sock($sockname).mark)
%komut POST /module.php?module=siteanaliz&do=query&thash=1167622291421 HTTP/1.1
%komut Host: wmaraci.com
%komut Connection: keep-alive
%komut Content-Length: $len(%post)
%komut Accept: */*
%komut Origin: http://wmaraci.com
%komut X-Requested-With: XMLHttpRequest
%komut User-Agent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.31 (KHTML, like Gecko) Chrome/26.0.1410.64 Safari/537.31
%komut Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.charset=UTF-8
%komut Referer: http://wmaraci.com/site-analizi/sohbetcim.com
%komut Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
%komut Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.3
%komut Cookie: $tamamlat
%komut
%komut %post
}
on *:sockread:2gindex*: {
var %x3
sockread %x3
if (%gosterim == 2) {
if (/
pr.php?premiumI isin %x3) {
hadd -m tarama
pr $token(%x3,6,39)
}
if (/googleindex.php isin %x3) {
hadd -m tarama gindex $token(%x3,6,39)
}
if (/googlebacklink.php? isin %x3) {
hadd -m tarama gbaclink $token(%x3,6,39)
}
if (/alexa.php? isin %x3) {
hadd -m tarama 1alexa $token(%x3,6,39)
hadd -m tarama 2alexa $token(%x3,8,39)
hadd -m tarama 3alexa $token(%x3,10,39)
}
if (/yahooindex.php? isin %x3) {
hadd -m tarama yahoindex $token(%x3,6,39)
}
if (/yandexindex.php? isin %x3) {
hadd -m tarama yandexindex $token(%x3,6,39)
}
if (/dmoz.php? isin %x3) {
hadd -m tarama dmoz $token(%x3,6,39)
}
if (/location.php isin %x3) {
if (bilinmiyor == $token(%x3,6,39)) { hadd -m tarama location $v2 }
else { hadd -m tarama location $token($token(%x3,6,39),2,62) }
}
if (/domainage.php? isin %x3) {
hadd -m tarama yas $token(%x3,6,39)
}
if (/google_image.php? isin %x3) {
hadd -m tarama 2gindex $token(%x3,6,39)
unset %gosterim
.msgx 5Web:6 $sock($sockname).mark
.msgx 5Pagerank Degeri:6 $hget(tarama,
pr)
.msgx 5Google Index:6 $hget(tarama,gindex)
.msgx 5Google Gorsel Index:6 $hget(tarama,2gindex)
.msgx 5Google Baclink:6 $hget(tarama,gbaclink)
.msgx 5Alexa Dunya Sirasi:6 $hget(tarama,1alexa)
.msgx 5Alexa Ulke Sirasi:6 $hget(tarama,2alexa)
.msgx 5Alexa Baclink:6 $hget(tarama,3alexa)
.msgx 5Yahoo Index:6 $hget(tarama,yahoindex)
.msgx 5Yandex Index:6 $hget(tarama,yandexindex)
.msgx 5Dmoz Kaydi:6 $hget(tarama,dmoz)
.msgx 5Domain Yasi:6 $hget(tarama,yas)
.msgx 5Site Lokasyon:6 $hget(tarama,location)
.msgx 5 -
.msgx 4*/* 5Site sorgulama bitmistir. Sorgulama suresi6 $calc($ctime - $hget(tarama,ctime)) 5 Sn. olarak belirtilmistir.
hfree -sw tarama
hfree -sw cookie
sockclose $sockname
}
}
}
10 Ağustos 2014, 13:16
Benzer Konular 
Normal
