Просмотр архива Скрипт биржи доменов и сайтов


<?

//Функция определение Гугла ПР

$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';

 

function StrToNum($Str, $Check, $Magic) {

    $Int32Unit = 4294967296;

 

    $length = strlen($Str);

    for ($i = 0; $i < $length; $i++) {

        $Check *= $Magic;     

        if ($Check >= $Int32Unit) {

            $Check = ($Check - $Int32Unit * (int) ($Check / $Int32Unit));

            $Check = ($Check < -2147483648) ? ($Check + $Int32Unit) : $Check;

        }

        $Check += ord($Str{$i}); 

    }

    return $Check;

}

 

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);

}

 

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;

}

 

function getch($url) { return CheckHash(HashURL($url)); }

 

function getpr($url) {

    global $googlehost,$googleua;

    $ch = getch($url);

    $fp = fsockopen($googlehost, 80, $errno, $errstr, 30);

    if ($fp) {

       $out = "GET /tbr?client=navclient-auto&features=Rank&ch=$ch&q=info:$url HTTP/1.1rn";

       $out .= "User-Agent: $googleuarn";

       $out .= "Host: $googlehostrn";

       $out .= "Connection: Closernrn";

    

       fwrite($fp, $out);

       while (!feof($fp)) {

            $data = fgets($fp, 128);

            $pos = strpos($data, "Rank_");

            if($pos === false){} else{

                $pr=substr($data, $pos + 9);

                $pr=trim($pr);

                $pr=str_replace("n",'',$pr);

                return $pr;

            }

       }

       fclose($fp);

    }

} 

//Функция определения Яндекс ТИца

function getBarCY($_url) {

  $_uri = "http://bar-navig.yandex.ru/u?ver=2&url=".urlencode("http://".$_url)."&show=1";

  $fd = @fopen($_uri, "r");

  if ($fd) {

    while ($buffer = fgets($fd, 4096)) $haystack.=$buffer;

    fclose($fd);

    preg_match("/<tcy rang="(.*)" value="(.*)"/>/isU",

      $haystack,$cy);

    return (int) $cy[2];

  } else return 0;

}

 

function outin_links($url) {

        $in_links = array();

        $out_links = array();

 

        // HOST адреса страницы для проверки полных ссылок на локальность

        $url_host = parse_url($url, PHP_URL_HOST);

        if ( preg_match('/^www./i', $url_host) ) $url_host = substr($url_host, 4);

 

        $html = @file_get_contents($url);

        if ( false===$html ) return false;

 

        $xml = new DOMDocument();

        @$xml->loadHTML($html);

 

        // Получаем объектно ориентированный массив тегов A из HTML

        $links = $xml->getElementsByTagName('a');

        if ( count($links)<1 ) return false;

 

        foreach ( $links as $link ) :

                // У тега A нет аттрибута href

                if ( !$link->hasAttribute('href') ) continue;

 

                $href = $link->getAttribute('href');

                if ( empty($href) ) continue;

 

                // Если адрес ссылки начинается с "http://" или "https://"

                if ( preg_match('/^http(s)?:///i', $href) ) {

                        $href_host = parse_url($href, PHP_URL_HOST);

                        if ( preg_match('/^www./i', $href_host) ) $href_host = substr($href_host, 4);

 

                        // Если HOST указанного адреса страницы и хост ссылки совпадают

                        if ( preg_match('/^' . preg_quote($url_host) . '$/i', $href_host) ) $in_links[] = $href; else $out_links[] = $href;

                } else $in_links[] = $href;

        endforeach;

 

        return array($in_links, $out_links);

}

 

?>