From 3d477070e9670cec9ddd833895f0dd2df058d0fa Mon Sep 17 00:00:00 2001
From: Marcel Werk <burntime@woltlab.com>
Date: Sun, 19 May 2013 00:22:08 +0200
Subject: [PATCH] Added system information

---
 .../install/files/acp/templates/index.tpl     | 60 ++++++++++++++++++-
 .../install/files/acp/templates/phpInfo.tpl   |  9 +++
 .../files/lib/acp/page/IndexPage.class.php    | 38 ++++++++++++
 .../files/lib/acp/page/PHPInfoPage.class.php  | 50 ++++++++++++++++
 4 files changed, 156 insertions(+), 1 deletion(-)
 create mode 100644 wcfsetup/install/files/acp/templates/phpInfo.tpl
 create mode 100644 wcfsetup/install/files/lib/acp/page/PHPInfoPage.class.php

diff --git a/wcfsetup/install/files/acp/templates/index.tpl b/wcfsetup/install/files/acp/templates/index.tpl
index 8a684e69f6..ffee1047f7 100644
--- a/wcfsetup/install/files/acp/templates/index.tpl
+++ b/wcfsetup/install/files/acp/templates/index.tpl
@@ -14,10 +14,17 @@
 	}
 </style>
 
-<div class="tabMenuContainer" data-active="{if ENABLE_WOLTLAB_NEWS}news{else}credits{/if}" data-store="activeTabMenuItem">
+<header class="boxHeadline">
+	<h1>{lang}wcf.global.acp{/lang}</h1>
+</header>
+
+{event name='userNotice'}
+
+<div class="tabMenuContainer" data-active="{if ENABLE_WOLTLAB_NEWS}news{else}system{/if}" data-store="activeTabMenuItem">
 	<nav class="tabMenu">
 		<ul>
 			{if ENABLE_WOLTLAB_NEWS}<li><a href="{@$__wcf->getAnchor('news')}">{lang}wcf.acp.index.news{/lang}</a></li>{/if}
+			<li><a href="{@$__wcf->getAnchor('system')}">{lang}wcf.acp.index.system{/lang}</a></li>
 			<li><a href="{@$__wcf->getAnchor('credits')}">{lang}wcf.acp.index.credits{/lang}</a></li>
 			
 			{event name='tabMenuTabs'}
@@ -33,6 +40,56 @@
 		</div>
 	{/if}
 	
+	<div id="system" class="container containerPadding hidden tabMenuContent">
+		<fieldset>
+			<legend>{lang}wcf.acp.index.system.software{/lang}</legend>
+		
+			{event name='softwareVersions'}
+		
+			<dl>
+				<dt>{lang}wcf.acp.index.system.software.wcfVersion{/lang}</dt>
+				<dd>{@WCF_VERSION}</dd>
+			</dl>
+			
+			{event name='softwareFields'}
+		</fieldset>
+		
+		<fieldset>
+			<legend>{lang}wcf.acp.index.system.server{/lang}</legend>
+		
+			<dl>
+				<dt>{lang}wcf.acp.index.system.os{/lang}</dt>
+				<dd>{$server[os]}</dd>
+			</dl>
+			
+			<dl>
+				<dt>{lang}wcf.acp.index.system.webserver{/lang}</dt>
+				<dd>{$server[webserver]}</dd>
+			</dl>
+			
+			<dl>
+				<dt>{lang}wcf.acp.index.system.php{/lang}</dt>
+				<dd><a href="{link controller='PHPInfo'}{/link}">{PHP_VERSION}</a></dd>
+			</dl>
+			
+			<dl>
+				<dt>{lang}wcf.acp.index.system.mySQLVersion{/lang}</dt>
+				<dd>{$server[mySQLVersion]}</dd>
+			</dl>
+			
+			{if $server[load]}
+				<dl>
+					<dt>{lang}wcf.acp.index.system.load{/lang}</dt>
+					<dd>{$server[load]}</dd>
+				</dl>
+			{/if}
+			
+			{event name='serverFields'}
+		</fieldset>
+		
+		{event name='systemFieldsets'}
+	</div>
+	
 	<div id="credits" class="container containerPadding hidden tabMenuContent">
 		<fieldset>
 			<legend>{lang}wcf.acp.index.credits{/lang}</legend>
@@ -97,4 +154,5 @@
 	
 	{event name='tabMenuContents'}
 </div>
+
 {include file='footer'}
