From 5a5a2c9ad17598ac6ab28b20d6716cff510dd3d3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Tim=20D=C3=BCsterhus?= <timwolla@arcor.de>
Date: Thu, 31 Jan 2013 16:02:14 +0100
Subject: [PATCH] Add dashboard box with online-list

---
 dashboardBox.xml                              |  9 ++++
 .../box/OnlineListDashboardBox.class.php      | 46 +++++++++++++++++++
 package.xml                                   |  6 ++-
 template/dashboardBoxOnlineList.tpl           | 13 ++++++
 4 files changed, 72 insertions(+), 2 deletions(-)
 create mode 100644 dashboardBox.xml
 create mode 100644 file/lib/system/dashboard/box/OnlineListDashboardBox.class.php
 create mode 100644 template/dashboardBoxOnlineList.tpl

diff --git a/dashboardBox.xml b/dashboardBox.xml
new file mode 100644
index 0000000..c7523cd
--- /dev/null
+++ b/dashboardBox.xml
@@ -0,0 +1,9 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<data xmlns="http://www.woltlab.com" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.woltlab.com http://www.woltlab.com/XSD/dashboardBox.xsd">
+	<import>
+		<dashboardbox name="be.bastelstu.chat.onlineList">
+			<classname><![CDATA[chat\system\dashboard\box\OnlineListDashboardBox]]></classname>
+			<boxtype>content</boxtype>
+		</dashboardbox>
+	</import>
+</data>
diff --git a/file/lib/system/dashboard/box/OnlineListDashboardBox.class.php b/file/lib/system/dashboard/box/OnlineListDashboardBox.class.php
new file mode 100644
index 0000000..4027391
--- /dev/null
+++ b/file/lib/system/dashboard/box/OnlineListDashboardBox.class.php
@@ -0,0 +1,46 @@
+<?php
+namespace chat\system\dashboard\box;
+use chat\data;
+
+/**
+ * Dashboard box that shows chatters.
+ * 
+ * @author	Tim Düsterhus
+ * @copyright	2010-2013 Tim Düsterhus
+ * @license	Creative Commons Attribution-NonCommercial-ShareAlike <http://creativecommons.org/licenses/by-nc-sa/3.0/legalcode>
+ * @package	be.bastelstu.chat
+ * @subpackage	system.dashboard.box
+ */
+class OnlineListDashboardBox extends \wcf\system\dashboard\box\AbstractContentDashboardBox {
+	/**
+	 * all rooms in the current installation
+	 * @var array<\chat\data\room\Room>
+	 */
+	public $rooms = array();
+	
+	/**
+	 * @see	wcf\system\dashboard\box\IDashboardBox::init()
+	 */
+	public function init(\wcf\data\dashboard\box\DashboardBox $box, \wcf\page\IPage $page) {
+		parent::init($box, $page);
+		
+		$this->rooms = data\room\Room::getCache();
+		
+		foreach ($this->rooms as $key => $room) {
+			if (!$room->canEnter()) unset($this->rooms[$key]);
+		}
+	}
+	
+	/**
+	 * @see	wcf\system\dashboard\box\AbstractContentDashboardBox::render()
+	 */
+	protected function render() {
+		if (count($this->rooms)) {
+			\wcf\system\WCF::getTPL()->assign(array(
+				'rooms' => $this->rooms
+			));
+			
+			return \wcf\system\WCF::getTPL()->fetch('dashboardBoxOnlineList', 'chat');
+		}
+	}
+}
diff --git a/package.xml b/package.xml
index 1818c26..b36815a 100644
--- a/package.xml
+++ b/package.xml
@@ -36,7 +36,8 @@
 		<instruction type="acpMenu">acpMenu.xml</instruction>
 		<instruction type="userGroupOption">userGroupOption.xml</instruction>
 		<instruction type="cronjob">cronjob.xml</instruction>
-		<instruction type="script">acp/be.bastelstu.chat.install.php</instruction>
+		<instruction type="dashboardBox">dashboardBox.xml</instruction>
+		<instruction type="script" run="standalone">acp/be.bastelstu.chat.install.php</instruction>
 	</instructions>
 	
 	<instructions type="update" fromversion="3.0.0 Alpha *">
@@ -53,6 +54,7 @@
 		<instruction type="acpMenu">acpMenu.xml</instruction>
 		<instruction type="userGroupOption">userGroupOption.xml</instruction>
 		<instruction type="cronjob">cronjob.xml</instruction>
-		<instruction type="script">acp/be.bastelstu.chat.update.php</instruction>
+		<instruction type="dashboardBox">dashboardBox.xml</instruction>
+		<instruction type="script" run="standalone">acp/be.bastelstu.chat.update.php</instruction>
 	</instructions>
 </package>
diff --git a/template/dashboardBoxOnlineList.tpl b/template/dashboardBoxOnlineList.tpl
new file mode 100644
index 0000000..c968165
--- /dev/null
+++ b/template/dashboardBoxOnlineList.tpl
@@ -0,0 +1,13 @@
+<header class="boxHeadline boxSubHeadline">
+	<hgroup>
+		<h1>{lang}chat.header.menu.chat{/lang}</h1>
+	</hgroup>
+</header>
+
+<div class="container marginTop">
+	<ul>
+	{foreach from=$rooms item='room'}
+		<li><strong>{$room}</strong>: <ul class="dataList">{implode from=$room->getUsers() item='user'}<li><a href="{link controller='User' object=$user}{/link}" class="userLink" data-user-id="{$user->userID}">{$user}</a></li>{/implode}</ul>
+	{/foreach}
+	</ul>
+</div>
\ No newline at end of file