serverlist base

/* SrcSrv.CLASS.php */
<?php
class BinHelp {
    function __construct($binstring) {
        $this->binstring = $binstring;
        $this->position = 0;
        $this->length = strlen($this->binstring);
    }

    function subbin($bytes) {
        if($this->position + $bytes <= $this->length) {
            $sub = substr($this->binstring, $this->position, $bytes);
            $this->position += $bytes;
            return $sub;
        } else { return false; }
                    }

    function remaining() { return $this->length - $this->position; }

    function int8() { if($sub = $this->subbin(1)) return ord($sub); else return false; }
    function int16() { if($sub = $this->subbin(2)) { $subsub = unpack("v", $sub); return $subsub[1]; } else return false; }
    function int32() { if($sub = $this->subbin(4)) { $subsub = unpack("V", $sub); return $subsub[1]; } else return false; }
    function float32() { if($sub = $this->subbin(4)) { $subsub = unpack("f", $sub); return $subsub[1]; } else return false; }
    function zstring() {
        if($zterm = strpos($this->binstring, "\0", $this->position)) {
            $sub = $this->subbin($zterm - $this->position);
            $this->position++;
            return $sub;
        }
    }
}

class SrcSrv {
    function __construct($server) {
        $this->sock = stream_socket_client("udp://$server");
        stream_set_timeout($this->sock, 2);
        $this->Challenge();
    }

    function Challenge() {
        fwrite($this->sock, "\xff\xff\xff\xffU\xFF\xFF\xFF\xFF");
        $resp = fread($this->sock, 1500);

        if($resp && $resp[4] == "A") {
            $hb = new BinHelp($resp);
            $hb->subbin(5);
            $this->Challenge = $hb->subbin(4);
            return true;
        }
        return false;
    }

    function Info() {
        fwrite($this->sock, "\xff\xff\xff\xffTSource Engine Query\0");
        $resp = fread($this->sock, 1500);

        if($resp && $resp[4] == "I") {
            $bh = new BinHelp($resp);
            $bh->subbin(6);
            $retn["name"] = $bh->zstring();
            $retn["map"] = $bh->zstring();
            $retn["gamedir"] = $bh->zstring();
            $retn["desc"] = $bh->zstring();
            $retn["appid"] = $bh->int16();
            $retn["players"] = $bh->int8();
            $retn["max"] = $bh->int8();
            $retn["bots"] = $bh->int8();
            $retn["dedi"] = $bh->subbin(1);
            $retn["os"] = $bh->subbin(1);
            $retn["password"] = (bool)$bh->int8();
            $retn["vac"] = (bool)$bh->int8();
            $retn["version"] = $bh->zstring();

            if($edf = $bh->int8()) {
                if($edf & 0x80)
                    $retn["port"] = $bh->int16();
                if($edf & 0x20)
                    $retn["tags"] = $bh->zstring();
            }

            return $retn;
        }

        return false;
    }

    function Players() {
        fwrite($this->sock, "\xff\xff\xff\xffU" . $this->Challenge);
        $resp = fread($this->sock, 1500);

        if($resp && $resp[4] == "D") {
            $hb = new BinHelp($resp);
            $hb->subbin(6-1); // -1 fixed this.
            $players = $hb->int8();
            while($hb->remaining() > 0) {
                $hb->int8();
                $retn[] = array("name" => $hb->zstring(), "score" => $hb->int32(), "time" => $hb->float32()/60 );
            }
            return $retn;
        }

        return false;
    }
}
?>


<?php
/* setup */

$server = new SrcSrv("ip:port");
$info = $server->Info(); // $info['name'] ['map'] ['players'] ['max'] , you get the point
$players = $server->Players(); // $players['name'] ['score'] ['time']
$checkin = $time + 60*5;
$time = file_get_contents("time.cache");

/* remove this line after running it once */

file_put_contents("time.cache", time());

/* this stores data */

if ($checkin >= $time + 60*5)
{
    /* these two for every server lol, kind of drawlin, but it cut load time down for me */
    file_put_contents("info.cache", $info);
    file_put_contents("players.cache", $players);
    /* these two for every server lol, kind of drawlin, but it cut load time down for me */
    file_put_contents("time.cache", time());
}

/* the echo code */

$info1 = file("info.cache");
$players1 = file("players.cache");

echo "<table><tbody>
    <tr>
    <td> GMOD_ICON_HERE </td>
    <td> Server Name </td>
    <td>".$info1['map']."</td>
    <td>".$info1['gamedir']."</td>
    <td>".$info1['players']." / ".$info1['max']."</td></tr>";

echo "<tr><td>NextServerStuff, copy/paste/edit, gg";


/* end the table */
echo "</tbody></table>";

?>