Script php permettant d'afficher le pagerank d'un site
Ce petit code source php vous permet de calculer le pagerank de votre site ou d'une page web.
Si vous avez la possibilité de placer du code PHP dans les pages de votre site, vous pouvez utiliser ce script tel quel en le complétant par une série d’images de votre choix, à placer dans un répertoire ‘images’ située au même niveau que ce script.
<?php
define( '_2p32', 4294967296 );
define( '_2p31', 2147483648 );
function str2num( $s, $c, $m)
{
$l = strlen( $s );
for ( $i = 0; $i < $l; $i++ )
{
if (( $c *= $m ) >= _2p32 )
{
$c -= _2p32 * (int) ( $c / _2p32 );
if ( $c < -_2p31 ) $c = ( $c + _2p32 );
}
$c += ord( $s{ $i } );
}
return $c;
}
function hash_url( $s )
{
$a = str2num( $s, 0x1505, 0x21 ) >> 2;
$b = str2num( $s, 0x0, 0x1003F );
$a = $a >> 4 & 0x3FFFFC0 | $a & 0x3F;
$a = $a >> 4 & 0x3FFC00 | $a & 0x3FF;
$a = $a >> 4 & 0x3C000 | $a & 0x3FFF;
return (( $a & 0x3C0 ) << 4 | $a & 0x3C ) << 2 | $b & 0xF0F | (( $a & 0xFFFFC000 ) << 4 | $a & 0x3C00 ) << 10 | $b & 0xF0F0000;
}
function check_hash( $h )
{
$c = $f = 0;
$hs = sprintf( '%u', $h ) ;
$l = strlen( $hs );
for ( $i = $l - 1; $i >= 0; $i--, $f++, $c += $r )
{
$r = $hs{ $i };
if ( 1 === ( $f % 2 ))
{
$r <<= 1;
$r = (int) ( $r / 10 + $r % 10 );
}
}
if (( $c %= 10 ) !== 0 )
{
$c = 10 - $c;
if (( $f % 2 ) === 1 )
{
if (( $c % 2 ) === 1 ) $c += 9;
$c >>= 1;
}
}
return '7'.$c.$hs;
}
$pr = "na";
if ( $f = fsockopen( "www.google.com", 80, $n, $s, 30 ))
{
$u = $_GET['url'];
fwrite( $f, "GET /search?client=navclient-auto&ch=".check_hash( hash_url( $u ))."&features=Rank&q=info:".$u." HTTP/1.1\r\nHost: www.google.com\r\nConnection: Close\r\n\r\n" );
while ( ! feof( $f ))
{
$d = fgets( $f, 128 );
$p = strpos( $d, "Rank_" );
if ( $p !== false )
{
$pr = intval( substr( $d, $p + 9 ));
break;
}
}
}
header("Content-type: image/gif");
readfile("images/pagerank-".$pr.".gif");
fclose($f);
?>
| Date d'ajout : | 17/07/2011 |
| Catégorie : | Algorithmes |
| Vues : | 234 |
| Auteur : | Lejeune Cédric |
| [ Site Web ] [ Email ] | |
Dernières actualités
- 15 Mars 2012
- 14 Mars 2012
- 14 Mars 2012
- 19 Janvier 2012
- 09 Janvier 2012
www.editeurscripts.com
www.turfomania.fr
www.banques-en-ligne.fr
www.esfacturesdevis.com
![]() |
Température actuelle : 12°C Condition actuelle : Temps clair |
Humidité : 62 %
Vent : E à 23 km/h





