Navigacija

Vartotojų tinkle

Prisijungusių svečių: 562
Prisijungusių narių: 0
Prisijungusių narių nėra

Registruoti nariai: 25,955
Naujausias narys: Johny

Naujausi straipsniai

Paskutiniai nariai

Johny10:52:03
Reikalas 3 savaitės
Jaunelis 9 savaitės
lanis10 savaitės
And2s11 savaitės
Memento Mori15 savaitės
ozzWANTED16 savaitės
Quwqkibor18 savaitės
asirija22 savaitės
tomeem24 savaitės
weberiz27 savaitės
mRokass29 savaitės
kartoonas31 savaitės
iaescortsmap31 savaitės
grunskiz33 savaitės
Bruksnys34 savaitės
illusion34 savaitės
ordo35 savaitės
Jurgaila36 savaitės
originalcs1636 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 3.135.246.245
Naujienų: 529
Straipsnių: 235
Temų: 52,588
Postų: 522,530
Postų pask. parą: 2
Shout'ų pask. parą: 0
P.S.C. pask. parą: 2
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo

Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

Jaunelis
2024 Lie. 25 11:07:43
Oho vis dar veikia svetainė akinanti šypsen Šimtas metų, matau Šaukykloje nuostalgija. Smagu panaršyt po forumą ir pažiūrėt senas temas šypsosi

And2s
2024 Lie. 17 19:07:04
2008 pirmą kart čia patekau, man buvo 10m ir čia pramokau programavimo.. smagu skaityti senas žinutes, tokia nostalgija akinanti šypsen ačiū Ozz kad saugoji šitą kultūrinį reliktą šypsosi

ozzWANTED
2024 Sau. 17 01:01:00
Desperatiškus komentarus šaukykloje su accountu po mėnesio prasibuvimo, ištryniau. Pasaulis ir taip juodas. Įjungiam šviesą, prašviesės. šypsosi

Majakas
2023 Gru. 10 19:12:39
Negaliu patikėti jog žinutės/pranešimai visi yra nuo 2008 m akinanti šypsen

Žmogus
2023 Rugs. 7 21:09:14
O gal BloodKiller pasijungs?

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
istaisykit
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | Bendri PHP-F klausimai

Autorius: WriteMaster Peržiūrų: 4405      Spausdinti temą
2008 Rugs. 27 09:09:56          1 žinutė iš 15
Spausdinti pranešimą
Stai kodas:
<?php


if (!defined("IN_FUSION")) { header("Location:../../index.php"); exit; }

// Check if locale file is available matching the current site locale setting.
if (file_exists(INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php")) {
   // Load the locale file matching the current site locale setting.
   include INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php";
} else {
   // Load the infusion's default locale file.
   include INFUSIONS."css_qs_panel/locale/English.php";
}


$map;
$players;
$servername;
$maxplayers;
$bots;
$success;

$serveroutput = create_table();

opentable("Serveriu monitorius");
Echo "<table width='100%' valign='top' cellpadding='1' cellspacing='1' class='tbl-border'>
     <tr>
     <td class = 'tbl2'></td>
     <td class = 'tbl2' align='center'>Serverio Pavadinimas</td>
     <td class = 'tbl2' align='center'>IP Adresas</td>
     <td class = 'tbl2' align='center'>Dabartinis Map'as</td>
     <td class = 'tbl2' align='center'>Zaidejei</td>
     <td class = 'tbl2' width='5%'>Statusas</td>
     <td class = 'tbl2' align='center'>Connect</td>
     </tr>
     $serveroutput
     </table>
   ";
closetable(); 

//functions

function create_table()
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
    global $db_prefix;
   
   $list = "";
   $result = dbquery("SELECT * FROM ".$db_prefix."css_qs_servers ORDER BY css_qs_server_order ASC");
   $rows = dbrows($result);
      if ($rows != 0) 
      {
        while($data = dbarray($result))
        {
          foreach($data as $key=>$value)
           {
              $$key = $value;
            }
          
         $server_status = query_server($css_qs_server_type,$css_qs_server_address,$css_qs_server_port);
         
         if ($success == 1)
         {
           $players = $players." / ".$maxplayers." (".$bots.")";
         }
         
         if ($css_qs_server_type != "TeamSpeak" && $success == 1)
         {
           $actions = "<a href='steam://connect ".$css_qs_server_address.":".$css_qs_server_port."'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/connect.png' title='connect''></a>";
         }
         else
         {
         $actions = "No Actions";
          }
      
          $list .= "<tr><td align='center' valign='middle' class='tbl1' width='10'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/".$css_qs_server_image."'></td>
                  <td align='center' vaiign='middle' class='tbl1'>".$css_qs_server_Name."</td>
                  <td align='center' valign='middle' class='tbl1'>".$css_qs_server_address.":".$css_qs_server_port."</td>
                  <td align='center' valign='middle' class='tbl1'>".$map."</td>
                  <td align='center' valign='middle' class='tbl1'>".$players."</td>
                  <td align='center' valign='middle' class='tbl1'>$server_status</td>
                  <td align='center' valign='middle' class='tbl1'>$actions</td></tr>";
        }
       }
       else
       {
        $list = "<tr><td align='center' valign='middle' colspan='7'>Nera nustatytu serveriu!</td></tr>";       
      }
      
      if ($rows >= 4)
      {
      $list .= "<tr><td align='center' valign='middle' colspan='7'><font size='10'>Copyright &copy; Emty  2008</font></td></tr>";
      }
      return $list;
}

