PageRank revised

por albertlg
domingo, 22 de agosto del 2004
guardado en

Como habreis podido observar, en el menú de la derecha, encima del calendario, os muestro el PageRank de mi weblog... ¡sin necesidad de tener la ToolBar de Google!

¿Y qué significa eso? Pues que utilizo un código PHP, junto con SSI para calcularlo y mostrároslo.

¿Quereis ver el código?

define('GMAG', 0xE6359A60);

//unsigned shift right

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 GCH($url, $length=null, $init=GMAG){

if(is_null($length)){

$length = sizeof($url);

}

$a = $b = 0x9E3779B9;

$c = $init;

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

}



//converts a string into an array of integers (the numeric

//value of the char)

function strord($string){

for($i=0;$i

$result[$i] = ord($string{$i});

}

return $result;

}



function getPR($_url){

$url = 'info:'.$_url;

$ch = GCH(strord($url));

$url='info:'.urlencode($_url);

$pr = file("http://www.google.com/search?client=

navclient-auto&ch=6$ch&ie=UTF-8&oe=UTF-8&

features=Rank&q=$url");

$pr_str = implode("", $pr);

return substr($pr_str,strrpos($pr_str, ":")+1);

}

echo "Mi PR es: ".getPR("http://www.albertlg.com/blog/")."";

?>

Mensajes relacionados

Deja tu comentario

Deja tu comentario
Necesitas tener javascript activado para poder dejar comentarios

Identifícate en OboLog, o crea tu blog gratis si aún no estás registrado.

De esta forma, además, podrás mostrar tu imagen en los comentarios y no tendrás que rellenar tus datos cada vez.

Sobre esta anotación

albertlg

albertlg escribió esta anotación hace 4 años. En ella habla sobre Seo.

Aún no hay ningún comentario.

Tu podrías dejar el primero.

Login

Comentarios

Hola, soy friqui (Anónimo)
HOLA  friqui...QUE HACES...BENI AMI CASA BENI A....CALLE  DIEZ...BENTE...BENTEcha...(27 dic)
Carta a los Reyes Magos (luis robles zafril)
queridos  reyes  magos  quiero  el  balon  firmado  por  ...(22 dic)
Splitweet, el gestor multicuenta y de la reputación de marca en Twitter (Ricardo Martí)
Ahora entiendo el dibujito de la comida de navidad :D Un abrazo y suerte!...(20 dic)
Cosas que odio... y una de gallegos (Evelyn)
jajajajjaja, es una de las mejores  historias que lei en mi vida!...(29 nov)
Caricaturas de South Park (paula)
ola me agregas k te vi mu wapo...(10 sep)

Más comentados

En Softonic.com algunos también bailamos el Chiki-chiki (14)
X_DDD
Me caso (6)
Albert: Laura: No Albert: Laura: ¿Todavía? Albert:
Se busca: SEO-Programador (5)
En Softonic buscamos SEO-Programador para ampliar el departamento "in-house": http://8f.xortr.com ...
1, 2, 3... y 4: Probando! (4)
El título de esta primera entrada de mi WebLog personal, a parte de metáfora inicial como prueba de ...
Caricaturas de South Park (4)
Acabo de crear mi propio personaje de South Park: Tú puedes hacer lo mismo en Create-A-Character de ...

Suscripción

Suscríbete al Feed RSS XML

También puedes suscribirte directamente con alguno de los siguientes enlaces:

  • Suscríbete en Bloglines
  • Suscríbete en Google