Rezultate 1 la 10 din 16

Subiect: Script in PHP pentru aflare PR

Afișare hibrid

  1. #1
    Avatarul lui Seinfeld
    Seinfeld este deconectat Membru SeoPedia
    Reputatie:
    39
    Data înscrierii
    20th May 2007
    Locaţie
    Bucuresti
    Vârstă
    44
    Posturi
    863
    Putere Rep
    39


    Implicit

    Am si eu unul in calculator cu care m-am jucat mai demult. La mine functioneaza, acum vezi daca e ce iti trebuie tie:
    Cod PHP:
    <?php

    if ((!isset($_POST['urls'])) && (!isset($_GET['urls'])))
    { echo 
    '<center><form action="" method="post"><textarea name="urls">www.</textarea><br /><input type="submit" name="Submit" value="Calculeaza pagerank"></form></center>'; }
    if (isset(
    $_POST['urls']))
    {
    $tempurls=$_POST['urls'];
    $pieces explode("\n"$tempurls);
    $size=sizeof($pieces);


    $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// 2^32

    $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($String0x15050x21);
    $Check2 StrToNum($String00x1003F);

    $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)) <<) | ($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 (
    === ($Flag 2)) {
    $Re += $Re;
    $Re = (int)($Re 10) + ($Re 10);
    }
    $CheckByte += $Re;
    $Flag ++;
    }

    $CheckByte %= 10;
    if (
    !== $CheckByte) {
    $CheckByte 10 $CheckByte;
    if (
    === ($Flag 2) ) {
    if (
    === ($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($googlehost80$errno$errstr30);
    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($fp128);
    $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 
    pagerank($url,$width=40,$method='style') {
    if (!
    preg_match('/^(http:\/\/)?([^\/]+)/i'$url)) { $url='http://'.$url; }
    $pr=getpr($url);
    $pagerank="PageRank: $pr/10";


    if (
    $method == 'image') {
    $prpos=$width*$pr/10;
    $prneg=$width-$prpos;
    $html='<img src="http://www.google.com/images/pos.gif" width='.$prpos.' height=4 border=0 alt="'.$pagerank.'"><img src="http://www.google.com/images/neg.gif" width='.$prneg.' height=4 border=0 alt="'.$pagerank.'">';
    }

    if (
    $method == 'style') {
    $prpercent=100*$pr/10;
    $html='<div style="position: relative; width: '.$width.'px; padding: 0; background: #D9D9D9;"><strong style="width: '.$prpercent.'%; display: block; position: relative; background: #5EAA5E; text-align: center; color: #333; height: 4px; line-height: 4px;"><span></span></strong></div>';
    }

    $out='<a href="'.$url.'" title="'.$pagerank.'">'.$html.'</a>';
    return 
    $out." PageRank = ".$pr." /10<br>";
    }


    for (
    $j=0$j<$size$j++)
    {
    $url=$pieces[$j];
    echo 
    $pieces[$j].pagerank($pieces[$j]);
    }

    }
    ?>
    Vă mai aduceți aminte de jocurile copilăriei ?

  2. #2
    Avatarul lui Marius Cristian
    Marius Cristian este deconectat Ambasador
    Reputatie:
    53
    Data înscrierii
    14th January 2007
    Locaţie
    Bucuresti, Romania
    Posturi
    1.519
    Putere Rep
    53


    Implicit

    Cel mai bun de pana acum. Daca nu merge link-ul direct se rezolva adaugand un "/" la sfarsit. Insa nu merge, bienintels, daca e un link care are o extensie cu sau fara parametrii (.html, .php?param1=12 samd). Am mai obtinut cateva rateuri. Ce e drept, foarte putine.



    Citat Postat în original de Seinfeld Vezi Post
    Am si eu unul in calculator cu care m-am jucat mai demult. La mine functioneaza, acum vezi daca e ce iti trebuie tie:
    Cod PHP:
    <?php

    if ((!isset($_POST['urls'])) && (!isset($_GET['urls'])))
    { echo 
    '<center><form action="" method="post"><textarea name="urls">www.</textarea><br /><input type="submit" name="Submit" value="Calculeaza pagerank"></form></center>'; }
    if (isset(
    $_POST['urls']))
    {
    $tempurls=$_POST['urls'];
    $pieces explode("\n"$tempurls);
    $size=sizeof($pieces);


    $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// 2^32

    $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($String0x15050x21);
    $Check2 StrToNum($String00x1003F);

    $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)) <<) | ($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 (
    === ($Flag 2)) {
    $Re += $Re;
    $Re = (int)($Re 10) + ($Re 10);
    }
    $CheckByte += $Re;
    $Flag ++;
    }

    $CheckByte %= 10;
    if (
    !== $CheckByte) {
    $CheckByte 10 $CheckByte;
    if (
    === ($Flag 2) ) {
    if (
    === ($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($googlehost80$errno$errstr30);
    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($fp128);
    $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 
    pagerank($url,$width=40,$method='style') {
    if (!
    preg_match('/^(http:\/\/)?([^\/]+)/i'$url)) { $url='http://'.$url; }
    $pr=getpr($url);
    $pagerank="PageRank: $pr/10";


    if (
    $method == 'image') {
    $prpos=$width*$pr/10;
    $prneg=$width-$prpos;
    $html='<img src="http://www.google.com/images/pos.gif" width='.$prpos.' height=4 border=0 alt="'.$pagerank.'"><img src="http://www.google.com/images/neg.gif" width='.$prneg.' height=4 border=0 alt="'.$pagerank.'">';
    }

    if (
    $method == 'style') {
    $prpercent=100*$pr/10;
    $html='<div style="position: relative; width: '.$width.'px; padding: 0; background: #D9D9D9;"><strong style="width: '.$prpercent.'%; display: block; position: relative; background: #5EAA5E; text-align: center; color: #333; height: 4px; line-height: 4px;"><span></span></strong></div>';
    }

    $out='<a href="'.$url.'" title="'.$pagerank.'">'.$html.'</a>';
    return 
    $out." PageRank = ".$pr." /10<br>";
    }


    for (
    $j=0$j<$size$j++)
    {
    $url=$pieces[$j];
    echo 
    $pieces[$j].pagerank($pieces[$j]);
    }

    }
    ?>

Informații subiect

Utilizatori care navighează în acest subiect

Momentan este/sunt 1 utilizator(i) care navighează în acest subiect. (0 membrii și 1 vizitatori)

Thread-uri Similare

  1. ce script recomandati ? pentru forum
    De Lupanu în forumul Client side
    Răspunsuri: 5
    Ultimul Post: 18th April 2010, 13:26
  2. Aflare informatii despre o companie
    De meetzah în forumul Bar, lobby...
    Răspunsuri: 11
    Ultimul Post: 28th December 2009, 08:55
  3. script-uri pentru director web
    De odiv în forumul Servicii web / Jobs
    Răspunsuri: 2
    Ultimul Post: 23rd September 2008, 14:07
  4. Script pentru un site de review-uri
    De thefan în forumul Utile
    Răspunsuri: 10
    Ultimul Post: 7th November 2007, 10:43
  5. Script pentru siteuri de link
    De bin_asc în forumul Utile
    Răspunsuri: 30
    Ultimul Post: 26th February 2007, 16:50

Permisiuni postare

  • Nu puteţi posta subiecte noi.
  • Nu puteţi răspunde la subiecte
  • Nu puteţi adăuga ataşamente
  • Nu puteţi modifica posturile proprii
  •