<![CDATA[
<center><?php
/*
*
* SA:MP Query Script
* by delux himself
*
* make sure to buy your server at delux-host.com
*
*/
// Server to query
$sConfig['ip'] = "80.249.169.1";
$serverConf['port'] = 7784;
// Query Server classes by the SA:MP team or someone else
class QueryServer
{
// Private variables used for the query-ing.
private $szServerIP;
private $iPort;
private $rSocketID;
private $bStatus;
// The __construct function gets called automatically
// by PHP once the class gets initialized.
function __construct( $szServerIP, $iPort )
{
$this->szServerIP = $this->VerifyAddress( $szServerIP );
$this->iPort = $iPort;
if (empty( $this->szServerIP ) || !is_numeric( $iPort )) {
throw new QueryServerException( 'Either the ip-address or the port isn\'t filled in correctly.' );
}
$this->rSocketID = @fsockopen( 'udp://' . $this->szServerIP, $iPort, $iErrorNo, $szErrorStr, 5 );
if (!$this->rSocketID) {
throw new QueryServerException( 'Cannot connect to the server: ' . $szErrorStr );
}
socket_set_timeout( $this->rSocketID, 0, 100000 );
$this->bStatus = true;
}
// The VerifyAddress function verifies the given hostname/
// IP address and returns the actual IP Address.
function VerifyAddress( $szServerIP )
{
if (ip2long( $szServerIP ) !== false &&
long2ip( ip2long( $szServerIP ) ) == $szServerIP ) {
return $szServerIP;
}
$szAddress = gethostbyname( $szServerIP );
if ($szAddress == $szServerIP) {
return "";
}
return $szAddress;
}
// The SendPacket function sends a packet to the server which
// requests information, based on the type of packet send.
function SendPacket( $cPacket )
{
$szPacket = 'SAMP';
$aIpChunks = explode( '.', $this->szServerIP );
foreach( $aIpChunks as $szChunk ) {
$szPacket .= chr( $szChunk );
}
$szPacket .= chr( $this->iPort & 0xFF );
$szPacket .= chr( $this->iPort >> 8 & 0xFF );
$szPacket .= $cPacket;
return fwrite( $this->rSocketID, $szPacket, strlen( $szPacket ) );
}
// The GetPacket() function returns a specific number of bytes
// read from the socket. This uses a special way of getting stuff.
function GetPacket( $iBytes )
{
$iResponse = fread( $this->rSocketID, $iBytes );
if ($iResponse === false) {
throw new QueryServerException( 'Connection to ' . $this->szServerIP . ' failed or has dropped.' );
}
$iLength = ord( $iResponse );
if ($iLength > 0)
return fread( $this->rSocketID, $iLength );
return "";
}
// After we're done, the connection needs to be closed using
// the Close() function. Otherwise stuff might go wrong.
function Close( )
{
if ($this->rSocketID !== false) {
fclose( $this->rSocketID );
}
}
// A little function that's needed to properly convert the
// four bytes we're recieving to integers to an actual PHP
// integer. ord() can't handle value's higher then 255.
function toInteger( $szData )
{
$iInteger = 0;
$iInteger += ( ord( $szData[ 0 ] ) );
$iInteger += ( ord( $szData[ 1 ] ) << 8 );
$iInteger += ( ord( $szData[ 2 ] ) << 16 );
$iInteger += ( ord( $szData[ 3 ] ) << 24 );
if( $iInteger >= 4294967294 )
$iInteger -= 4294967296;
return $iInteger;
}
// The GetInfo() function returns basic information about the
// server, like the hostname, number of players online etc.
function GetInfo( )
{
if ($this->SendPacket('i') === false) {
throw new QueryServerException( 'Connection to ' . $this->szServerIP . ' failed or has dropped.' );
}
$szFirstData = fread( $this->rSocketID, 4 );
if (empty( $szFirstData ) || $szFirstData != 'SAMP') {
throw new QueryServerException( 'The server at ' . $this->szServerIP . ' is not an SA-MP Server.' );
}
// Pop the first seven characters returned.
fread( $this->rSocketID, 7 );
return array (
'Password' => ord( fread( $this->rSocketID, 1 ) ),
'Players' => ord( fread( $this->rSocketID, 2 ) ),
'MaxPlayers' => ord( fread( $this->rSocketID, 2 ) ),
'Hostname' => $this->GetPacket( 4 ),
'Gamemode' => $this->GetPacket( 4 ),
'Map' => $this->GetPacket( 4 )
);
}
// The GetRules() function returns the rules which are set
// on the server, e.g. the gravity, version etcetera.
function GetRules( )
{
if ($this->SendPacket('r') === false) {
throw new QueryServerException( 'Connection to ' . $this->szServerIP . ' failed or has dropped.' );
}
// Pop the first 11 bytes from the response;
fread( $this->rSocketID, 11 );
$iRuleCount = ord( fread( $this->rSocketID, 2 ) );
$aReturnArray = array( );
for( $i = 0; $i < $iRuleCount; $i ++ ) {
$szRuleName = $this->GetPacket( 1 );
$aReturnArray[ $szRuleName ] = $this->GetPacket( 1 );
}
return $aReturnArray;
}
// The GetPlayers() function is pretty much simelar to the
// detailed function, but faster and contains less information.
function GetPlayers( )
{
if ($this->SendPacket('c') === false) {
throw new QueryServerException( 'Connection to ' . $this->szServerIP . ' failed or has dropped.' );
}
// Again, pop the first eleven bytes send;
fread( $this->rSocketID, 11 );
$iPlayerCount = ord( fread( $this->rSocketID, 2 ) );
$aReturnArray = array( );
for( $i = 0; $i < $iPlayerCount; $i ++ )
{
$aReturnArray[ ] = array (
'Nickname' => $this->GetPacket( 1 ),
'Score' => $this->toInteger( fread( $this->rSocketID, 4 ) )
);
}
return $aReturnArray;
}
// The GetDetailedPlayers() function returns the player list,
// but in a detailed form inclusing the score and the ping.
function GetDetailedPlayers( )
{
if ($this->SendPacket('d') === false) {
throw new QueryServerException( 'Connection to ' . $this->szServerIP . ' failed or has dropped.' );
}
// Skip the first 11 bytes of the response;
fread( $this->rSocketID, 11 );
$iPlayerCount = ord( fread( $this->rSocketID, 2 ) );
$aReturnArray = array( );
for( $i = 0; $i < $iPlayerCount; $i ++ ) {
$aReturnArray[ ] = array(
'PlayerID' => ord( fread( $this->rSocketID, 1 ) ),
'Nickname' => $this->GetPacket( 1 ),
'Score' => $this->toInteger( fread( $this->rSocketID, 4 ) ),
'Ping' => ord( fread( $this->rSocketID, 4 ) )
);
}
return $aReturnArray;
}
}
/*********************************************
*
* The QueryServerException is used to throw errors when querying
* a specific server. That way we force the user to use proper
* error-handling, and preferably even a try-/catch statement.
*
**********************************************/
class QueryServerException extends Exception
{
// The actual error message is stored in this variable.
private $szMessage;
// Again, the __construct function gets called as soon
// as the exception is being thrown, in here we copy the message.
function __construct( $szMessage )
{
$this->szMessage = $szMessage;
}
// In order to read the exception being thrown, we have
// a .NET-like toString() function, which returns the message.
function toString( )
{
return $this->szMessage;
}
}
// ##################################################################################
// Display server type specific info on status screen
$serverIp = $sConfig['ip'] . ":" . $serverConf['port'];
// Status herausfinden
try {
$rQuery = new QueryServer( $sConfig['ip'], $serverConf['port'] );
// $rQuery = new QueryServer( "87.230.89.21", 8002 );
$aInformation = $rQuery->GetInfo( );
$aServerRules = $rQuery->GetRules( );
// $aBasicPlayer = $rQuery->GetPlayers( );
$aTotalPlayers = $rQuery->GetDetailedPlayers( );
$rQuery->Close( );
// $return .= $aInformation . "<hr />";
$serverState = true;
}
catch (QueryServerException $pError) {
// $return .= $pError->toString( ) . "<hr />";
$serverState = false;
}
if ($serverState == true) {
echo "<table border=\"0\">";
echo "<tr>";
echo "<td>";
echo "Hostname";
echo "</td><td>";
echo "<a href=\"samp://" . $serverIp . "\">" . $aInformation['Hostname'] . "</a>";
echo "</td>";
echo "</tr><tr>";
echo "<td>";
echo "IP";
echo "</td><td>";
echo "<a href=\"samp://" . $serverIp . "\">" . $serverIp . "</a>";
echo "</td>";
echo "</tr><tr>";
echo "<td valign=\"top\">";
echo "Players";
echo "</td><td valign=\"top\">";
echo $aInformation['Players'] . "/" . $aInformation['MaxPlayers'];
if ($aInformation['Players'] > 0) {
/*echo "<table border=\"0\">";
echo "<tr>";
echo "<th>ID</th><th>Nickname</th><th>Score</th><th>Ping</th>";
echo "</tr>";
foreach( $aTotalPlayers as $aPlayer ) {
echo "<tr>";
echo "<td>" . $aPlayer['PlayerID'] . "</td>";
echo "<td>" . $aPlayer['Nickname'] . "</td>";
echo "<td>" . $aPlayer['Score'] . "</td>";
echo "<td>" . $aPlayer['Ping'] . "</td>";
echo "</tr>";
}
echo "</table>"; */
}
echo "</td>";
echo "</tr>";
echo "</table>";
}
else {
echo "Server offline";
}
?>
</center>
<br>Partneroldalak: <br>
<a href="http://domain.domainshop.hu/domain.html" alt="tárhely domainregisztráció">Domain regisztráció tár és szerverszolgáltatások: domain domainnév tárhely e-mail, imap, pop3</a><br>
<a href="http://www.webtar.hu" alt="tárhely donainregisztráció">www.webtar.hu</a><br>
<a href="http://www.micropay.hu" alt="micropay">www.micropay.hu</a><br>
<a href="http://www.ingyenweb.hu" alt="ingyenweb">www.ingyenweb.hu</a><br>
<a href="http://www.videok.hu" alt="Videók">www.videok.hu</a><br>
<a href="http://www.xn--antikvrium-x4a.hu" alt="Antikvárium">www.antikvárium.hu</a><br>
<a href="http://www.ftpdir.hu" alt="ftpdir">www.ftpdir.hu</a><br>
<a href="http://xn--fotk-sqa.hu" alt="fotók">www.fotók.hu</a><br>
<a href="http://www.randi.hu" alt="Randi">www.randi.hu</a><br>
<a href="http://www.licit.hu" alt="Licit">www.licit.hu</a><br>
<a href="http://www.napivicc.hu" alt="vicc">www.napivicc.hu</a><br>
<a href="http://www.gyertyalang.hu" alt="gyertyagyújtás">www.gyertyalang.hu</a><br>
<a href="http://www.xn--helyesrs-fza2j.hu" alt="helyesírás.hu">www.helyesírás.hu</a><br>
<a href="http://domain.webtar.hu/domain.html" alt="Domain regiszráció és tárhely">Domain regisztráció</a><br>
]]>