function query_server($type,$ip,$port)
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
   
   $success = 0;
   
   $map = "N/A";
   $players = "N/A";
   $servername = "N/A";
   $maxplayers = "N/A";
   $bots = "N/A";
   
   if ($type == "Counter Strike") //Source Query
   {
      
      $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
      
       if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
         
         $success = 1;
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextbytevalue($server_info);
         $junk = getnextbytevalue($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         $bots = getnextbytevalue($server_info);
                  
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
       
   }
   elseif ($type == "TeamSpeak")// Teamspeak Query
   {
   
    if (!$fp = @fsockopen($ip,$port))
    {
      $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
     }
    else
    {
      socket_set_timeout($fp,1,0);
      $data = fread($fp,4);
       fputs($fp, "quit");
      fclose($fp);
   
       if ($data == "[TS]")
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>" ;
       }
        else
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='KLAIDA'>";
        }   
    } 
     }
     elseif ($type == "CounterStrike 1.6")
     {
        $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
        
        if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
          $success = 1;
         $junk = getnextstring($server_info);
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
         
    }
     
    return $output;
}   

function getnextstring(&$data)
    {
       $temp="";
       $counter=0;
       while (ord($data[$counter++])!=0) $temp.=$data[$counter-1];
       $data=substr($data,strlen($temp)+1);
       return $temp;
   }
   
function getnextbytevalue(&$data)
   {
     $temp=ord($data[0]);
     $data=substr($data,1);
     return $temp;
   }


  echo "<center>Jai norite kad cia butu patalpintas jusu serverio monitorius susisiekite su administracija! (<b>Patalpinimas Kainuos tik 1lt</b>)</center>";

?>



Ten kur apibraukiau zalia spalva ten tokia mano beda noriu kad nebutu 2 celipsu bet kai nutrinu kode opentable... tada issitampo webas :| gal pagelbesit? beto dejau sita i pridetinius...




2008 Rugs. 27 09:09:04          2 žinutė iš 15
Spausdinti pranešimą
taigi daryk su opentable ir iscentruok

www.stylingparts.eu-viskas jūsų automobiliams už geriausią kainą.
2008 Rugs. 27 09:09:45          3 žinutė iš 15
Spausdinti pranešimą
tai ka cia kalbesi geriau pats padaryk tipo texta iscentruoti ? galvoja

2008 Rugs. 27 09:09:03          4 žinutė iš 15
Spausdinti pranešimą
<center>?>php


if (!defined("IN_FUSION")) { header("Location:../../index.php"); exit; }

