Adding upstream version 2.4.0.upstream/2.4.0upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 26 insertions, 0 deletions

diff --git a/library/Businessprocess/Web/FakeRequest.php b/library/Businessprocess/Web/FakeRequest.php
new file mode 100644
index 0000000..4e54117
--- /dev/null
+++ b/library/Businessprocess/Web/FakeRequest.php
@@ -0,0 +1,26 @@
+<?php
+
+namespace Icinga\Module\Businessprocess\Web;
+
+use Icinga\Exception\ProgrammingError;
+use Icinga\Web\Request;
+
+class FakeRequest extends Request
+{
+    /** @var string */
+    private static $baseUrl;
+
+    public static function setConfiguredBaseUrl($url)
+    {
+        self::$baseUrl = $url;
+    }
+
+    public function getBaseUrl($raw = false)
+    {
+        if (self::$baseUrl === null) {
+            throw new ProgrammingError('Cannot determine base URL on CLI if not configured');
+        } else {
+            return self::$baseUrl;
+        }
+    }
+}