From e8e32f7a1194baabd6e158805f40396c667e6c56 Mon Sep 17 00:00:00 2001
From: Unrud <unrud@openaliasbox.org>
Date: Fri, 10 Mar 2017 23:02:35 +0100
Subject: Add InfCloud

---
 radicale_web/web/infcloud/auth/common.inc | 41 +++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 radicale_web/web/infcloud/auth/common.inc

(limited to 'radicale_web/web/infcloud/auth/common.inc')

diff --git a/radicale_web/web/infcloud/auth/common.inc b/radicale_web/web/infcloud/auth/common.inc
new file mode 100644
index 0000000..419cefb
--- /dev/null
+++ b/radicale_web/web/infcloud/auth/common.inc
@@ -0,0 +1,41 @@
+<?php
+	function array_to_xml($array, $skip_top_closing=false, $level=0)
+	{
+		static $result="<?xml version=\"1.0\" encoding=\"utf-8\" ?>\n";
+
+		foreach($array as $k => $v)
+		{
+			if(is_numeric($k))
+				array_to_xml($v, $skip_top_closing, $level);
+			else
+			{
+				for($j=0; $j<$level; $j++)
+					$result.="	";
+
+				$result.="<".htmlspecialchars($k);
+				if($k=='resources')
+					$result.=" xmlns=\"urn:com.inf-it:configuration\"";
+				if($v=='')
+					$result.=" />\n";
+				else
+				{
+					$result.=">";
+
+					if(is_array($v))
+					{
+						$result.="\n";
+						array_to_xml($v, $skip_top_closing, $level+1);
+						for($j=0; $j<$level; $j++)
+							$result.="	";
+					}
+					else
+						$result.=htmlspecialchars($v);
+
+					if($level!==0 || $skip_top_closing===false)
+						$result.="</".htmlspecialchars($k).">\n";
+				}
+			}
+		}
+		return $result;
+	}
+?>
\ No newline at end of file
-- 
cgit