// Check if locale file is available matching the current site locale setting.
if (file_exists(INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php")) {
   // Load the locale file matching the current site locale setting.
   include INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php";
} else {
   // Load the infusion's default locale file.
   include INFUSIONS."css_qs_panel/locale/English.php";
}


$map;
$players;
$servername;
$maxplayers;
$bots;
$success;

$serveroutput = create_table();

opentable("Serveriu monitorius");
Echo "<table width='100%' valign='top' cellpadding='1' cellspacing='1' class='tbl-border'>
     <tr>
     <td class = 'tbl2'></td>
     <td class = 'tbl2' align='center'>Serverio Pavadinimas</td>
     <td class = 'tbl2' align='center'>IP Adresas</td>
     <td class = 'tbl2' align='center'>Dabartinis Map'as</td>
     <td class = 'tbl2' align='center'>Zaidejei</td>
     <td class = 'tbl2' width='5%'>Statusas</td>
     <td class = 'tbl2' align='center'>Connect</td>
     </tr>
     $serveroutput
     </table>
   ";
closetable(); 

//functions

function create_table()
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
    global $db_prefix;
   
   $list = "";
   $result = dbquery("SELECT * FROM ".$db_prefix."css_qs_servers ORDER BY css_qs_server_order ASC");
   $rows = dbrows($result);
      if ($rows != 0) 
      {
        while($data = dbarray($result))
        {
          foreach($data as $key=>$value)
           {
              $$key = $value;
            }
          
         $server_status = query_server($css_qs_server_type,$css_qs_server_address,$css_qs_server_port);
         
         if ($success == 1)
         {
           $players = $players." / ".$maxplayers." (".$bots.")";
         }
         
         if ($css_qs_server_type != "TeamSpeak" && $success == 1)
         {
           $actions = "<a href='steam://connect ".$css_qs_server_address.":".$css_qs_server_port."'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/connect.png' title='connect''></a>";
         }
         else
         {
         $actions = "No Actions";
          }
      
          $list .= "<tr><td align='center' valign='middle' class='tbl1' width='10'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/".$css_qs_server_image."'></td>
                  <td align='center' vaiign='middle' class='tbl1'>".$css_qs_server_Name."</td>
                  <td align='center' valign='middle' class='tbl1'>".$css_qs_server_address.":".$css_qs_server_port."</td>
                  <td align='center' valign='middle' class='tbl1'>".$map."</td>
                  <td align='center' valign='middle' class='tbl1'>".$players."</td>
                  <td align='center' valign='middle' class='tbl1'>$server_status</td>
                  <td align='center' valign='middle' class='tbl1'>$actions</td></tr>";
        }
       }
       else
       {
        $list = "<tr><td align='center' valign='middle' colspan='7'>Nera nustatytu serveriu!</td></tr>";       
      }
      
      if ($rows >= 4)
      {
      $list .= "<tr><td align='center' valign='middle' colspan='7'><font size='10'>Copyright &copy; Emty  2008</font></td></tr>";
      }
      return $list;
}

function query_server($type,$ip,$port)
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
   
   $success = 0;
   
   $map = "N/A";
   $players = "N/A";
   $servername = "N/A";
   $maxplayers = "N/A";
   $bots = "N/A";
   
   if ($type == "Counter Strike") //Source Query
   {
      
      $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
      
       if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
         
         $success = 1;
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextbytevalue($server_info);
         $junk = getnextbytevalue($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         $bots = getnextbytevalue($server_info);
                  
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
       
   }
   elseif ($type == "TeamSpeak")// Teamspeak Query
   {
   
    if (!$fp = @fsockopen($ip,$port))
    {
      $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
     }
    else
    {
      socket_set_timeout($fp,1,0);
      $data = fread($fp,4);
       fputs($fp, "quit");
      fclose($fp);
   
       if ($data == "[TS]")
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>" ;
       }
        else
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='KLAIDA'>";
        }   
    } 
     }
     elseif ($type == "CounterStrike 1.6")
     {
        $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
        
        if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
          $success = 1;
         $junk = getnextstring($server_info);
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
         
    }
     
    return $output;
}   

function getnextstring(&$data)
    {
       $temp="";
       $counter=0;
       while (ord($data[$counter++])!=0) $temp.=$data[$counter-1];
       $data=substr($data,strlen($temp)+1);
       return $temp;
   }
   
function getnextbytevalue(&$data)
   {
     $temp=ord($data[0]);
     $data=substr($data,1);
     return $temp;
   }


  echo "<center>Jai norite kad cia butu patalpintas jusu serverio monitorius susisiekite su administracija! (<b>Patalpinimas Kainuos tik 1lt</b>)</center>";

<?</center>




