ezAPI PHP - Who's Online

PHP Implementation of Who's Online

by neotalon

error: error in communication with ezAPI

Code:

$pub       = 'beta'; 
    $boardid   = 'bezboard'; 
    $boardname = 'Help Forums';

// $text = @fopen('http:'.$pub.'.ezboard.com/'.$boardid.'.ezAPIWhosOnline'); 
    $text = ezAPI_get($pub,$boardid.'.ezAPIWhosOnline');
          
    $array = explode("\r",$text); 
     
    // print_r($array);

if ( $array[0] == "wo_retcode" ) { 
        $start = 0; 
    } else { 
        if ( $array[1] == "wo_retcode" ) { 
            $start = 1; 
        } else { 
            if ( $array[2] == "wo_retcode" ) { 
                $start = 2; 
            } else { 
                $start = 3; 
            } 
        } 
    } 
     
    for ( $x=$start; $x<count($array); $x=$x+2 ) 
    { 
        $ezAPI[rtrim(ltrim($array[$x]))] = rtrim(ltrim($array[$x+1])); 
    } 
     
    if ( $ezAPI['wo_retcode'] == "OK" ) {

echo 'Whos Online statistics for <a href="http://'.$pub.'.ezboard.com/'.$boardid.'">'.$boardname."</a><br /> \n"; 
        echo $ezAPI{wo_visitors}.' visitors in the last 15 minutes: '.$ezAPI{wo_members}.' Members - '.$ezAPI{wo_guests}.' Guests - '.$ezAPI{wo_anonymous}." Anonymous\n";

$names          = explode(",",$ezAPI[wo_ids]); 
        $namesformatted = explode(",",$ezAPI[wo_names]); 
	echo "<p>";
        for ( $x=0; $x<count($names); $x++ ) { 
            if ( $names[$x] != '' and $names[$x] != ' ' ) { 
                echo ' - <a href="http://'.$pub.'.ezboard.com/'.$boardid.'.showUserPublicProfile?gid='.$names[$x].'">'.$namesformatted[$x].'</a> '; 
            } 
        } 
	echo " - </p>";
    } else { 
        echo "error: error in communication with ezAPI"; 
         
//        echo $text; 
//        print_r($ezAPI); 
    }

function ezAPI_get($pub,$dir,$text='') 
{ 
    // this will retrieve data from ezboard as HTTP get data 
    $head  = "GET /".$dir." HTTP/1.1\r\n"; 
    $head .= "Host: ".$pub.".ezboard.com\r\n"; 
    $head .= "Accept: */*\r\n"; 
    $head .= "Accept-Language: en-us\r\n"; 
    $head .= "Connection: close\r\n"; 
    $head .= "Referer: http://www.neotalon.com\r\n"; 
    $head .= "User-Agent: Neo Talon's ezAPI\r\n"; 
    $head .= "Content-length: ".strlen($text)."\r\n\r\n"; 
    $fp = fsockopen($pub.".ezboard.com","80",$errno,$errstr);

if ( $fp ) {

fputs($fp,$head.$text);

while (!feof($fp)) { 
            $data .= fgets($fp); 
        } 
     
        $linepos = strpos($data,"\r\n\r",strpos($data,'Content-Length')); 
        $head = substr($data,0,$linepos); 
        $newdata = substr($data,$linepos); 
        $newdata = str_replace("\n","",$newdata);

} else {

$newdata = "error: unable to connect"; 
         
    }

return($newdata);

}