Merge pull request #54 from leojonathanoh/fix/web-admintasks-fix-exce…

…ptions-in-tools-perlcontrol-and-tools-synchronize Fix (web/admintasks): Fix exceptions in `tools_perlcontrol` and `tools_synchronize`
startersclan · Feb 4, 2024 · ae8eea0 · ae8eea0
2 parents 442a398 + 37cc746
commit ae8eea0
Show file tree

Hide file tree

Showing 2 changed files with 7 additions and 3 deletions.
diff --git a/src/web/pages/admintasks/tools_perlcontrol.php b/src/web/pages/admintasks/tools_perlcontrol.php
@@ -96,7 +96,9 @@
 		$answer     = "";
 		$packets    = 0;
 		$read       = array($socket);
-		while (socket_select($read, $write = NULL, $except = NULL, $timeout) > 0) {
+		$write = NULL;
+		$except = NULL;
+		while (socket_select($read, $write, $except, $timeout) > 0) {
 			$recv_bytes += socket_recvfrom($socket, $buffer, 2000, 0, $host, $port);
 			$answer     .= $buffer;
 			$buffer     = "";
@@ -160,4 +162,4 @@
 
 <?php
     }
-?>    
+?>    
diff --git a/src/web/pages/admintasks/tools_synchronize.php b/src/web/pages/admintasks/tools_synchronize.php
@@ -106,7 +106,9 @@ function hide_cheaters($query)  {
       $answer     = "";
       $packets    = 0;
       $read       = array($socket);
-      while (socket_select($read, $write = NULL, $except = NULL, &$timeout) > 0) {
+      $write = NULL;
+      $except = NULL;
+      while (socket_select($read, $write, $except, &$timeout) > 0) {
         $recv_bytes += socket_recvfrom($socket, &$buffer, 2000, 0, &$host, &$port);
         if (($buffer[0] == chr(255)) && ($buffer[1] == chr(255)) && ($buffer[2] == "Z") && ($buffer[3] == chr(255)) && 
             ($buffer[4] == "1") && ($buffer[5] == ".") && ($buffer[6] == "0") && ($buffer[7] == "0") && ($buffer[8] == chr(255))) {