www.stylingparts.eu-viskas jūsų automobiliams už geriausią kainą.
2008 Rugs. 27 09:09:32          5 žinutė iš 15
Spausdinti pranešimą
Smile off.

Ir ką tu man? ;*
2008 Rugs. 27 09:09:59          6 žinutė iš 15
Spausdinti pranešimą
Parse error: syntax error, unexpected '<' in /usr/home/www/ftp/,..../administration/custom_pages.php(71) : eval()'d code on line 279


erooras todel malonek isjungti smailus ;D

2008 Rugs. 27 09:09:30          7 žinutė iš 15
Spausdinti pranešimą
Tikriausiai echo " trūksta 279 eiluėj.
2008 Rugs. 27 09:09:32          8 žinutė iš 15
Spausdinti pranešimą
nepagaunu kampo kur det echo i 279 eilute juk ji paskutine yra be žado

2008 Rugs. 27 09:09:54          9 žinutė iš 15
Spausdinti pranešimą
Tai taip ir rašyt reikėjo. Gi neskaičiuoju aš tų eilučių be žado

Tau čia atrodo viskas gerai?
<?</center>

Reikia </center> nutrint, tas pats ir su pirma eilute.
2008 Rugs. 27 09:09:50          10 žinutė iš 15
Spausdinti pranešimą
vistiek eroras 279 eilutej O.o

2008 Rugs. 27 09:09:30          11 žinutė iš 15
Spausdinti pranešimą
Rakyk koks eroras, durniau. Nervint jau pradedi.
2008 Rugs. 27 09:09:54          12 žinutė iš 15
Spausdinti pranešimą
Parse error: syntax error, unexpected '<' in /usr/home/www/ftp/..../administration/custom_pages.php(71) : eval()'d code on line 279


2008 Rugs. 27 09:09:36          13 žinutė iš 15
Spausdinti pranešimą
Veikiantis kodas:
<?

if (!defined("IN_FUSION")) { header("Location:../../index.php"); exit; }

// Check if locale file is available matching the current site locale setting.
if (file_exists(INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php")) {
   // Load the locale file matching the current site locale setting.
   include INFUSIONS."css_qs_panel/locale/".$settings['locale'].".php";
} else {
   // Load the infusion's default locale file.
   include INFUSIONS."css_qs_panel/locale/English.php";
}


$map;
$players;
$servername;
$maxplayers;
$bots;
$success;

$serveroutput = create_table();

opentable("Serveriu monitorius");
Echo "<table width='100%' valign='top' cellpadding='1' cellspacing='1' class='tbl-border'>
     <tr>
     <td class = 'tbl2'></td>
     <td class = 'tbl2' align='center'>Serverio Pavadinimas</td>
     <td class = 'tbl2' align='center'>IP Adresas</td>
     <td class = 'tbl2' align='center'>Dabartinis Map'as</td>
     <td class = 'tbl2' align='center'>Zaidejei</td>
     <td class = 'tbl2' width='5%'>Statusas</td>
     <td class = 'tbl2' align='center'>Connect</td>
     </tr>
     $serveroutput
     </table>
   ";
closetable(); 

//functions

function create_table()
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
    global $db_prefix;
   
   $list = "";
   $result = dbquery("SELECT * FROM ".$db_prefix."css_qs_servers ORDER BY css_qs_server_order ASC");
   $rows = dbrows($result);
      if ($rows != 0) 
      {
        while($data = dbarray($result))
        {
          foreach($data as $key=>$value)
           {
              $$key = $value;
            }
          
         $server_status = query_server($css_qs_server_type,$css_qs_server_address,$css_qs_server_port);
         
         if ($success == 1)
         {
           $players = $players." / ".$maxplayers." (".$bots.")";
         }
         
         if ($css_qs_server_type != "TeamSpeak" && $success == 1)
         {
           $actions = "<a href='steam://connect ".$css_qs_server_address.":".$css_qs_server_port."'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/connect.png' title='connect''></a>";
         }
         else
         {
         $actions = "No Actions";
          }
      
          $list .= "<tr><td align='center' valign='middle' class='tbl1' width='10'><img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/".$css_qs_server_image."'></td>
                  <td align='center' vaiign='middle' class='tbl1'>".$css_qs_server_Name."</td>
                  <td align='center' valign='middle' class='tbl1'>".$css_qs_server_address.":".$css_qs_server_port."</td>
                  <td align='center' valign='middle' class='tbl1'>".$map."</td>
                  <td align='center' valign='middle' class='tbl1'>".$players."</td>
                  <td align='center' valign='middle' class='tbl1'>$server_status</td>
                  <td align='center' valign='middle' class='tbl1'>$actions</td></tr>";
        }
       }
       else
       {
        $list = "<tr><td align='center' valign='middle' colspan='7'>Nera nustatytu serveriu!</td></tr>";       
      }
      
      if ($rows >= 4)
      {
      $list .= "<tr><td align='center' valign='middle' colspan='7'><font size='10'>Copyright &copy; Emty  2008</font></td></tr>";
      }
      return $list;
}