\ No newline at end of file
diff --git a/wcfsetup/install/files/acp/templates/phpInfo.tpl b/wcfsetup/install/files/acp/templates/phpInfo.tpl
new file mode 100644
index 0000000000..c02fc0393a
--- /dev/null
+++ b/wcfsetup/install/files/acp/templates/phpInfo.tpl
@@ -0,0 +1,9 @@
+{include file='header'}
+
+<header class="boxHeadline">
+	<h1>PHP Version {PHP_VERSION}</h1>
+</header>
+
+{@$phpInfo}
+
+{include file='footer'}
diff --git a/wcfsetup/install/files/lib/acp/page/IndexPage.class.php b/wcfsetup/install/files/lib/acp/page/IndexPage.class.php
index b3b4df6d30..9da687a3e4 100755
--- a/wcfsetup/install/files/lib/acp/page/IndexPage.class.php
+++ b/wcfsetup/install/files/lib/acp/page/IndexPage.class.php
@@ -20,6 +20,44 @@ use wcf\system\WCF;
  * @category	Community Framework
  */
 class IndexPage extends AbstractPage {
+	/**
+	 * server information
+	 * @var array
+	 */
+	public $server = array();
+	
+	/**
+	 * @see wcf\page\IPage::readData()
+	 */
+	public function readData() {
+		parent::readData();
+	
+		$this->server = array(
+			'os' => PHP_OS,
+			'webserver' => (isset($_SERVER['SERVER_SOFTWARE']) ? $_SERVER['SERVER_SOFTWARE'] : ''),		
+			'mySQLVersion' => WCF::getDB()->getVersion(),
+			'load' => ''
+		);
+		
+		// get load
+		if ($uptime = @exec("uptime")) {
+			if (preg_match("/averages?: ([0-9\.]+,?[\s]+[0-9\.]+,?[\s]+[0-9\.]+)/", $uptime, $match)) {
+				$this->server['load'] = $match[1];
+			}
+		}
+	}
+	
+	/**
+	 * @see wcf\page\IPage::assignVariables()
+	 */
+	public function assignVariables() {
+		parent::assignVariables();
+	
+		WCF::getTPL()->assign(array(
+			'server' => $this->server
+		));
+	}
+	
 	/**
 	 * @see	wcf\page\IPage::show()
 	 */
diff --git a/wcfsetup/install/files/lib/acp/page/PHPInfoPage.class.php b/wcfsetup/install/files/lib/acp/page/PHPInfoPage.class.php
new file mode 100644
index 0000000000..128935f78f
--- /dev/null
+++ b/wcfsetup/install/files/lib/acp/page/PHPInfoPage.class.php
@@ -0,0 +1,50 @@
+<?php
+namespace wcf\acp\page;
+use wcf\page\AbstractPage;
+use wcf\system\WCF;
+
+/**
+ * Shows phpinfo() output.
+ *
+ * @author	Marcel Werk
+ * @copyright	2001-2013 WoltLab GmbH
+ * @license	GNU Lesser General Public License <http://opensource.org/licenses/lgpl-license.php>
+ * @package	com.woltlab.wcf
+ * @subpackage	acp.page
+ * @category	Community Framework
+ */
+class PHPInfoPage extends AbstractPage {
+	/**
+	 * @see wcf\page\AbstractPage::$templateName
+	 */
+	public $templateName = 'phpInfo';
+	
+	/**
+	 * @see wcf\page\IPage::assignVariables()
+	 */
+	public function assignVariables() {
+		parent::assignVariables();
+	
+		// get phpinfo() output
+		ob_start();
+		phpinfo();
+		$info = ob_get_contents();
+		ob_end_clean();
+	
+		// parse output
+		$info = preg_replace('%^.*<body>(.*)</body>.*$%s', '$1', $info);
+		
+		// style fixes
+		// remove first table
+		$info = preg_replace('%<table.*?</table><br />%s', '', $info, 1);
+		
+		// fix tables
+		$info = preg_replace('%<h2>(.*?)</h2>\s*<table border="0" cellpadding="3" width="600">%', '<div class="tabularBox tabularBoxTitle marginTop"><header><h2>\\1</h2></header><table class="table">', $info);
+		$info = preg_replace('%<table border="0" cellpadding="3" width="600">%', '<div class="tabularBox marginTop"><table class="table">', $info);
+		$info = str_replace('</table>', '</table></div>', $info);
+		
+		WCF::getTPL()->assign(array(
+			'phpInfo' => $info
+		));
+	}
+}
-- 
2.20.1