用PHP判断oicq是否在线的小程序_PHP

OICQ 来源：keniv


function get_status($uin)
{
$fp = @fsockopen ("infocenter.tencent.com", 80, &$errno, &$errstr, 30);
if(!$fp)
{
return '出错';
}
else
{
fputs($fp, "GET /$uin/l/00/0/ HTTP/1.0\n\n");
$do = 'yes';
while(!feof($fp))
{
$line = fgets ($fp,128);
$do = ($do == 'yes')?'yes':(eregi("^GIF89", $line))?'yes':'no';
if($do == 'yes')
{
if(ereg("Online", $line))
{
return '在线';
}
elseif(ereg("Offline", $line))
{
return '没在线';
}
}

}
fclose($fp);
}
return '未知';
}
$uin='1697313'; //我自己的
echo get_status($uin);
?>