Refactor finding server host name for urls

HTTP_HOST is empty/blank on FastCGI over QUIC

Author: carlbennett

src/Libraries/Core/Router.php

@@ -176,4 +176,12 @@ public static function query(): array
     self::$args = \array_merge($url_args, $body_args);
     return self::$args;
   }
+
+  public static function serverName(): string
+  {
+    $name = \getenv('HTTP_HOST') ?? '';
+    if (empty($name)) $name = \getenv('SERVER_NAME') ?? '';
+    if (empty($name)) $name = \getenv('HOST') ?? '';
+    return $name ?? '';
+  }
 }

src/Libraries/Core/UrlFormatter.php

@@ -32,9 +32,9 @@ public static function format(string $value): string
 
         // Current request
         $current_scheme = 'http' . ($secure ? 's' : '') . ':';
-        $current_host   = \getenv('HTTP_HOST');
-        $current_path   = \getenv('DOCUMENT_URI');
-        $current_query  = \getenv('QUERY_STRING');
+        $current_host   = \BNETDocs\Libraries\Core\Router::serverName();
+        $current_path   = \getenv('DOCUMENT_URI') ?? '';
+        $current_query  = \getenv('QUERY_STRING') ?? '';
 
         // Placeholders
         $scheme = null;

src/Templates/EventLog/View.phtml

@@ -61,7 +61,7 @@ if (!empty($tpl_referer))
 {
   $tpl_referer = '<a href="' . filter_var($tpl_referer, FILTER_SANITIZE_FULL_SPECIAL_CHARS) . '">&lt;&lt; Back to Previous</a>';
 }
-if (stripos($tpl_referer, getenv('HTTP_HOST')) === false)
+if (stripos($tpl_referer, \BNETDocs\Libraries\Core\Router::serverName()) === false)
 {
   $tpl_referer = '';
 }