Последние записи

made in programmersforum 6

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

20th
Авг

Скрипт php для определения PR и ТИЦ?

Posted by Chas under php, Пост-обзор

Собственно в интернете много его вариантов 2008 года — но не пашут уже.
Есть у кого рабочий вариант ?

Виталий Желтяков

//---------------------------- Определение тИЦ сайта -------------------------//

function gettcy() {

	// Считываем XML-файл с данными. Сайт берём из пост запроса

	$xml = file_get_contents('http://bar-navig.yandex.ru/u?ver=2&show=32&url='.$_POST['id']);

	// Если XML файл прочитан, то возвращаем значение параметра value, иначе возвращаем false - ошибка

	$tcy = $xml ? (int) substr(strstr($xml, 'value="'), 7) : false;

	$return .= 'ObjectChange("menu","
Определение тИЦ сайта
';

	$return .= '

';

	$return .= '
';

	$return .= '
';

	$return .= '


Тематический индекс цитирования сайта '.$_POST['id'].' равен '.$tcy.'



Вернуться в главное меню



';
	// Кнопка Закрыть

	$return .= '

",2); SetHints();';
	return $return;

}

//----------------------------------------------------------------------------//

Яр|/||< (^_^)
Нарыл в инете, МБ поможет :

$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 /search?client=navclient-auto&ch=$ch&features=Rank&q=info:$url HTTP/1.1\r\n";

        $out .= "User-Agent: $googleua\r\n";

        $out .= "Host: $googlehost\r\n";

        $out .= "Connection: Close\r\n\r\n"; 
        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);

     }

}