1 files changed, 63 insertions, 0 deletions
diff --git a/modules-available/vmstore/page.inc.php b/modules-available/vmstore/page.inc.php
new file mode 100644
index 00000000..81f92ee3
--- /dev/null
+++ b/modules-available/vmstore/page.inc.php
@@ -0,0 +1,63 @@
+<?php
+
+class Page_VmStore extends Page
+{
+	private $mountTask = false;
+
+	protected function doPreprocess()
+	{
+		User::load();
+
+		if (!User::hasPermission('superadmin')) {
+			Message::addError('no-permission');
+			Util::redirect('?do=Main');
+		}
+		
+		$action = Request::post('action');
+		
+		if ($action === 'setstore') {
+			$this->setStore();
+		}
+	}
+	
+	protected function doRender()
+	{
+		$action = Request::post('action');
+		if ($action === 'setstore' && !Taskmanager::isFailed($this->mountTask)) {
+			Render::addTemplate('mount', array(
+				'task' => $this->mountTask['id']
+			));
+			return;
+		}
+		$vmstore = Property::getVmStoreConfig();
+		if (isset($vmstore['storetype'])) {
+			$vmstore['pre-' . $vmstore['storetype']] = 'checked';
+		}
+		Render::addTemplate('page-vmstore', $vmstore);
+	}
+	
+	private function setStore()
+	{
+		foreach (array('storetype', 'nfsaddr', 'cifsaddr', 'cifsuser', 'cifspasswd', 'cifsuserro', 'cifspasswdro') as $key) {
+			$vmstore[$key] = trim(Request::post($key, ''));
+		}
+		$storetype = $vmstore['storetype'];
+		if (!in_array($storetype, array('internal', 'nfs', 'cifs'))) {
+			Message::addError('value-invalid', 'type', $storetype);
+			Util::redirect('?do=VmStore');
+		}
+		// Validate syntax of nfs/cifs
+		if ($storetype === 'nfs' && !preg_match('#^\S+:\S+$#is', $vmstore['nfsaddr'])) {
+			Message::addError('value-invalid', 'nfsaddr', $vmstore['nfsaddr']);
+			Util::redirect('?do=VmStore');
+		}
+		$vmstore['cifsaddr'] = str_replace('\\', '/', $vmstore['cifsaddr']);
+		if ($storetype === 'cifs' && !preg_match('#^//\S+/.+$#is', $vmstore['cifsaddr'])) {
+			Message::addError('value-invalid', 'nfsaddr', $vmstore['nfsaddr']);
+			Util::redirect('?do=VmStore');
+		}
+		$this->mountTask = Trigger::mount($vmstore);
+		TaskmanagerCallback::addCallback($this->mountTask, 'manualMount', $vmstore);
+	}
+
+}
+\ No newline at end of file