<?php
//-------------------------------------------------------
// Скрипт для определения Yandex тИЦ и Google PageRank
// Запуск: http://ваш_сайт/counter/pr.php?url=miniwm.ru
// <img src="http://ваш_сайт/counter/pr.php?url=miniwm.ru">
// Для особо одарённых: Первый сайт ваш, а второй эт сайт который нужно проверить)
// RELEASE: 16.08.09
// Говорим спасибо FFFFx029A
// Еще интересные скрипты есь на miniwm.ru
//-------------------------------------------------------
function xsps_linkTCY ($url) {
static $tcydb;
if(!$tcydb)
if(file_exists('tcydb')) {
$tcydb = unserialize(file_get_contents('tcydb'));
} else {
$tcydb = array();
}
if(isset($tcydb[$url]))
return $tcydb[$url];
$rv = null;
$t = "http://bar-navig.yandex.ru/u?ver=2&lang=1049&url=".urlencode($url)."&target=_No__Name:5&show=1&thc=0";
$lines = file($t);
$rv = 0;
foreach($lines as $line) {
if(preg_match('#<tcy rang="(\d+)" value="(\d+)"/>#', $line, $matches)) {
$rv = intval($matches[2]);
break;
}
}
if(!isset($tcydb[$url])) {
$tcydb[$url] = $rv;
// file_put_contents('tcydb', serialize($tcydb));
}
return $rv;
}
function hexEncodeU32($num) {
$result = toHex8(zeroFill($num, 24));
$result .= toHex8(zeroFill($num, 16) & 255);
$result .= toHex8(zeroFill($num, 8) & 255);
return $result . toHex8($num & 255);
}
function toHex8($num) {
$rv = ($num < 16 ? "0" : "").dechex($num);
return $rv;
}
//PR
//PageRank Lookup v1.1 by HM2K (update: 31/01/07)
//based on an alogoritham found here: http://pagerank.gamesaga.net/
//settings - host and user agent
$googlehost='toolbarqueries.google.com';
$googleua='Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.0.6) Gecko/20060728 Firefox/1.5';
//convert a string to a 32-bit integer
function StrToNum($Str, $Check, $Magic) {
$Int32Unit = 4294967296; // 2^32
$length = strlen($Str);
for ($i = 0; $i < $length; $i++) {
$Check *= $Magic;
//If the float is beyond the boundaries of integer (usually +/- 2.15e+9 = 2^31),
// the result of converting to integer is undefined
// refer to http://www.php.net/manual/en/language.types.integer.php
if ($Check >= $Int32Unit) {
$Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));
//if the check less than -2^31
$Check = ($Check < -2147483648) ? ($Check + $Int32Unit) : $Check;
}
$Check += ord($Str{$i});
}
return $Check;
}
//genearate a hash for a url
function HashURL($String) {
$Check1 = StrToNum($String, 0x1505, 0x21);
$Check2 = StrToNum($String, 0, 0x1003F);
$Check1 >>= 2;
$Check1 = (($Check1 >> 4) & 0x3FFFFC0 ) | ($Check1 & 0x3F);
$Check1 = (($Check1 >> 4) & 0x3FFC00 ) | ($Check1 & 0x3FF);
$Check1 = (($Check1 >> 4) & 0x3C000 ) | ($Check1 & 0x3FFF);
$T1 = (((($Check1 & 0x3C0) << 4) | ($Check1 & 0x3C)) <<2 ) | ($Check2 & 0xF0F );
$T2 = (((($Check1 & 0xFFFFC000) << 4) | ($Check1 & 0x3C00)) << 0xA) | ($Check2 & 0xF0F0000 );
return ($T1 | $T2);
}
//genearate a checksum for the hash string
function CheckHash($Hashnum) {
$CheckByte = 0;
$Flag = 0;
$HashStr = sprintf('%u', $Hashnum) ;
$length = strlen($HashStr);
for ($i = $length - 1; $i >= 0; $i --) {
$Re = $HashStr{$i};
if (1 === ($Flag % 2)) {
$Re += $Re;
$Re = (int)($Re / 10) + ($Re % 10);
}
$CheckByte += $Re;
$Flag ++;
}
$CheckByte %= 10;
if (0 !== $CheckByte) {
$CheckByte = 10 - $CheckByte;
if (1 === ($Flag % 2) ) {
if (1 === ($CheckByte % 2)) {
$CheckByte += 9;
}
$CheckByte >>= 1;
}
}
return '7'.$CheckByte.$HashStr;
}
//return the pagerank checksum hash
function getch($url) { return CheckHash(HashURL($url)); }
//return the pagerank figure
function getpr($url) {
global $googlehost,$googleua;
$ch = getch($url);
$fp = fsockopen($googlehost, 80, $errno, $errstr, 30);
if ($fp) {
$out = "GET /search?client=navclient-auto&ch=$ch&features=Rank&q=info:$url HTTP/1.1\r\n";
//echo "<pre>$out</pre>\n"; //debug only
$out .= "User-Agent: $googleua\r\n";
$out .= "Host: $googlehost\r\n";
$out .= "Connection: Close\r\n\r\n";
fwrite($fp, $out);
//$pagerank = substr(fgets($fp, 128), 4); //debug only
//echo $pagerank; //debug only
while (!feof($fp)) {
$data = fgets($fp, 128);
//echo $data;
$pos = strpos($data, "Rank_");
if($pos === false){} else{
$pr=substr($data, $pos + 9);
$pr=trim($pr);
$pr=str_replace("\n",'',$pr);
//echo $pr; // printing pagerank rishi
return $pr;
}
}
//else { echo "$errstr ($errno)<br />\n"; } //debug only
fclose($fp);
}
}
//generate the graphical pagerank
/*
function pagerank($url,$width=40,$method='style') {
if (!preg_match('/^(http:\/\/)?([^\/]+)/i', $url)) { $url='http://'.$url; }
$pr=getpr($url);
$pagerank="PageRank: $pr/10";
//The (old) image method
if ($method == 'image') {
$prpos=$width*$pr/10;
$prneg=$width-$prpos;
$html='<img src="http://www.google.com/images/pos.gif" width='.$prpos.' height=4 border=0 alt="'.$pagerank.'"><img src="http://www.google.com/images/neg.gif" width='.$prneg.' height=4 border=0 alt="'.$pagerank.'">';
}
//The pre-styled method
if ($method == 'style') {
$prpercent=100*$pr/10;
$html='<div style="position: relative; width: '.$width.'px; padding: 0; background: #D9D9D9;"><strong style="width: '.$prpercent.'%; display: block; position: relative; background: #5EAA5E; text-align: center; color: #333; height: 4px; line-height: 4px;"><span></span></strong></div>';
}
$out='<a href="'.$url.'" title="'.$pagerank.'">'.$html.'</a>';
return $out;
}
if ((!isset($_POST['urls'])) && (!isset($_GET['urls'])))
{ echo '<center><form action="" method="post"><textarea name="urls" cols="36" rows="9"></textarea><br><input type="submit" name="Submit" value="Get Pagerank"></form></center>'; }
if (isset($_POST['urls']))
{
$tempurls=$_POST['urls'];
$pieces = explode("\n", $tempurls);
$size=sizeof($pieces);
for ($j=0; $j<$size; $j++)
{
$url=$pieces[$j];
echo $pieces[$j].pagerank($pieces[$j]);
}
}
*/
// Settings
$dom = "http://".strtolower($_REQUEST['url'])."/";
$tc = xsps_linkTCY($dom);
$pr=getpr($dom);
//echo $_REQUEST['url']."tIC:".$tc."/PR:".$pr;
$im = ImageCreateFromPng($_SERVER['DOCUMENT_ROOT']."/counter/pr.png");
$black = ImagecolorAllocate($im,0,0,0);
$white = imagecolorallocate($im,255,255,255);
//Выводим надпись
Imagestring($im,1,54,3,"PR ".$pr,$white);
Imagestring($im,1,4,3,"CY ".$tc,$black);
//Imagestring($im,0,4,2,"powered by nogod.ru".$tc,$black);
// Выводим изображение в стандартный поток вывода
Header("Content-type: image/png");
ImagePng($im);
?>