* Adding CalDAV server landing

1 files changed, 232 insertions, 0 deletions

diff --git a/caldav.php b/caldav.php
new file mode 100644
index 0000000..dc7555d
--- /dev/null
+++ b/caldav.php
@@ -0,0 +1,232 @@
+<?php
+define('BASE', './');
+require_once(BASE . 'functions/init.inc.php');
+require_once(BASE . 'functions/calendar_functions.php');
+
+//require_once(BASE . 'lib/HTTP/WebDAV/Server.php');
+require_once('/home/jablko/public_html/gallery2/modules/webdav/lib/HTTP/WebDAV/Server.php');
+require_once(BASE . 'lib/HTTP/CalDAV/Server.php');
+
+class HTTP_CalDAV_Server_PHPiCalendar extends HTTP_CalDAV_Server {
+	function getBasePath() {
+		global $calendar_path;
+		static $basePath;
+
+		if (!isset($basePath)) {
+			$basePath = '';
+			$pathComponents = explode('/', $calendar_path);
+			foreach ($pathComponents as $value) {
+				if (!empty($value)) {
+					$basePath .= "/$value";
+				}
+			}
+
+			// Above is nice, but breaks relative base paths like ./calendars
+			$basePath = rtrim($calendar_path);
+		}
+
+		return $basePath;
+	}
+
+	function deletePath($absolutePath) {
+		$dirs = array();
+		$paths = array();
+		while (isset($absolutePath)) {
+			if (is_dir($absolutePath)) {
+				$handle = opendir($absolutePath);
+				if (!$handle) {
+					return;
+				}
+
+				while (($pathComponent = readdir($handle)) !== false) {
+					if ($pathComponent != '.' && $pathComponent != '..') {
+						$paths[] = "$absolutePath/$pathComponent";
+					}
+				}
+				closedir($handle);
+
+				$dirs[] = $absolutePath;
+			} else {
+				unlink($absolutePath);
+			}
+
+			$absolutePath = array_pop($paths);
+		}
+
+		$absolutePath = array_pop($dirs);
+		while (isset($absolutePath)) {
+			rmdir($absolutePath);
+			$absolutePath = array_pop($dirs);
+		}
+
+		return true;
+	}
+
+	function delete($options) {
+		$absolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() .  '/' .
+			$options['path'];
+		if (!file_exists($absolutePath)) {
+			return '404 Not Found';
+		}
+
+		return HTTP_CalDAV_Server_PHPiCalendar::deletePath($absolutePath);
+	}
+
+	function get(&$options) {
+		$absolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() . '/' .
+			$options['path'];
+
+		if (!file_exists($absolutePath)) {
+			return;
+		}
+
+		if (is_file($absolutePath)) {
+			$options['mimetype'] = 'text/calendar';
+
+			$stat = stat($absolutePath);
+			$options['mtime'] = $stat['mtime'];
+			$options['size'] = $stat['size'];
+
+			$options['stream'] = fopen($absolutePath, 'r');
+		}
+
+		return true;
+	}
+
+	function move(&$options) {
+		
+		// Body parsing not yet supported
+		if ($_SERVER['CONTENT_LENGTH']) {
+			return '415 Unsupported Media Type';
+		}
+
+		// Copying to remote wervers not yet supported
+		if (isset($options['dest_url'])) {
+			return '502 Bad Gateway';
+		}
+
+		$absolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() . '/' .
+			$options['path'];
+
+		if (!file_exists($absolutePath)) {
+			return '404 Not Found';
+		}
+
+		if (is_dir($absolutePath) && $options['depth'] != 'infinity') {
+			return '400 Bad Request';
+		}
+
+		$newAbsolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() .
+			'/' . $options['dest'];
+		if (!is_dir(dirname($newAbsolutePath))) {
+			return '409 Conflict';
+		}
+
+		if (file_exists($newAbsolutePath)) {
+			if (!$options['overwrite']) {
+				return '412 Precondition Failed';
+			}
+
+			if (!HTTP_CalDAV_Server_PHPiCalendar::deletePath(
+					$newAbsolutePath)) {
+				return '403 Forbidden';
+			}
+
+			$options['new'] = false;
+		}
+
+		if (!rename($absolutePath, $newAbsolutePath)) {
+			return '403 Forbidden';
+		}
+
+		return true;
+	}
+
+	// FIXME Handle depth
+	// FIXME Use file_exists
+	function propfind($options, &$files) {
+		$files = array();
+		$paths = array();
+		$path = $options['path'];
+		while (isset($path)) {
+			$file = array();
+			$file['path'] = $path;
+
+			$absolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() .
+				'/' . $path;
+			$stat = stat($absolutePath);
+			$file['props'] = array();
+			$file['props'][] = $this->mkprop('creationdate', $stat['ctime']);
+			$file['props'][] = $this->mkprop('getlastmodified', $stat['mtime']);
+
+			if (is_dir($absolutePath)) {
+				$file['props'][] = $this->mkprop('resourcetype', 'collection');
+
+				$handle = opendir($absolutePath);
+				if (!$handle) {
+					return;
+				}
+
+				while (($pathComponent = readdir($handle)) !== false) {
+					if ($pathComponent != '.' && $pathComponent != '..') {
+						$paths[] = "$path/$pathComponent";
+					}
+				}
+				closedir($handle);
+			} else {
+				$file['props'][] = $this->mkprop('getcontentlength',
+					$stat['size']);
+				$file['props'][] = $this->mkprop('resourcetype', null);
+			}
+
+			$files[] = $file;
+			$path = array_pop($paths);
+		}
+
+		return true;
+	}
+
+	function put(&$options) {
+		$absolutePath = HTTP_CalDAV_Server_PHPiCalendar::getBasePath() . '/' .
+			$options['path'];
+		if (!is_dir(dirname($absolutePath))) {
+			return '409 Conflict';
+		}
+
+		$options['new'] = !file_exists($absolutePath);
+		$handle = @fopen($absolutePath, 'w');
+		if (!$handle) {
+			return '403 Forbidden';
+		}
+
+		return $handle;
+	}
+
+	function report($options, &$responses) {
+		global $ALL_CALENDARS_COMBINED;
+
+		$responses = array();
+		$paths = availableCalendars(null, null, $ALL_CALENDARS_COMBINED);
+		foreach ($paths as $path) {
+			$response = array();
+
+			$response['ns_hash'] = array();
+			$response['ns_hash']['urn:ietf:params:xml:ns:caldav'] = 'C';
+
+			$response['href'] = $this->getHref(array_pop(explode('/', $path)));
+			$response['propstat'] = array();
+
+			$props = array();
+			$props[] = $this->mkprop('urn:ietf:params:xml:ns:caldav', 'calendar-data', file_get_contents($path));
+
+			$response['propstat']['200 OK'] = $props;
+			$responses[] = $response;
+		}
+
+		return true;
+	}
+}
+
+$server = new HTTP_CalDAV_Server_PHPiCalendar();
+$server->ServeRequest();
+?>