User:Pizzahut/msqp.php

This is a code example for querying a Half-Life master server using the PHP language.

<?php

/*

Version history

1     - Initial release.
2     - Added option to use the official domain name instead of IPs and retry if
        a timeout occurs.
2.1   - Added more master servers.
2.1.1 - Fixed a bug, program didn't terminate if all master servers time out.
2.1.2 - Removed a now redundant variable.
2.2   - Seeding for long server lists.
      - Removed the domain name because it's often better to try different
        servers.
2.2.1 - Bug fix: Timeout showed wrong master server IP.
      - Bug fix: Check whether the new seed starts with a duplicate or not.
      - Bug fix: Don't close socket twice.
2.3   - Retry queries on timeout if the first query was successful.
*/

$master_servers = array("68.142.72.250", "69.28.151.162", "72.165.61.190",
"72.165.61.189");

function query_timeout(&$socket, $seed)
{
   // region=world, filter: game=Counter-Strike
   echo "Sending query to master server.\n";
   stream_set_timeout($socket, 1.0);
   if (!fwrite($socket, "1\xFF$seed\0\\gamedir\\cstrike\0"))
   {
      fclose($socket);
      exit("fwrite error\n");
   }

   echo "Reading response header (10s timeout).\n";
   stream_set_timeout($socket, 10.0);
   $s = bin2hex(fread($socket, 6));
   $info = stream_get_meta_data($socket);
   if ($info['timed_out'])
      echo "Master server timed out.\n";
   else
   {
      if ($s !== "ffffffff660a")
      {
         fclose($socket);
         exit("Expected ff ff ff ff 66 0a (hex) but got $s.");
      }
   }
   return $info['timed_out'];
}

// Connect to master server, return timeout info.
// The socket is passed as reference and thus returned as well.

function master_server_timeout(&$socket, $ip)
{
   echo "Connecting to master server \"$ip\".\n";
   $socket = fsockopen("udp://$ip", 27010, $errno, $errstr, 1.0);
   if (!$socket)
      exit("Error $errno : $errstr \n");

   return query_timeout($socket, "0.0.0.0:0");
}

// Try all master servers unless we find one that isn't timing out.

$abort = 1;
foreach ($master_servers as $ip)
{
   if (!master_server_timeout($socket, $ip))
   {
      $abort = 0;
      break;
   }
   else
      fclose($socket);
}
if ($abort == 1)
   exit("All master servers timed out, aborting.\n");

// Read list with server addresses (IP:port).

$count = 0;
$old_a1 = 0; $old_a2 = 0; $old_a3 = 0; $old_a4 = 0; $old_a5 = 0;
$max_timeouts = 6;
do
{
   stream_set_timeout($socket, 1.0);
   $a1 = ord(fread($socket,1));
   $info = stream_get_meta_data($socket);
   if ($info['timed_out'])
   {
      for($i=1;$i<=$max_timeouts;$i++)
      {
         $t = query_timeout($socket, "$old_a1.$old_a2.$old_a3.$old_a4:$old_a5");
         if (($i == $max_timeouts) && $t)
         {
            fclose($socket);
            echo "Retrieved $count server addresses.\n";
            exit("Maximum number of timeouts reached.\n");
         }
      }
      stream_set_timeout($socket, 1.0);
      $a1 = ord(fread($socket,1));
      $info = stream_get_meta_data($socket);
      if ($info['timed_out'])
      {
         echo "Timeout occured.\n";
         break;
      }
      $check_for_duplicate = 1;
   }
   else
      $check_for_duplicate = 0;

   if ($a1 != 0)
   {
      $a2 = ord(fread($socket,1));
      $a3 = ord(fread($socket,1));
      $a4 = ord(fread($socket,1));
      $a5 = ord(fread($socket,1))*256 + ord(fread($socket,1));
      if (($check_for_duplicate==0)||($a1!=$old_a1)||($a2!=$old_a2)||
      ($a3!=$old_a3)||($a4!=$old_a4)||($a5!=$old_a5))
      {
         $count++;
         echo "$count $a1.$a2.$a3.$a4:$a5\n";
      }
      $old_a1 = $a1; $old_a2 = $a2; $old_a3 = $a3; $old_a4 = $a4; $old_a5 = $a5;
   }
} while ($a1 != 0);
fclose($socket);
echo "Retrieved $count server addresses.\n";

?>