PHP PageRank checker

[digg]

Помогите пожалуйста, обновился алгоритм подсчета переменной ch в скрипте - результат функции GoogleCH для определения Google PageRank
Выложите кто-нибудь обновленный алгоритм на PHP
Вот старый:

PHP код:

function stringord($string) {
 for($i=0;$i<strlen($string);$i++) {
   $result[$i] = ord($string{$i});
 }
 return $result;
}
function GoogleCH($url, $length=null) {
 $url=stringord($url);
 if(is_null($length)) {
    $length = sizeof($url);
 }
 $a = $b = 0x9E3779B9;
 $c = 0xE6359A60; # GOOGLE MAGIC
 $k = 0;
 $len = $length;
 while($len >= 12) {
    $a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24));
    $b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24));
    $c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24));
    $mix = mix($a,$b,$c);
    $a = $mix[0]; $b = $mix[1]; $c = $mix[2];
    $k += 12;
    $len -= 12;
 }

 $c += $length;

 switch($len) /* all the case statements fall through */
 {
    case 11: $c+=($url[$k+10]<<24);
    case 10: $c+=($url[$k+9]<<16);
    case 9 : $c+=($url[$k+8]<<8);
    /* the first byte of c is reserved for the length */
    case 8 : $b+=($url[$k+7]<<24);
    case 7 : $b+=($url[$k+6]<<16);
    case 6 : $b+=($url[$k+5]<<8);
    case 5 : $b+=($url[$k+4]);
    case 4 : $a+=($url[$k+3]<<24);
    case 3 : $a+=($url[$k+2]<<16);
    case 2 : $a+=($url[$k+1]<<8);
    case 1 : $a+=($url[$k+0]);
    /* case 0: nothing left to add */
 }
 $mix = mix($a,$b,$c);
 /*-------------------------------------------- report the result */
 return $mix[2];
}
function zeroFill($a, $b) {
 $z = hexdec(80000000);
 if ($z & $a) {
    $a = ($a>>1);
    $a &= (~$z);
    $a |= 0x40000000;
    $a = ($a>>($b-1));
 } else {
    $a = ($a>>$b);
 }
 return $a;
}

function mix($a,$b,$c) {
 $a -= $b; $a -= $c; $a ^= (zeroFill($c,13));
 $b -= $c; $b -= $a; $b ^= ($a<<8);
 $c -= $a; $c -= $b; $c ^= (zeroFill($b,13));
 $a -= $b; $a -= $c; $a ^= (zeroFill($c,12));
 $b -= $c; $b -= $a; $b ^= ($a<<16);
 $c -= $a; $c -= $b; $c ^= (zeroFill($b,5));
 $a -= $b; $a -= $c; $a ^= (zeroFill($c,3));
 $b -= $c; $b -= $a; $b ^= ($a<<10);
 $c -= $a; $c -= $b; $c ^= (zeroFill($b,15));

 return array($a,$b,$c);
}
function isurl($strng){
 return preg_match('/^http:\/\/[A-Za-z0-9]+((\.|-)[A-Za-z0-9\-]+)*\.[A-Za-z0-9]+$/i',$strng);
} 


[digg]

ну, что ребята? ни кто?
может в ПМ кто скиньте, буду благодарен

[imgreen]

что он делает, я что-то вообще не пойму...

[digg]

спасибо доброму человеку, который подсказал )

[medar]

digg, выложи плиз рабочий актуальный вариант чекера.

[Drg]

Сообщение от medar

digg, выложи плиз рабочий актуальный вариант чекера.

Выкладывать лучше не стоит) в ПМ пошлет) а то сегодня работает PR, завтра перестанет, опять код ищи(

[krokodile]

Если бы мне тоже кто-нибудь скинул - было бы прекрасно.

[IFund]

а мож на питоне есть, чтобы многопоточно проверку делать, а то как то по 1К даже страшновато

[digg]

Сообщение от medar

digg, выложи плиз рабочий актуальный вариант чекера.

Сообщение от krokodile

Если бы мне тоже кто-нибудь скинул - было бы прекрасно.

в пм скинул

[Drg]

Сообщение от IFund

а мож на питоне есть, чтобы многопоточно проверку делать, а то как то по 1К даже страшновато

Нет..
Я питон не знаю, и мне он кажется каким-то стремным( Какими прогами на питоне не пользовался, они такие глючные... может конечно ошибаюсь.
А если ты php и питон знаешь, то какие проблемы переписать код?