Perl + server query = Help

[prevail]

Hi!

Does anyone know how to find number of players on a game server? Is it possible to make a script that does this?

Thanks in advance

[Doggie52]

From the server console? Over a website?

[d4f]

From a website:
Php Class
(You obviously need php knowledge for that but I could help you)

From gameserver:
Take a look at mattie.info

[prevail]

Hi!

I was thinking from a game server. I'm just wondering how they manage to find the number since interaction between clients and server happens through UDP packets

Thanks for the replies, i'll check it out

[d4f]

They do it on server side, the engine actually knows how many peeps there are (stores it in its internal memory-database)

[prevail]

d4f Wrote:They do it on server side, the engine actually knows how many peeps there are (stores it in its internal memory-database)

Hi!

I see there is a source query protocol. Has anyone here used this with Perl? Or is there anyone with perl knowledge that can help me out?

[prevail]

Bump

I figured out how to retrieve the a2s_info packet respons the server sends back, but not how to get information like max players, server name etc from the packet. Can someone help me with this as I've spent countless of hours googeling and posting on other forums.

This is how it is done in PHP (below), but i have to do this in Perl.

PHP Code:

function getServerData() 
    { 
        $this->writeData($this->getQuery("A2S_INFO")); 
        
        $this->getData("byte"); 
        $this->getString(); 
        $this->serverData['hostname']   = $this->getString(); 
        $this->serverData['map']        = $this->getString(); 
        $this->getString(); 
        $this->serverData['mod']        = $this->getString(); 
        $this->serverData['players']    = $this->getData("byte"); 
        $this->serverData['maxplayers'] = $this->getData("byte"); 
        $this->getData("byte"); 
        $this->serverData['servertype'] = (chr($this->getData("byte")) == "d") ? "Dedicated" : "Listen"; 
        $this->serverData['server_os']  = (chr($this->getData("byte")) == "w") ? "Windows" : "Linux"; 
        $this->serverData['password']       = $this->getData("byte"); 
        $this->getData("byte"); 
        $this->getString(); 
        $this->getString(); 
        $this->getString(); 
        $this->getData("long"); 
        $this->getData("long"); 
        $this->getData("byte"); 
        $this->getData("byte"); 
        $this->serverData['vac']        = $this->getData("byte"); 
        $this->getData("byte"); 
    } 


[Mooga]

I will try to forward a link off to LART next time I see him online.

[prevail]

Mooga Wrote:I will try to forward a link off to LART next time I see him online.

Hi!

Thanks! I appreciate you doing that!

Edit: Problem solved