\n$errstr($errno)
\n";
return False;
}
fputs($fp, "GET /room/getusers.cgi HTTP/1.0\r\nUser-Agent: Ohmylove Inc.\r\nHost: 211.169.240.33\r\nCache-Control: no-cache\r\n\r\n");
if( feof($fp) ) {
$ResultMessage = "Error: GetUserData: 0001";
return False;
}
$str = fgets($fp,1024);
$s = "HTTP/1.1 200 OK";
if ( !substr($str, 0, strlen($s)) == $s ) {
$ResultMessage = "Error: GetUserData: 0010";
return False;
}
$stage = 0;
$str = "";
while (!feof($fp)) {
$s = fgets($fp,1024);
switch( $stage ) {
case "0";
if( $s == "\r\n" ) {
$stage = 1;
}
break;
case "1";
$stage = 2;
break;
case "2";
$str .= $s;
break;
}
}
fclose($fp);
$ResultMessage = $str;
return True;
}
?>
\n";
$res = GetUserData($ResultMessage);
if( ! $res ) {
print "Error:0001
\n$ResultMessage
\n";
} else {
$Users = SepaUsers($ResultMessage);
print "\n";
foreach( $Users as $v ) {
print "\t\n";
$clist = explode("\x05",$v);
$ccount = count($clist);
for( $i=0; $i<$ccount; $i++ ) {
if( $clist[$i] ) {
$dt = $clist[$i];
} else {
$dt = " ";
}
switch($i) {
case 0;
case 1;
case 2;
case 3;
case 8;
case 11;
$dt = CnvUserName($dt);
break;
}
switch($i) {
case 11;
if( $clist[11] == $clist[3] ) { $dt = " "; }
case 1;
case 3;
case 8;
// default;
if( ($i == 3 or $i == 11) and ! ereg("^(192|169|127)",$dt) ) {
$dt = "$dt";
}
print "\t\t| $dt | \n";
}
// if( $i == 3 ) {
// $name = gethostbyaddr( $dt );
// print "\t\t$dt | \n";
// }
}
print "\t
\n";
}
print "
\n";
}
?>