function query_server($type,$ip,$port)
{
   global $players;
   global $map;
   global $servername;
   global $maxplayers;
   global $bots;
   global $success;
   
   $success = 0;
   
   $map = "N/A";
   $players = "N/A";
   $servername = "N/A";
   $maxplayers = "N/A";
   $bots = "N/A";
   
   if ($type == "Counter Strike") //Source Query
   {
      
      $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
      
       if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
         
         $success = 1;
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextbytevalue($server_info);
         $junk = getnextbytevalue($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         $bots = getnextbytevalue($server_info);
                  
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
       
   }
   elseif ($type == "TeamSpeak")// Teamspeak Query
   {
   
    if (!$fp = @fsockopen($ip,$port))
    {
      $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
     }
    else
    {
      socket_set_timeout($fp,1,0);
      $data = fread($fp,4);
       fputs($fp, "quit");
      fclose($fp);
   
       if ($data == "[TS]")
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>" ;
       }
        else
        {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='KLAIDA'>";
        }   
    } 
     }
     elseif ($type == "CounterStrike 1.6")
     {
        $packet = "\xFF\xFF\xFF\xFFTSource Engine Query\x00";
        
        if(!$live_server = fsockopen("udp://".$ip,$port))
       {
        $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
      }
       else
       {
        fwrite($live_server, $packet);
        socket_set_timeout($live_server,1,0);
        $junk = fread($live_server,5);
        $status = socket_get_status($live_server);
        $do = 1;
        $server_info= "";
         
         while($do)
         {
           $str_1 = fread($live_server,1);
           $server_info .= $str_1;
           $status = socket_get_status($live_server);
           if($status["unread_bytes"] == 0) {$do = 0;}
         }
        fclose($live_server);
         
        if (strlen($server_info) > 0)
        {
          $success = 1;
         $junk = getnextstring($server_info);
         $servername = getnextstring($server_info);
         $map = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $junk = getnextstring($server_info);
         $players = getnextbytevalue($server_info);
         $maxplayers = getnextbytevalue($server_info);
         
         if ($players < $maxplayers)
         {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/green.gif' title='Serveris Ijungtas'>";
         }
         else
         {
           $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/yellow.gif' title='Serveris Pilnas'>";
         }
         
        }
        else
        {
          $output = "<img src='http://www.zaidimupasaulis.too.lt/infusions/css_qs_panel/images/red.gif' title='Serveris Isjungtas'>";
        }
      }
         
    }
     
    return $output;
}   

function getnextstring(&$data)
    {
       $temp="";
       $counter=0;
       while (ord($data[$counter++])!=0) $temp.=$data[$counter-1];
       $data=substr($data,strlen($temp)+1);
       return $temp;
   }
   
function getnextbytevalue(&$data)
   {
     $temp=ord($data[0]);
     $data=substr($data,1);
     return $temp;
   }


  echo "<center>Jai norite kad cia butu patalpintas jusu serverio monitorius susisiekite su administracija! (<b>Patalpinimas Kainuos tik 1lt</b>)</center>";

?>



2008 Rugs. 27 09:09:12          14 žinutė iš 15
Spausdinti pranešimą
kas is to kad veike vistiek 2 celipsai akinanti šypsen

2008 Rugs. 27 10:09:56          15 žinutė iš 15
Spausdinti pranešimą
Modo niekas neprašė manęs sukurt. Kas įdėjo to ir klausk.
Peršokti į forumą: