tagged first beta

tags/semmelstatzR_1_0_0_beta/includes/class.agents.php

@@ -0,0 +1,207 @@
+<?php
+/**
+ * File: class.agents.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+
+class Agents {
+    
+    private $_sAgent;
+    
+    private $_aBots = array(
+        'aipbot',
+        'amfibibot',
+        'appie',
+        'ask jeeves/teoma',
+        'aspseek',
+        'axadine',
+        'baiduspider',
+        'becomebot',
+        'blogcorpuscrawler',
+        'blogpulse',
+        'blogsnowbot',
+        'boitho.com',
+        'bruinbot',
+        'cerberian',
+        'cfnetwork',
+        'check_http',
+        'cipinetbot',
+        'claymont',
+        'cometsearch@cometsystems.com',
+        'converacrawler',
+        'cydralspider',
+        'digger',
+        'es.net_crawler',
+        'eventax',
+        'everyfeed-spider',
+        'exabot@exava.com',
+        'faxobot',
+        'findlinks',
+        'fireball',
+        'francis',
+        'gaisbot',
+        'gamekitbot',
+        'gazz@nttr.co.jp',
+        'geonabot',
+        'getrax crawler',
+        'gigabot',
+        'girafa.com',
+        'goforitbot',
+        'googlebot',
+        'grub-client',
+        'holmes',
+        'houxoucrawler',
+        'http://www.almaden.ibm.com/cs/crawler',
+        'http://www.istarthere.com',
+        'http://www.relevantnoise.com',
+        'httrack ?',
+        'ia_archiver',
+        'ichiro',
+        'iltrovatore-setaccio',
+        'inelabot',
+        'infoseek',
+        'inktomi.com',
+        'irlbot',
+        'jetbot',
+        'jobspider_ba',
+        'kazoombot',
+        'larbin',
+        'libwww',
+        'linkwalker',
+        'lmspider',
+        'mackster',
+        'mediapartners-google',
+        'microsoft url control',
+        'mj12bot',
+        'moreoverbot',
+        'mozdex',
+        'msnbot',
+        'msrbot',
+        'naverbot',
+        'netresearchserver',
+        'ng/2.0',
+        'np(bot)',
+        'nutch',
+        'objectssearch',
+        'ocelli',
+        'omniexplorer_bot',
+        'openbot',
+        'overture',
+        'patwebbot',
+        'php',
+        'phpdig',
+        'pilgrim html-crawler',
+        'pipeliner',
+        'pompos',
+        'psbot',
+        'python-urllib',
+        'quepasacreep',
+        'robozilla',
+        'rpt-httpclient',
+        'savvybot',
+        'scooter',
+        'search.ch',
+        'seekbot',
+        'semager',
+        'seznambot',
+        'sherlock',
+        'shelob',
+        'sitesearch',
+        'snapbot',
+        'snappreviewbot',
+        'speedy spider',
+        'sphere scout',
+        'stackrambler',
+        'steeler',
+        'surveybot',
+        'szukacz',
+        'technoratibot',
+        'telnet',
+        'themiragorobot',
+        'thesubot',
+        'thumbshots-de-bot',
+        'topicblogs',
+        'turnitinbot',
+        'tutorgigbot',
+        'tutorial crawler',
+        'twiceler',
+        'vagabondo',
+        'versus',
+        'voilabot',
+        'w3c_css_validator',
+        'w3c_validator',
+        'w3c-checklink',
+        'web downloader',
+        'webcopier',
+        'webcrawler',
+        'webfilter robot',
+        'west wind internet protocols',
+        'wget',
+        'wwweasel robot',
+        'wwwster',
+        'xaldon webspider',
+        'xenu',
+        'yahoo! slurp',
+        'yahoofeedseeker',
+        'yahoo-mmcrawler',
+        'zao',
+        'zipppbot',
+        'zyborg',
+        );
+    
+    public function __construct($sAgent = null) {
+        if(!is_null($sAgent)) {
+            $this->_sAgent = $sAgent;
+        }
+        $this->_getIniFile();
+    }
+    
+    public function isBot($sAgent = null) {
+        if(is_null($sAgent) && empty($this->_sAgent)) return false;
+        $sAgent = (is_null($sAgent))?$this->_sAgent:$sAgent;
+        
+        foreach($this->_aBots as $bot) {
+            if(stristr($sAgent, $bot) !== false) {
+                return true;
+            }
+        }
+        return false;
+    }
+    
+    private function _getIniFile($sFile = null) {
+        if(is_null($sFile)) $sFile = dirname(__FILE__)."/data/uas_20110628-02.ini"; // default ini
+        
+        if(is_file($sFile) && is_readable($sFile)) {
+            $aTmpIni = parse_ini_file($sFile, true);
+            $this->_aBots = array();
+            foreach($aTmpIni['robots'] as $value) {
+                $this->_aBots[] = $value[2];
+            }
+            //print_r($this->_aBots);
+        }
+    }
+}
+?>

tags/semmelstatzR_1_0_0_beta/includes/class.semmelstatzR.php

@@ -0,0 +1,72 @@
+<?php
+/**
+ * File: class.semmelstatzR.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+
+/**
+ * 
+ */
+class semmelstatzR {
+    
+    protected $_oDb;
+
+
+    /**
+     *
+     * @global type $wpdb 
+     */
+    public function __construct() {
+        $this->_initDb();
+    }
+    
+    /* public */
+    
+    
+    /* protected */
+    
+    
+    /* private */
+    
+    /**
+     *
+     * @global wpdb $wpdb
+     * @return boolean 
+     */
+    private function _initDb() {
+        global $wpdb;
+        
+        if($this->_oDb instanceof $wpdb) {
+            return true;
+        } else if($wpdb instanceof wpdb) {
+            $this->_oDb = $wpdb;
+            return true;
+        } else {
+            return false;
+        }
+    }
+}
+?>

tags/semmelstatzR_1_0_0_beta/includes/class.upgrademe.php

@@ -0,0 +1,198 @@
+<?php
+/*
+Plugin Name: upgrademe
+Description: Allows auto-upgrade for plugins outside of official WordPress repository
+Company: Copyright 2011 Meglio. All rights reserved
+Version: 0.2
+Author: Meglio (Anton Andriyevskyy)
+Plugin URI: https://github.com/meglio/wp-upgrademe
+*/
+
+if (!class_exists('Upgrademe')) {
+
+class Upgrademe
+{
+/**
+* Stores parsed and validated data returned by unofficial APIs.
+* @var array
+*/
+private static $data;
+
+private static $WP_FILTER_PREFIX = 'wpFilter_';
+
+public static function register()
+{
+$r = new ReflectionClass(__CLASS__);
+$methods = $r->getMethods(ReflectionMethod::IS_PUBLIC);
+foreach($methods as $m)
+{
+/** @var ReflectionMethod $m */
+if ($m->isStatic() && strpos($m->getName(), self::$WP_FILTER_PREFIX) === 0) {
+add_filter(substr($m->getName(), strlen(self::$WP_FILTER_PREFIX)), array(get_class(), $m->getName()),
+10, $m->getNumberOfParameters());
+}
+}
+}
+
+public static function wpFilter_http_response($response, $args, $url)
+{
+# Control recursion
+static $recursion = false;
+if ($recursion)
+return $response;
+
+if (empty($response) || !is_array($response) || !isset($response['body']))
+return $response;
+
+# Guess if it's time to take action
+if ($url == 'http://api.wordpress.org/plugins/update-check/1.0/')
+$showTime = true;
+# Prevent failures if WordPress changes url for updates; we will detect if it still contains "update-check" token
+# and called from withing wp_update_plugins() function
+elseif (stripos($url, 'update-check') !== false)
+{
+$showTime = false;
+$trace = debug_backtrace(false);
+foreach($trace as $t)
+# http request made from within wp_update_plugins
+if (isset($t['function']) && $t['function'] == 'wp_update_plugins')
+{
+$showTime = true;
+break;
+}
+unset($trace, $t);
+}
+else
+$showTime = false;
+if (!$showTime)
+return $response;
+
+# Loop over plugins who provided <pluginName>_upgrademe() function and use returned url to request for up-to-date version signature.
+# Collect retrieved (only valid) data into $upgrademe
+$plugins = get_plugins();
+$upgrademe = array();
+foreach($plugins as $file => $info)
+{
+# Get url if function exists
+$slugName = str_replace('-', '_', basename($file, '.php'));
+
+# Request latest version signature from custom url (non-WP plugins repository api) && validate response variables
+$recursion = true;
+$vars = self::loadPluginData($slugName);
+$recursion = false;
+if (empty($vars))
+continue;
+
+$upgrademe[$file] = $vars;
+}
+if (!count($upgrademe))
+return $response;
+
+$body = $response['body'];
+if (!empty($body))
+$body = unserialize($body);
+if (empty($body))
+$body = array();
+foreach($upgrademe as $file => $upgradeVars)
+{
+# Do not override data returned by official WP plugins repository API
+if (isset($body[$file]))
+continue;
+
+# If new version is different then current one, only then add info
+if (!isset($plugins[$file]['Version']) || $plugins[$file]['Version'] == $upgradeVars['new_version'])
+continue;
+
+$upgradeInfo = new stdClass();
+$upgradeInfo->id = $upgradeVars['id'];
+$upgradeInfo->slug = $upgradeVars['slug'];
+$upgradeInfo->new_version = $upgradeVars['new_version'];
+$upgradeInfo->url = $upgradeVars['url'];
+$upgradeInfo->package = $upgradeVars['package'];
+$body[$file] = $upgradeInfo;
+}
+$response['body'] = serialize($body);
+return $response;
+}
+
+public static function wpFilter_plugins_api($value, $action, $args)
+{
+// If for some reason value available already, do not change it
+if (!empty($value))
+return $value;
+
+if ($action != 'plugin_information' || !is_object($args) || !isset($args->slug) || empty($args->slug))
+return $value;
+
+$vars = self::loadPluginData($args->slug);
+if (empty($vars))
+return $value;
+
+return (object)$vars['info'];
+}
+
+public static function wpFilter_http_request_args($args, $url)
+{
+if (strpos($url, 'wp-upgrademe') === false || !is_array($args))
+return $args;
+
+$args['sslverify'] = false;
+return $args;
+}
+
+private static function loadPluginData($slug)
+{
+if (isset(self::$data[$slug]))
+return self::$data[$slug];
+
+$funcName = $slug.'_upgrademe';
+if (!function_exists($funcName))
+return self::$data[$slug] = null;
+
+$upgradeUrl = filter_var(call_user_func($funcName), FILTER_VALIDATE_URL);
+if (empty($upgradeUrl))
+return self::$data[$slug] = null;
+
+# Request latest version signature from custom url (non-WP plugins repository api) && validate response variables
+$r = wp_remote_post($upgradeUrl, array('method' => 'POST', 'timeout' => 4, 'redirection' => 5, 'httpversion' => '1.0', 'blocking' => true,
+'headers' => array(), 'body' => null, 'cookies' => array(), 'sslverify' => false));
+
+if( is_wp_error($r) || !isset($r['body']) || empty($r['body']))
+return self::$data[$slug] = null;
+
+$vars = json_decode($r['body'], true);
+if (empty($vars) || !is_array($vars) || count($vars) > 4
+|| !isset($vars['new_version']) || !isset($vars['url']) || !isset($vars['package']) || !isset($vars['info']))
+return self::$data[$slug] = null;
+
+# 2 147 483 648 - max int32
+# 16 777 215 - ffffff = max possible value of 6-letters hex
+# 50 000 000 - reasonable offset
+# Finally generate ID between 50 000 000 and 66 777 215
+$vars['id'] = 50000000 + hexdec(substr(md5($slug), 1, 6));
+
+$vars['slug'] = $slug;
+
+# Sanitize variables of "info"
+if (!is_array($vars['info']))
+$vars['info'] = array();
+
+$info = array();
+foreach($vars['info'] as $key => $val)
+{
+if (!in_array($key, array('name','slug','version','author','author_profile','contributors','requires','tested',
+'compatibility','rating','rating','num_ratings','downloaded','last_updated','added','homepage',
+'sections','download_link','tags')))
+continue;
+$info[$key] = $val;
+}
+$info['slug'] = $slug;
+$info['version'] = $vars['new_version'];
+$info['download_link'] = $vars['url'];
+$vars['info'] = $info;
+
+return self::$data[$slug] = $vars;
+}
+}
+Upgrademe::register();
+} # class_exists()

tags/semmelstatzR_1_0_0_beta/includes/functions.semr.php

@@ -0,0 +1,419 @@
+<?php
+/**
+ * File: functions.semr.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+### Encodierung der IP-Adresse durch simple arithmetische Operation
+    function sem_encodeIP($ip) {
+        $ip_parts = split("[.]", $ip);
+        $new_ip = ($ip_parts[0]+700) . "." . ($ip_parts[1]*2) . "." . ($ip_parts[2]+600) . "." . ($ip_parts[3]*3);
+        return $new_ip;
+    }
+
+### Decodierung der IP-Adresse durch simple arithmetische Operation
+    function sem_decodeIP($ip) {
+        $ip_parts = split("[.]", $ip);
+        $new_ip = ($ip_parts[0]-700) . "." . ($ip_parts[1] / 2) . "." . ($ip_parts[2]-600) . "." . ($ip_parts[3]/3);
+        return $new_ip;
+    }
+
+### Ist IP-Adresse codiert?
+    function sem_checkIfIPisEncoded($ip) {
+        $ip_parts = split("[.]", $ip);
+        if($ip_parts[0]>700) {
+            return true;
+        }
+        else {
+            return false;
+        }
+    }
+
+### Auslesen der höchsten Post-ID
+    function sem_getMaxPostID() {
+        global $wpdb;
+        $maxpostid = $wpdb->get_var("SELECT MAX(ID) FROM ".$wpdb->posts." LIMIT 0,1");
+        return $maxpostid; //Ganzzahl
+    }
+
+### Auslesen des User- bzw. Kommentarautornamen
+	function sem_getUsername() {
+        global $user_ID, $user_login, $isAdmin;
+
+		get_currentuserinfo();
+
+		if($user_ID > 0) {
+		    $useronline = $user_login;
+
+            if(current_user_can('manage_options')) {
+                $isAdmin = 1;
+            }
+            else {
+                $isAdmin = 0;
+            }
+        }
+        elseif(isset($_COOKIE["comment_author_".COOKIEHASH])) {
+            $useronline = trim($_COOKIE["comment_author_".COOKIEHASH]);
+            $isAdmin = -1;
+		}
+		else {
+			$useronline = "Gast";
+			$isAdmin = -1;
+		}
+        return $useronline;
+    }
+
+/**
+ * Check if agent is a bot
+ * 
+ * @deprecated use Agents-object in the future
+ *
+ * @param string $user_agent
+ * @return boolean 
+ */
+function sem_AreYouBot($user_agent) {
+    require_once 'class.agents.php';
+    $oCheckAgent = new Agents($user_agent);
+    return $oCheckAgent->isBot();
+}
+
+### Referer nach Suchmaschinen-Queries und interner Suche prüfen und Suchstring extrahieren
+function sem_getKeyword($referer) {
+    if(empty($referer)) return false;
+    $homehost = '%'.(substr($_SERVER['SERVER_NAME'],0,4) == 'www.')?
+             substr($_SERVER['SERVER_NAME'],4) . '%':
+         $_SERVER['SERVER_NAME'] . '%';
+     
+    $keyword = parse_url($referer);
+    if(!isset($keyword['host']) || !isset($keyword['query'])) return false;
+
+		if (preg_match("/google\./i", $keyword["host"])) {
+			if (preg_match("/imgurl/i", $keyword["query"])) {
+				parse_str($keyword["query"],$q);
+				$keyword = substr($q["prev"],10);
+			}
+			else if (preg_match("/translate\./i", $keyword["host"])) {
+				parse_str($keyword["query"],$q);
+				$keyword = $q["q"];
+			}
+			else {
+				parse_str($keyword["query"],$q);
+				$keyword = $q["q"];
+			}
+			if($keyword == "") return; return "Google: ".$keyword;
+		}
+		elseif (preg_match("/search\.live\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "LiveSearch: ".$keyword;
+		}
+		elseif (preg_match("/bing\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "Bing: ".$keyword;
+		}
+		elseif (preg_match("/yahoo\./i", $keyword["host"])) {
+			if (preg_match("/images/i", $keyword["query"])) {
+				parse_str($keyword["query"],$q);
+				$keyword = $q["p"];
+			}
+			else {
+				parse_str($keyword["query"],$q);
+				$keyword = $q["p"];
+			}
+			if($keyword == "") return; return "Yahoo: ".$keyword;
+		}
+		elseif (preg_match("/aol\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "AOL: ".$keyword;
+		}
+		elseif (preg_match("/aolsvc\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "AOL: ".$keyword;
+		}
+		elseif (preg_match("/search\.msn\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "MSN: ".$keyword;
+		}
+		elseif (preg_match("/gmx\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["su"];
+			if($keyword == "") return; return "GMX: ".$keyword;
+		}
+		elseif (preg_match("/\.bild\.t\-/i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["query"];
+			if($keyword == "") return; return "BILD: ".$keyword;
+		}
+		elseif (preg_match("/t\-online\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "T-Online: ".$keyword;
+		}
+		elseif (preg_match("/suche\.web\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["su"];
+			if($keyword == "") return; return "WEB.de: ".$keyword;
+		}
+		elseif (preg_match("/suche\.lycos\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["query"];
+			if($keyword == "") return; return "Lycos: ".$keyword;
+		}
+		elseif (preg_match("/altavista\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "Altavista: ".$keyword;
+		}
+		elseif (preg_match("/alltheweb\./i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["q"];
+			if($keyword == "") return; return "alltheweb: ".$keyword;
+		}
+		elseif (preg_match("/technorati\.com\/search\//", $referer)) {
+			$q = preg_split("/technorati\.com\/search\//", $referer,-1,PREG_SPLIT_NO_EMPTY);
+			$keyword = $q[1];
+			if($keyword == "") return; return "Technorati: ".$keyword;
+		}
+		elseif (preg_match("/".$homehost."/i", $keyword["host"])) {
+			parse_str($keyword["query"],$q);
+			$keyword = $q["s"];
+			if($keyword == "") return; return "Interne Suche: ".$keyword;
+		}
+		else {
+			return;
+		}
+    }
+
+### Anzahl der Datensätze in der statz-Tabelle
+    function sem_showNumStatzEntries() {
+        global $wpdb;
+        $numstatzentries = $wpdb->get_var("SELECT COUNT(id) FROM ".$wpdb->statz);
+        return $numstatzentries; // Zahl
+    }
+
+### Aufgezeichnete Tage in der statz-Tabelle
+	function sem_countDaysInStatzTable() {
+		global $wpdb;
+		$firstdate = $wpdb->get_var("SELECT MIN(time) FROM ".$wpdb->statz." LIMIT 0,1");
+        if(!$firstdate) {
+            return 1;
+        }
+        else {
+            $firstdate = strtotime($firstdate); $now = time();
+            $days = (int) (($now - $firstdate) / (60*60*24)+1);
+            return $days; // KOMPLETTE! Tage
+        }
+	}
+
+### Wenn Tage in statz-Tabelle kleiner als Tage in Daily-Statz, dann nimm Tage in Daily-Statz
+	function sem_compareLimitDays2DailyStatz () {
+		global $wpdb;
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+		if (sem_countDaysInStatzTable() << $sem_options["statz_days_limit"]) {
+			$sem_options["statz_days_limit"] = sem_countDaysInStatzTable();
+			update_option("semmelstatzR_options", $sem_options);
+		}
+	}
+
+### Zeigt Copyright-Notiz an
+    function sem_showCopyright() {
+        print "<p class='copyright'>semmelstatzR ". SEMMELSTATZR_VERSION . " happily coded by <a target='_blank' href='http://semmelstatz.sourceforge.net/'>SEM-Team<br />
+		<a target='_blank' style='border:none;' href='http://sourceforge.net/projects/semmelstatz/'>
+		<img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/statzR.png' /></a></p>";
+    }
+
+### statz-Tabelle leeren (NICHT LÖSCHEN!!!)
+function sem_truncateStatzTable() {
+    global $wpdb, $userip;
+    $wpdb->query('TRUNCATE TABLE '.$wpdb->statz);
+    sem_optStatzTable();
+     return $wpdb->query("INSERT INTO `$wpdb->statz`(ip, time, referer, page, username) VALUES('127.0.0.1', NOW(),NULL,0,'statz-Tabelle geleert')");
+}
+
+### Obsolet, bleibt aber aus Kompatibilitätsgründen zu SEMMELSTATZ_DELETE
+    function sem_delOldRecords($days) {
+        return true;
+    }
+
+### simpleEncoding für die GoogleChartAPI
+	function sem_encodeChartData($values) {
+
+		$maxValue = max($values);
+		$simpleEncoding = 'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';
+		$chartData = "s:";
+		  for ($i = 0; $i < count($values); $i++) {
+			$currentValue = $values[$i];
+
+			if ($currentValue > -1 && $maxValue <> 0) {
+			$chartData.=substr($simpleEncoding,61*($currentValue/$maxValue),1);
+			}
+			  else {
+			  $chartData.='_';
+			  }
+		  }
+		return $chartData;
+	}
+
+### Datensätze älter als statz_recdays_limit-Tage löschen
+    function sem_delOutOfLimit() {
+        global $wpdb;
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $today = time(); $days = $sem_options["statz_recdays_limit"];
+        $enddatum = $today - ($days * 86400);
+        $enddatum = date("Y-m-d", $enddatum) . " 23:59:59";
+        $wpdb->query("DELETE FROM ".$wpdb->statz." WHERE time <= '".$enddatum."'");
+        sem_optStatzTable();
+    }
+
+### Wenn AUTOMATISCHES LIMIT aktiviert, dann LIMITIERE und erhöhe NEXT_CRON
+    function sem_doCronStatzLimit() {
+        sem_delOutOfLimit();
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $statz_next_cron = $sem_options["statz_next_cron"] + 86400;
+		$sem_options["statz_next_cron"] = $statz_next_cron;
+        update_option("semmelstatzR_options", $sem_options);
+    }
+
+### Konvertiert Strings von utf-8 in ISO-8859
+    function sem_encodeToIso($string) {
+        return mb_convert_encoding($string, "ISO-8859-1", mb_detect_encoding($string, "UTF-8, ISO-8859-1, ISO-8859-15", true));
+    }
+
+### statz-Tabelle optimieren
+    function sem_optStatzTable() {
+        global $wpdb;
+        $wpdb->query("OPTIMIZE TABLE ".$wpdb->statz);
+    }
+
+### Unter bestimmten Voraussetzungen den Vortag in die statzhist-Tabelle schreiben
+    function sem_writeYesterdayToHist() {
+        global $wpdb;
+        if(!$wpdb->get_var("SELECT date FROM ".$wpdb->statzhist." WHERE substring(date,1,10) = DATE_SUB(CURDATE(), INTERVAL 1 DAY)")) {
+
+            if($wpdb->get_var("SELECT COUNT(ip) FROM ".$wpdb->statz." WHERE substring(time,1,10) = DATE_SUB(CURDATE(), INTERVAL 1 DAY)")) {
+
+                $yesterdays = $wpdb->get_results("SELECT COUNT(ip) AS hits, COUNT(DISTINCT ip) AS visitors, COUNT(DISTINCT referer)
+                AS referers, substring(time,1,10) AS date FROM ".$wpdb->statz." WHERE substring(time,1,10) = DATE_SUB(CURDATE(),
+				INTERVAL 1 DAY) GROUP BY date");
+
+                foreach ($yesterdays as $yesterday) {
+                    $date = $yesterday->date;
+                    $visitors = $yesterday->visitors;
+                    $hits = $yesterday->hits;
+                    $referers = $yesterday->referers;
+                }
+
+                $sql = $wpdb->query("INSERT INTO ".$wpdb->statzhist." (date, referers, visitors, hits)
+				VALUES('$date', $referers, $visitors, $hits)");
+            }
+            else {
+                $date = $wpdb->get_var("SELECT DATE_SUB(CURDATE(), INTERVAL 1 DAY)");
+                $sql = $wpdb->query("INSERT INTO ".$wpdb->statzhist." (date, referers, visitors, hits) VALUES('$date', 0, 0, 0)");
+            }
+        }
+    }
+
+/* Summen der vergangenen Tage in die statzhist schreiben */
+    function sem_writeOldDaysToHist() {
+        global $wpdb;
+        if(!$wpdb->get_var("SELECT date FROM ".$wpdb->statzhist." WHERE substring(date,1,10) <= DATE_SUB(CURDATE(), INTERVAL 1 DAY)")) {
+
+            $theolddays = $wpdb->get_results("SELECT COUNT(ip) AS hits, COUNT(DISTINCT ip) AS visitors,
+			COUNT(DISTINCT referer) AS referers, substring(time,1,10) AS date FROM ".$wpdb->statz." WHERE
+			substring(time,1,10) <= DATE_SUB(CURDATE(), INTERVAL 1 DAY) GROUP BY date ORDER BY time ASC");
+
+            foreach ($theolddays as $theoldday) {
+                $date = $theoldday->date;
+                $visitors = $theoldday->visitors; if(!$visitors) $visitors = 0;
+                $hits = $theoldday->hits; if(!$hits) $hits = 0;
+                $referers = $theoldday->referers; if(!$referers) $referers = 0;
+                $sql = $wpdb->query("INSERT INTO ".$wpdb->statzhist." (date, referers, visitors, hits)
+				VALUES('$date', $referers, $visitors, $hits)");
+            }
+        }
+	}
+
+/**
+ * translate and return a string
+ * @uses wp-function __() and prefilled plugin gettextdomain
+ * 
+ * @param string $sValue string to translate
+ * @param string $sDomain gettextdomain
+ * @return string translated string 
+ */ 
+function semr_i18n($sValue, $sDomain = "semmelstatzR") {
+    return __($sValue, $sDomain);
+}
+
+/**
+ * translate and echo a string
+ * @uses wp-function _e() and prefilled plugin gettextdomain
+ * 
+ * @param string $sValue
+ * @param string $sDomain 
+ * @return void
+ */
+function semr_i18ne($sValue, $sDomain = "semmelstatzR") {
+    _e($sValue, $sDomain);
+}
+
+/**
+ * translate and return a plural or singular string based on an amount
+ * @uses wp-function _n() and prefilled plugin gettextdomain
+ * 
+ * @param string $sSingular
+ * @param string $sPlural
+ * @param type $iNumber
+ * @param string $sDomain
+ * @return string 
+ */
+function semr_i18np($sSingular, $sPlural, $iNumber, $sDomain = "semmelstatzR") {
+    return _n($sSingular, $sPlural, $iNumber, $sDomain);
+}
+
+############################################## Ende SEMMELSTATZ-interne Funktionen
+?>

tags/semmelstatzR_1_0_0_beta/includes/functions.semr_template.php

@@ -0,0 +1,310 @@
+<?php
+/**
+ * File: functions.semr_template.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+### Zeigt die letzten $num_posts-Posts an: Titel und absolutes Datum - CSS-id: #lastposts
+    function sem_showLastPosts($num_posts = 10) {
+        global $wpdb;
+        $lastposts = $wpdb->get_results("SELECT ID, post_title FROM ".$wpdb->posts." WHERE post_status = 'publish'
+		AND post_type = 'post' ORDER BY post_date DESC LIMIT 0, ".$num_posts);
+        print "<div id='lastposts'>";
+        if (empty($lastposts)) {
+            print "... noch keine Beitr&auml;ge";
+        }
+        else {
+            print "<b>Die letzten ".$num_posts." Beitr&auml;ge</b><br />";
+            foreach ($lastposts as $lastpost) {
+                $posttitle = $lastpost->post_title;
+                $permalink = get_permalink($lastpost->ID);
+                $postdate = $lastpost->post_date;
+                print "<a href='".$permalink."'>".$posttitle."</a><br />\n";
+            }
+        }
+        print "</div>";
+    }
+
+### Zeigt die letzten $num_comments-Kommentare an: Autor und Post mit relativem Datum - CSS-id: #lastcomments
+    function sem_showLastComments($num_comments = 10) {
+        global $wpdb;
+        $comments = $wpdb->get_results("SELECT comment_author, comment_ID, comment_post_ID, comment_date
+        FROM ".$wpdb->comments." WHERE comment_approved = '1' ORDER BY comment_date DESC LIMIT 0, $num_comments");
+        print "<div id='lastcomments'>";
+        if (empty($comments)) {
+            print "Keine Kommentare";
+        }
+        else {
+            print "<b>Die letzten ".$num_comments." Kommentare</b><br />";
+            foreach ($comments as $comment) {
+                $commentday = strtotime(substr($comment->comment_date,1,10));
+                $today = time();
+                $difference = ceil(($today - $commentday) / (60*60*24))-1;
+                if($difference == 0) {
+                    $commentdate = "Heute&nbsp;um&nbsp;" . mysql2date("G:i", $comment->comment_date);
+                }
+                elseif($difference == 1) {
+                    $commentdate = "Gestern&nbsp;um&nbsp;" . mysql2date("G:i", $comment->comment_date);
+                }
+                elseif($difference == 2) {
+                    $commentdate = "Vorgestern&nbsp;um&nbsp;" . mysql2date("G:i", $comment->comment_date);
+                }
+                else {
+                    $commentdate = mysql2date("j. F G:i", $comment->comment_date);
+                }
+
+                print "<a href='" . get_permalink($comment->comment_post_ID) . "#comment-$comment->comment_ID'>$comment->comment_author@". get_the_title($comment->comment_post_ID) .", $commentdate</a><br />\n";
+            }
+        }
+        print "</div>";
+    }
+
+### Zeigt die $num_reads meist gelesenen Posts an - CSS-id: #mostreads
+    function sem_showMostReads($num_reads = 10) {
+        global $wpdb;
+        $mostreads = $wpdb->get_results("SELECT post_title AS posttitle, guid AS postid, hits AS hits FROM ".$wpdb->posts." WHERE hits != '0' GROUP BY postid ORDER BY hits DESC LIMIT 0, $num_reads");
+        print "<div id='mostreads'>";
+        if (empty($mostreads)) {
+            print "... noch keine Eintr&auml;ge";
+        }
+        else {
+            print "<b>Die ".$num_reads." meist gelesenen Beitr&auml;ge</b><br />";
+            foreach ($mostreads as $mostread) {
+                $posttitle = $mostread->posttitle;
+                $postid = $mostread->postid;
+                //$permalink = get_permalink($mostread->postid);
+                $hits = $mostread->hits;
+                print "<a target='_blank' href='".$postid."'>".$posttitle." (".$hits.")</a><br />\n";
+            }
+        }
+        print "</div>";
+    }
+
+### Zeigt die $num_reads meist gelesenen Posts an - CSS-id: #mostreads - ACHTUNG: Das Ergebnis der Funktion basiert auf der statz-Tabelle
+    function sem_showMostReadsOld($num_reads = 10) {
+        global $wpdb;
+        $mostreads = $wpdb->get_results("SELECT post_title AS posttitle, ".$wpdb->posts.".guid AS postid,
+		COUNT(".$wpdb->statz.".page) AS count FROM ".$wpdb->posts.", ".$wpdb->statz." WHERE
+		".$wpdb->statz.".page = ".$wpdb->posts.".ID GROUP BY postid ORDER BY count DESC LIMIT 0, $num_reads");
+        print "<div id='mostreads'>";
+        if (empty($mostreads)) {
+            print "... noch keine Eintr&auml;ge";
+        }
+        else {
+            print "<b>Die ".$num_reads." meist gelesenen Beitr&auml;ge</b><br />";
+            foreach ($mostreads as $mostread) {
+                $posttitle = $mostread->posttitle;
+                $postid = $mostread->postid;
+                //$permalink = get_permalink($mostread->postid);
+                $count = $mostread->count;
+                print "<a target='_blank' href='".$postid."'>".$posttitle." (".$count.")</a><br />\n";
+            }
+        }
+        print "</div>";
+    }
+
+### Zeigt die $num_commented meist kommentierten Posts an - CSS-id: #mostcommented
+    function sem_showMostCommented($num_commented = 10) {
+        global $wpdb;
+        $mostcommented = $wpdb->get_results("SELECT guid, id, post_title, COUNT(*) AS count FROM ".$wpdb->comments.",". $wpdb->posts." WHERE
+        comment_approved = '1' AND comment_post_id = id GROUP BY id, post_title ORDER BY count DESC LIMIT 0, $num_commented");
+
+        print "<div id='mostcommented'>";
+        if (empty($mostcommented)) {
+            print "... noch keine Eintr&auml;ge";
+        }
+        else {
+            print "<b>Die ".$num_commented." meist kommentierten Beitr&auml;ge</b><br />";
+
+            foreach ($mostcommented as $key => $mostcommented) {
+                $posttitle = $mostcommented->post_title;
+                $count = $mostcommented->count;
+                $postid = $mostcommented->guid;
+                print "<a target='_blank' href='".$postid."'>".$posttitle." (".$count.")</a><br />\n";
+            }
+        }
+        print "</div>";
+    }
+
+### Zeigt einen Zähler der Hits im jeweiligen Post. ACHTUNG: FUNKTIONIERT NUR IM LOOP (index.php, single.php)
+	function sem_showPostHitsInLoop($postid) {
+		global $wpdb;
+		$hits = $wpdb->get_var("SELECT hits FROM $wpdb->posts WHERE ID = $postid LIMIT 0,1");
+		return $hits;
+	}
+
+### Anzahl aller Posts/Pages
+    function sem_showTotalPosts() {
+        global $wpdb;
+        $totalposts = $wpdb->get_var("SELECT COUNT(ID) AS num FROM ".$wpdb->posts." WHERE post_status = 'publish' LIMIT 0,1");
+        return $totalposts; // Ganzzahl
+    }
+
+### Anzahl aller Kommentare
+    function sem_showTotalComments() {
+        global $wpdb;
+        $totalcomments = $wpdb->get_var("SELECT COUNT(comment_ID) AS num FROM ".$wpdb->comments." WHERE comment_approved = '1' LIMIT 0,1");
+        return $totalcomments; // Ganzzahl
+    }
+
+### Anzahl aller User seit Beginn der Statzaufzeichnung
+    function sem_showTotalUsers() {
+        global $wpdb;
+        $totalusers = $wpdb->get_var("SELECT SUM(visitors) FROM ".$wpdb->statzhist." LIMIT 0,1");
+        if(!$totalusers) $totalusers = 0;
+        return $totalusers; // Ganzzahl
+    }
+
+### Anzahl User pro Tag im Durchschnitt
+    function sem_showAverageUserPerDay() {
+        $averageuser = ceil(sem_showTotalUsers() / sem_showStatzDays());
+        return $averageuser;
+    }
+
+### Datum des 1. Posts = Blogstart
+    function sem_showFirstPostDate() {
+        global $wpdb;
+        $firstpostdate = $wpdb->get_var("SELECT MIN(post_date) FROM ".$wpdb->posts." WHERE post_status = 'publish' AND post_date != '0000-00-00 00:00:00' LIMIT 0,1");
+        $firstpostdate = mysql2date("j.n.Y", $firstpostdate);
+        return $firstpostdate; // String T.M.JJJJ
+    }
+
+### Datum des 1. Kommentars
+    function sem_showFirstCommentDate() {
+        global $wpdb;
+        $firstcommentdate = $wpdb->get_var("SELECT MIN(comment_date) FROM ".$wpdb->comments." WHERE comment_approved = '1'
+        AND comment_date != '0000-00-00 00:00:00' LIMIT 0,1");
+        $firstcommentdate = mysql2date("j.n.Y", $firstcommentdate);
+        return $firstcommentdate; // String T.M.JJJJ
+    }
+
+### Anzahl der Kommentierer nach Nicknamen
+    function sem_showNumCommenters() {
+        global $wpdb;
+        $totalcommenters = $wpdb->get_var("SELECT COUNT(DISTINCT comment_author) FROM ".$wpdb->comments." WHERE comment_approved = '1' LIMIT 0,1");
+        if(!$totalcommenters) $totalcommenters = 0;
+        return $totalcommenters; // Ganzzahl
+    }
+
+### Blog besteht seit x Tagen
+    function sem_showPostDays() {
+        global $wpdb;
+        $firstdate = $wpdb->get_var("SELECT MIN(post_date) AS date FROM ".$wpdb->posts." WHERE post_status = 'publish' AND post_date != '0000-00-00 00:00' LIMIT 0,1");
+        $firstdate = strtotime($firstdate); $now = time();
+        $blogdays = (int) (($now - $firstdate) / (60*60*24));
+        $blogdays = $blogdays + 1;
+        return $blogdays; // Ganzzahl
+    }
+
+### Tage seit 1. Kommentar
+    function sem_showCommentDays() {
+        global $wpdb;
+        $firstdate = $wpdb->get_var("SELECT MIN(comment_date) AS date FROM ".$wpdb->comments." LIMIT 0,1");
+        $firstdate = strtotime($firstdate); $now = time();
+        $commentdays = (int) (($now - $firstdate) / (60*60*24));
+        $commentdays = $commentdays + 1;
+        return $commentdays; // Ganzzahl
+    }
+
+### durchschn. Posts pro Tag
+    function sem_showPostsPerDay() {
+        global $wpdb;
+        $postsperday = (int) sem_showTotalPosts() / (int) sem_showPostDays();
+        return $postsperday; // Ganzzahl
+    }
+
+### durchschn. Kommentare pro Tag
+    function sem_showCommentsPerDay() {
+        global $wpdb;
+        $commentsperday = (int) sem_showTotalComments() / (int) sem_showCommentDays();
+        return $commentsperday; // Ganzzahl
+    }
+
+### Startdatum der Gesamtstatistik (Basis: statzhist)
+    function sem_showStatzStartDate() {
+        global $wpdb;
+        $statzhiststartdate = $wpdb->get_var("SELECT MIN(date) FROM ".$wpdb->statzhist." WHERE date != '0000-00-00 00:00' LIMIT 0,1");
+        $statzhiststartdate = mysql2date("j.n.Y", $statzhiststartdate);
+        // if(!$statzhiststartdate) $statzhiststartdate= "xx.xx.xxxx";
+        return $statzhiststartdate; // String T.M.JJJJ
+    }
+
+### Dauer der Statistikaufzeichnung in Tagen (Basis: statzhist)
+    function sem_showStatzDays() {
+        global $wpdb;
+        $firstdate = $wpdb->get_var("SELECT MIN(date) FROM ".$wpdb->statzhist." LIMIT 0,1");
+        if(!$firstdate) {
+            return 1;
+        }
+        else {
+            $firstdate = strtotime($firstdate); $now = time();
+            $statzdays = (int) (($now - $firstdate) / (60*60*24));
+            return $statzdays; // Ganzzahl
+        }
+    }
+
+### Anzahl der Online-Besucher - Verweildauer in den Einstellungen
+    function sem_showNumUsersOnline() {
+        global $wpdb;
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $onlinetime = $sem_options["statz_online_time"];
+        $numonline = $wpdb->get_var("SELECT COUNT(DISTINCT ip) FROM ".$wpdb->statz." WHERE time > Now() - INTERVAL ".$onlinetime." SECOND");
+        return $numonline; // Ganzzahl
+    }
+
+### Anzahl der heutigen Besucher
+    function sem_showUsersToday() {
+        global $wpdb; $today = date("Y-m-d");
+        $todayusers = $wpdb->get_var("SELECT COUNT(DISTINCT ip) FROM ".$wpdb->statz." WHERE time >= '$today' LIMIT 0, 1");
+        return $todayusers;
+	}
+
+### Anzahl der gestrigen Besucher
+    function sem_showUsersYesterday() {
+        global $wpdb;
+        $yesterdaysusers = $wpdb->get_var("SELECT visitors FROM ".$wpdb->statzhist." WHERE date = substr(DATE_SUB(NOW(), INTERVAL 1 DAY),1,10) LIMIT 0, 1");
+        return $yesterdaysusers;
+	}
+
+##################################################### Ende TEMPLATE-Funktionen
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/GPLv3.txt

@@ -0,0 +1,675 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<http://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<http://www.gnu.org/philosophy/why-not-lgpl.html>.
+

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pBarcode128.class.php

@@ -0,0 +1,184 @@
+<?php
+ /*
+     pBarcode128 - class to create barcodes (128B)
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ /* pData class definition */
+ class pBarcode128
+  {
+   var $Codes;
+   var $Reverse;
+   var $Result;
+   var $pChartObject;
+   var $CRC;
+
+   /* Class creator */
+   function pBarcode128($BasePath="")
+    {
+     $this->Codes   = "";
+     $this->Reverse = "";
+
+     $FileHandle = @fopen($BasePath."data/128B.db", "r");
+
+     if (!$FileHandle) { die("Cannot find barcode database (".$BasePath."128B.db)."); }
+
+     while (!feof($FileHandle))
+      {
+       $Buffer = fgets($FileHandle,4096);
+       $Buffer = str_replace(chr(10),"",$Buffer);
+       $Buffer = str_replace(chr(13),"",$Buffer);
+       $Values = preg_split("/;/",$Buffer);
+
+       $this->Codes[$Values[1]]["ID"]     = $Values[0];
+       $this->Codes[$Values[1]]["Code"]   = $Values[2];
+       $this->Reverse[$Values[0]]["Code"] = $Values[2];
+       $this->Reverse[$Values[0]]["Asc"]  = $Values[1];
+      }
+     fclose($FileHandle);
+    }
+
+   /* Return the projected size of a barcode */
+   function getSize($TextString,$Format="")
+    {
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $ShowLegend	= isset($Format["ShowLegend"]) ? $Format["ShowLegend"] : FALSE;
+     $LegendOffset	= isset($Format["LegendOffset"]) ? $Format["LegendOffset"] : 5;
+     $DrawArea		= isset($Format["DrawArea"]) ? $Format["DrawArea"] : FALSE;
+     $FontSize		= isset($Format["FontSize"]) ? $Format["FontSize"] : 12;
+     $Height		= isset($Format["Height"]) ? $Format["Height"] : 30;
+
+     $TextString    = $this->encode128($TextString);
+     $BarcodeLength = strlen($this->Result);
+
+     if ( $DrawArea )   { $WOffset = 20; } else { $WOffset = 0; }
+     if ( $ShowLegend ) { $HOffset = $FontSize+$LegendOffset+$WOffset; } else { $HOffset = 0; }
+
+     $X1 = cos($Angle * PI / 180) * ($WOffset+$BarcodeLength);
+     $Y1 = sin($Angle * PI / 180) * ($WOffset+$BarcodeLength);
+
+     $X2 = $X1 + cos(($Angle+90) * PI / 180) * ($HOffset+$Height);
+     $Y2 = $Y1 + sin(($Angle+90) * PI / 180) * ($HOffset+$Height);
+
+
+     $AreaWidth  = max(abs($X1),abs($X2));
+     $AreaHeight = max(abs($Y1),abs($Y2));
+
+     return(array("Width"=>$AreaWidth,"Height"=>$AreaHeight));
+    }
+
+   function encode128($Value,$Format="")
+    {
+     $this->Result  = "11010010000";
+     $this->CRC     = 104;
+     $TextString    = "";
+
+     for($i=1;$i<=strlen($Value);$i++)
+      {
+       $CharCode = ord($this->mid($Value,$i,1));
+       if ( isset($this->Codes[$CharCode]) )
+        {
+         $this->Result = $this->Result.$this->Codes[$CharCode]["Code"];
+         $this->CRC = $this->CRC + $i*$this->Codes[$CharCode]["ID"];
+         $TextString = $TextString.chr($CharCode);
+        }
+      }
+     $this->CRC = $this->CRC - floor($this->CRC/103)*103;
+
+     $this->Result = $this->Result.$this->Reverse[$this->CRC]["Code"];
+     $this->Result = $this->Result."1100011101011";
+
+     return($TextString);
+    }
+
+   /* Create the encoded string */
+   function draw($Object,$Value,$X,$Y,$Format="")
+    {
+     $this->pChartObject = $Object;
+
+     $R			= isset($Format["R"]) ? $Format["R"] : 0;
+     $G			= isset($Format["G"]) ? $Format["G"] : 0;
+     $B			= isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha		= isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+     $Height		= isset($Format["Height"]) ? $Format["Height"] : 30;
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $ShowLegend	= isset($Format["ShowLegend"]) ? $Format["ShowLegend"] : FALSE;
+     $LegendOffset	= isset($Format["LegendOffset"]) ? $Format["LegendOffset"] : 5;
+     $DrawArea		= isset($Format["DrawArea"]) ? $Format["DrawArea"] : FALSE;
+     $AreaR		= isset($Format["AreaR"]) ? $Format["AreaR"] : 255;
+     $AreaG		= isset($Format["AreaG"]) ? $Format["AreaG"] : 255;
+     $AreaB		= isset($Format["AreaB"]) ? $Format["AreaB"] : 255;
+     $AreaBorderR	= isset($Format["AreaBorderR"]) ? $Format["AreaBorderR"] : $AreaR;
+     $AreaBorderG	= isset($Format["AreaBorderG"]) ? $Format["AreaBorderG"] : $AreaG;
+     $AreaBorderB	= isset($Format["AreaBorderB"]) ? $Format["AreaBorderB"] : $AreaB;
+
+     $TextString = $this->encode128($Value);
+
+     if ( $DrawArea )
+      {
+       $X1 = $X + cos(($Angle-135) * PI / 180) * 10;
+       $Y1 = $Y + sin(($Angle-135) * PI / 180) * 10;
+
+       $X2 = $X1 + cos($Angle * PI / 180) * (strlen($this->Result)+20);
+       $Y2 = $Y1 + sin($Angle * PI / 180) * (strlen($this->Result)+20);
+
+       if ( $ShowLegend )
+        {
+         $X3 = $X2 + cos(($Angle+90) * PI / 180) * ($Height+$LegendOffset+$this->pChartObject->FontSize+10);
+         $Y3 = $Y2 + sin(($Angle+90) * PI / 180) * ($Height+$LegendOffset+$this->pChartObject->FontSize+10);
+        }
+       else
+        {
+         $X3 = $X2 + cos(($Angle+90) * PI / 180) * ($Height+20);
+         $Y3 = $Y2 + sin(($Angle+90) * PI / 180) * ($Height+20);
+        }
+
+       $X4 = $X3 + cos(($Angle+180) * PI / 180) * (strlen($this->Result)+20);
+       $Y4 = $Y3 + sin(($Angle+180) * PI / 180) * (strlen($this->Result)+20);
+
+       $Polygon  = array($X1,$Y1,$X2,$Y2,$X3,$Y3,$X4,$Y4);
+       $Settings = array("R"=>$AreaR,"G"=>$AreaG,"B"=>$AreaB,"BorderR"=>$AreaBorderR,"BorderG"=>$AreaBorderG,"BorderB"=>$AreaBorderB);
+       $this->pChartObject->drawPolygon($Polygon,$Settings);
+      }
+
+     for($i=1;$i<=strlen($this->Result);$i++)
+      {
+       if ( $this->mid($this->Result,$i,1) == 1 )
+        {
+         $X1 = $X + cos($Angle * PI / 180) * $i;
+         $Y1 = $Y + sin($Angle * PI / 180) * $i;
+         $X2 = $X1 + cos(($Angle+90) * PI / 180) * $Height;
+         $Y2 = $Y1 + sin(($Angle+90) * PI / 180) * $Height;
+
+         $Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+         $this->pChartObject->drawLine($X1,$Y1,$X2,$Y2,$Settings);
+        }
+      }
+
+     if ( $ShowLegend )
+      {
+       $X1 = $X + cos($Angle * PI / 180) * (strlen($this->Result)/2);
+       $Y1 = $Y + sin($Angle * PI / 180) * (strlen($this->Result)/2);
+
+       $LegendX = $X1 + cos(($Angle+90) * PI / 180) * ($Height+$LegendOffset);
+       $LegendY = $Y1 + sin(($Angle+90) * PI / 180) * ($Height+$LegendOffset);
+
+       $Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha,"Angle"=>-$Angle,"Align"=>TEXT_ALIGN_TOPMIDDLE);
+       $this->pChartObject->drawText($LegendX,$LegendY,$TextString,$Settings);
+      }
+    }
+
+   function left($value,$NbChar) { return substr($value,0,$NbChar); }  
+   function right($value,$NbChar) { return substr($value,strlen($value)-$NbChar,$NbChar); }  
+   function mid($value,$Depart,$NbChar) { return substr($value,$Depart-1,$NbChar); }  
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pBarcode39.class.php

@@ -0,0 +1,200 @@
+<?php
+ /*
+     pBarcode39 - class to create barcodes (39B)
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ /* pData class definition */
+ class pBarcode39
+  {
+   var $Codes;
+   var $Reverse;
+   var $Result;
+   var $pChartObject;
+   var $CRC;
+   var $MOD43;
+
+   /* Class creator */
+   function pBarcode39($BasePath="",$EnableMOD43=FALSE)
+    {
+     $this->MOD43  = $EnableMOD43;
+     $this->Codes   = "";
+     $this->Reverse = "";
+
+     $FileHandle = @fopen($BasePath."data/39.db", "r");
+
+     if (!$FileHandle) { die("Cannot find barcode database (".$BasePath."data/39.db)."); }
+
+     while (!feof($FileHandle))
+      {
+       $Buffer = fgets($FileHandle,4096);
+       $Buffer = str_replace(chr(10),"",$Buffer);
+       $Buffer = str_replace(chr(13),"",$Buffer);
+       $Values = preg_split("/;/",$Buffer);
+
+       $this->Codes[$Values[0]] = $Values[1];
+      }
+     fclose($FileHandle);
+    }
+
+   /* Return the projected size of a barcode */
+   function getSize($TextString,$Format="")
+    {
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $ShowLegend	= isset($Format["ShowLegend"]) ? $Format["ShowLegend"] : FALSE;
+     $LegendOffset	= isset($Format["LegendOffset"]) ? $Format["LegendOffset"] : 5;
+     $DrawArea		= isset($Format["DrawArea"]) ? $Format["DrawArea"] : FALSE;
+     $FontSize		= isset($Format["FontSize"]) ? $Format["FontSize"] : 12;
+     $Height		= isset($Format["Height"]) ? $Format["Height"] : 30;
+
+     $TextString    = $this->encode39($TextString);
+     $BarcodeLength = strlen($this->Result);
+
+     if ( $DrawArea )   { $WOffset = 20; } else { $WOffset = 0; }
+     if ( $ShowLegend ) { $HOffset = $FontSize+$LegendOffset+$WOffset; } else { $HOffset = 0; }
+
+     $X1 = cos($Angle * PI / 180) * ($WOffset+$BarcodeLength);
+     $Y1 = sin($Angle * PI / 180) * ($WOffset+$BarcodeLength);
+
+     $X2 = $X1 + cos(($Angle+90) * PI / 180) * ($HOffset+$Height);
+     $Y2 = $Y1 + sin(($Angle+90) * PI / 180) * ($HOffset+$Height);
+
+
+     $AreaWidth  = max(abs($X1),abs($X2));
+     $AreaHeight = max(abs($Y1),abs($Y2));
+
+     return(array("Width"=>$AreaWidth,"Height"=>$AreaHeight));
+    }
+
+   /* Create the encoded string */
+   function encode39($Value)
+    {
+     $this->Result = "100101101101"."0";
+     $TextString   = "";
+     for($i=1;$i<=strlen($Value);$i++)
+      {
+       $CharCode = ord($this->mid($Value,$i,1));
+       if ( $CharCode >= 97 && $CharCode <= 122 ) { $CharCode = $CharCode - 32; }
+
+       if ( isset($this->Codes[chr($CharCode)]) )
+        {
+         $this->Result = $this->Result.$this->Codes[chr($CharCode)]."0";
+         $TextString = $TextString.chr($CharCode);
+        }
+      }
+
+     if ( $this->MOD43 )
+      {
+       $Checksum = $this->checksum($TextString);
+       $this->Result = $this->Result.$this->Codes[$Checksum]."0";
+      }
+
+     $this->Result = $this->Result."100101101101";
+     $TextString   = "*".$TextString."*";
+
+     return($TextString);
+    }
+
+   /* Create the encoded string */
+   function draw($Object,$Value,$X,$Y,$Format="")
+    {
+     $this->pChartObject = $Object;
+
+     $R			= isset($Format["R"]) ? $Format["R"] : 0;
+     $G			= isset($Format["G"]) ? $Format["G"] : 0;
+     $B			= isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha		= isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+     $Height		= isset($Format["Height"]) ? $Format["Height"] : 30;
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $ShowLegend	= isset($Format["ShowLegend"]) ? $Format["ShowLegend"] : FALSE;
+     $LegendOffset	= isset($Format["LegendOffset"]) ? $Format["LegendOffset"] : 5;
+     $DrawArea		= isset($Format["DrawArea"]) ? $Format["DrawArea"] : FALSE;
+     $AreaR		= isset($Format["AreaR"]) ? $Format["AreaR"] : 255;
+     $AreaG		= isset($Format["AreaG"]) ? $Format["AreaG"] : 255;
+     $AreaB		= isset($Format["AreaB"]) ? $Format["AreaB"] : 255;
+     $AreaBorderR	= isset($Format["AreaBorderR"]) ? $Format["AreaBorderR"] : $AreaR;
+     $AreaBorderG	= isset($Format["AreaBorderG"]) ? $Format["AreaBorderG"] : $AreaG;
+     $AreaBorderB	= isset($Format["AreaBorderB"]) ? $Format["AreaBorderB"] : $AreaB;
+
+     $TextString   = $this->encode39($Value);
+
+     if ( $DrawArea )
+      {
+       $X1 = $X + cos(($Angle-135) * PI / 180) * 10;
+       $Y1 = $Y + sin(($Angle-135) * PI / 180) * 10;
+
+       $X2 = $X1 + cos($Angle * PI / 180) * (strlen($this->Result)+20);
+       $Y2 = $Y1 + sin($Angle * PI / 180) * (strlen($this->Result)+20);
+
+       if ( $ShowLegend )
+        {
+         $X3 = $X2 + cos(($Angle+90) * PI / 180) * ($Height+$LegendOffset+$this->pChartObject->FontSize+10);
+         $Y3 = $Y2 + sin(($Angle+90) * PI / 180) * ($Height+$LegendOffset+$this->pChartObject->FontSize+10);
+        }
+       else
+        {
+         $X3 = $X2 + cos(($Angle+90) * PI / 180) * ($Height+20);
+         $Y3 = $Y2 + sin(($Angle+90) * PI / 180) * ($Height+20);
+        }
+
+       $X4 = $X3 + cos(($Angle+180) * PI / 180) * (strlen($this->Result)+20);
+       $Y4 = $Y3 + sin(($Angle+180) * PI / 180) * (strlen($this->Result)+20);
+
+       $Polygon  = array($X1,$Y1,$X2,$Y2,$X3,$Y3,$X4,$Y4);
+       $Settings = array("R"=>$AreaR,"G"=>$AreaG,"B"=>$AreaB,"BorderR"=>$AreaBorderR,"BorderG"=>$AreaBorderG,"BorderB"=>$AreaBorderB);
+       $this->pChartObject->drawPolygon($Polygon,$Settings);
+      }
+
+     for($i=1;$i<=strlen($this->Result);$i++)
+      {
+       if ( $this->mid($this->Result,$i,1) == 1 )
+        {
+         $X1 = $X + cos($Angle * PI / 180) * $i;
+         $Y1 = $Y + sin($Angle * PI / 180) * $i;
+         $X2 = $X1 + cos(($Angle+90) * PI / 180) * $Height;
+         $Y2 = $Y1 + sin(($Angle+90) * PI / 180) * $Height;
+
+         $Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+         $this->pChartObject->drawLine($X1,$Y1,$X2,$Y2,$Settings);
+        }
+      }
+
+     if ( $ShowLegend )
+      {
+       $X1 = $X + cos($Angle * PI / 180) * (strlen($this->Result)/2);
+       $Y1 = $Y + sin($Angle * PI / 180) * (strlen($this->Result)/2);
+
+       $LegendX = $X1 + cos(($Angle+90) * PI / 180) * ($Height+$LegendOffset);
+       $LegendY = $Y1 + sin(($Angle+90) * PI / 180) * ($Height+$LegendOffset);
+
+       $Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha,"Angle"=>-$Angle,"Align"=>TEXT_ALIGN_TOPMIDDLE);
+       $this->pChartObject->drawText($LegendX,$LegendY,$TextString,$Settings);
+      }
+    }
+
+   function checksum( $string )
+    {
+     $checksum = 0;
+     $length   = strlen( $string );
+     $charset  = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ-. $/+%';
+
+     for( $i=0; $i < $length; ++$i )
+      $checksum += strpos( $charset, $string[$i] );
+ 
+     return substr( $charset, ($checksum % 43), 1 );
+    }
+
+   function left($value,$NbChar) { return substr($value,0,$NbChar); }  
+   function right($value,$NbChar) { return substr($value,strlen($value)-$NbChar,$NbChar); }  
+   function mid($value,$Depart,$NbChar) { return substr($value,$Depart-1,$NbChar); }  
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pBubble.class.php

@@ -0,0 +1,326 @@
+<?php
+ /*
+     pBubble - class to draw bubble charts
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("BUBBLE_SHAPE_ROUND"		, 700001);
+ define("BUBBLE_SHAPE_SQUARE"		, 700002);
+
+ /* pBubble class definition */
+ class pBubble
+  {
+   var $pChartObject;
+   var $pDataObject;
+
+   /* Class creator */
+   function pBubble($pChartObject,$pDataObject)
+    {
+     $this->pChartObject = $pChartObject;
+     $this->pDataObject  = $pDataObject;
+    }
+
+   /* Prepare the scale */
+   function bubbleScale($DataSeries,$WeightSeries)
+    {
+     if ( !is_array($DataSeries) )	{ $DataSeries = array($DataSeries); }
+     if ( !is_array($WeightSeries) )	{ $WeightSeries = array($WeightSeries); }
+
+     /* Parse each data series to find the new min & max boundaries to scale */
+     $NewPositiveSerie = ""; $NewNegativeSerie = ""; $MaxValues = 0; $LastPositive = 0; $LastNegative = 0;
+     foreach($DataSeries as $Key => $SerieName)
+      {
+       $SerieWeightName = $WeightSeries[$Key];
+
+       $this->pDataObject->setSerieDrawable($SerieWeightName,FALSE);
+
+       if ( count($this->pDataObject->Data["Series"][$SerieName]["Data"]) > $MaxValues ) { $MaxValues = count($this->pDataObject->Data["Series"][$SerieName]["Data"]); }
+
+       foreach($this->pDataObject->Data["Series"][$SerieName]["Data"] as $Key => $Value)
+        {
+         if ( $Value >= 0 )
+          {
+           $BubbleBounds = $Value + $this->pDataObject->Data["Series"][$SerieWeightName]["Data"][$Key];
+
+           if ( !isset($NewPositiveSerie[$Key]) )
+            { $NewPositiveSerie[$Key] = $BubbleBounds; }
+           elseif ( $NewPositiveSerie[$Key] < $BubbleBounds )
+            { $NewPositiveSerie[$Key] = $BubbleBounds; }
+
+           $LastPositive = $BubbleBounds;
+          }
+         else
+          {
+           $BubbleBounds = $Value - $this->pDataObject->Data["Series"][$SerieWeightName]["Data"][$Key];
+
+           if ( !isset($NewNegativeSerie[$Key]) )
+            { $NewNegativeSerie[$Key] = $BubbleBounds; }
+           elseif ( $NewNegativeSerie[$Key] > $BubbleBounds )
+            { $NewNegativeSerie[$Key] = $BubbleBounds; }
+
+           $LastNegative = $BubbleBounds;
+          }
+        }
+      }
+
+     /* Check for missing values and all the fake positive serie */
+     if ( $NewPositiveSerie != "" )
+      {
+       for ($i=0; $i<$MaxValues; $i++) { if (!isset($NewPositiveSerie[$i])) { $NewPositiveSerie[$i] = $LastPositive; } }
+
+       $this->pDataObject->addPoints($NewPositiveSerie,"BubbleFakePositiveSerie");
+      }
+
+     /* Check for missing values and all the fake negative serie */
+     if ( $NewNegativeSerie != "" )
+      {
+       for ($i=0; $i<$MaxValues; $i++) { if (!isset($NewNegativeSerie[$i])) { $NewNegativeSerie[$i] = $LastNegative; } }
+
+       $this->pDataObject->addPoints($NewNegativeSerie,"BubbleFakeNegativeSerie");
+      }
+    }
+
+   function resetSeriesColors()
+    {
+     $Data    = $this->pDataObject->getData();
+     $Palette = $this->pDataObject->getPalette();
+
+     $ID = 0;
+     foreach($Data["Series"] as $SerieName => $SeriesParameters)
+      {
+       if ( $SeriesParameters["isDrawable"] )
+        {
+         $this->pDataObject->Data["Series"][$SerieName]["Color"]["R"]     = $Palette[$ID]["R"];
+         $this->pDataObject->Data["Series"][$SerieName]["Color"]["G"]     = $Palette[$ID]["G"];
+         $this->pDataObject->Data["Series"][$SerieName]["Color"]["B"]     = $Palette[$ID]["B"];
+         $this->pDataObject->Data["Series"][$SerieName]["Color"]["Alpha"] = $Palette[$ID]["Alpha"];
+         $ID++;
+        }
+      }
+    }
+
+   /* Prepare the scale */
+   function drawBubbleChart($DataSeries,$WeightSeries,$Format="")
+    {
+     $ForceAlpha	= isset($Format["ForceAlpha"]) ? $Format["ForceAlpha"] : VOID;
+     $DrawBorder	= isset($Format["DrawBorder"]) ? $Format["DrawBorder"] : TRUE;
+     $BorderWidth	= isset($Format["BorderWidth"]) ? $Format["BorderWidth"] : 1;
+     $Shape		= isset($Format["Shape"]) ? $Format["Shape"] : BUBBLE_SHAPE_ROUND;
+     $Surrounding	= isset($Format["Surrounding"]) ? $Format["Surrounding"] : NULL;
+     $BorderR		= isset($Format["BorderR"]) ? $Format["BorderR"] : 0;
+     $BorderG		= isset($Format["BorderG"]) ? $Format["BorderG"] : 0;
+     $BorderB		= isset($Format["BorderB"]) ? $Format["BorderB"] : 0;
+     $BorderAlpha	= isset($Format["BorderAlpha"]) ? $Format["BorderAlpha"] : 30;
+     $RecordImageMap	= isset($Format["RecordImageMap"]) ? $Format["RecordImageMap"] : FALSE;
+
+     if ( !is_array($DataSeries) )	{ $DataSeries = array($DataSeries); }
+     if ( !is_array($WeightSeries) )	{ $WeightSeries = array($WeightSeries); }
+
+     $Data    = $this->pDataObject->getData();
+     $Palette = $this->pDataObject->getPalette();
+
+     if ( isset($Data["Series"]["BubbleFakePositiveSerie"] ) ) { $this->pDataObject->setSerieDrawable("BubbleFakePositiveSerie",FALSE); }
+     if ( isset($Data["Series"]["BubbleFakeNegativeSerie"] ) ) { $this->pDataObject->setSerieDrawable("BubbleFakeNegativeSerie",FALSE); }
+
+     $this->resetSeriesColors();
+
+     list($XMargin,$XDivs) = $this->pChartObject->scaleGetXSettings();
+
+     foreach($DataSeries as $Key => $SerieName)
+      {
+       $AxisID	= $Data["Series"][$SerieName]["Axis"];
+       $Mode	= $Data["Axis"][$AxisID]["Display"];
+       $Format	= $Data["Axis"][$AxisID]["Format"];
+       $Unit	= $Data["Axis"][$AxisID]["Unit"];
+
+       if (isset($Data["Series"][$SerieName]["Description"])) { $SerieDescription = $Data["Series"][$SerieName]["Description"]; } else { $SerieDescription = $SerieName; }
+
+       $XStep	= ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs;
+
+       $X = $this->pChartObject->GraphAreaX1 + $XMargin;
+       $Y = $this->pChartObject->GraphAreaY1 + $XMargin;
+
+       $Color = array("R"=>$Palette[$Key]["R"],"G"=>$Palette[$Key]["G"],"B"=>$Palette[$Key]["B"],"Alpha"=>$Palette[$Key]["Alpha"]);
+
+       if ( $ForceAlpha != VOID ) { $Color["Alpha"]=$ForceAlpha; }
+
+       if ( $DrawBorder )
+        {
+         if ( $BorderWidth != 1 )
+          {
+           if ( $Surrounding != NULL )
+            { $BorderR = $Palette[$Key]["R"]+$Surrounding; $BorderG = $Palette[$Key]["G"]+$Surrounding; $BorderB = $Palette[$Key]["B"]+$Surrounding; }
+           else
+            { $BorderR = $BorderR; $BorderG = $BorderG; $BorderB = $BorderB; }
+           if ( $ForceAlpha != VOID ) { $BorderAlpha = $ForceAlpha/2; }
+           $BorderColor = array("R"=>$BorderR,"G"=>$BorderG,"B"=>$BorderB,"Alpha"=>$BorderAlpha);
+          }
+         else
+          {
+           $Color["BorderAlpha"] = $BorderAlpha;
+
+           if ( $Surrounding != NULL )
+            { $Color["BorderR"] = $Palette[$Key]["R"]+$Surrounding; $Color["BorderG"] = $Palette[$Key]["G"]+$Surrounding; $Color["BorderB"] = $Palette[$Key]["B"]+$Surrounding; }
+           else
+            { $Color["BorderR"] = $BorderR; $Color["BorderG"] = $BorderG; $Color["BorderB"] = $BorderB; }
+           if ( $ForceAlpha != VOID ) { $Color["BorderAlpha"] = $ForceAlpha/2; }
+          }
+        }
+
+       foreach($Data["Series"][$SerieName]["Data"] as $iKey => $Point)
+        {
+         $Weight = $Point + $Data["Series"][$WeightSeries[$Key]]["Data"][$iKey];
+
+         $PosArray    = $this->pChartObject->scaleComputeY($Point,array("AxisID"=>$AxisID));
+         $WeightArray = $this->pChartObject->scaleComputeY($Weight,array("AxisID"=>$AxisID));
+
+         if ( $Data["Orientation"] == SCALE_POS_LEFTRIGHT )
+          {
+           if ( $XDivs == 0 ) { $XStep = 0; } else { $XStep = ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs; }
+           $Y = floor($PosArray); $CircleRadius = floor(abs($PosArray - $WeightArray)/2);
+
+           if ( $Shape == BUBBLE_SHAPE_SQUARE )
+            {
+             if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($X-$CircleRadius).",".floor($Y-$CircleRadius).",".floor($X+$CircleRadius).",".floor($Y+$CircleRadius),$this->pChartObject->toHTMLColor($Palette[$Key]["R"],$Palette[$Key]["G"],$Palette[$Key]["B"]),$SerieDescription,$Data["Series"][$WeightSeries[$Key]]["Data"][$iKey]); }
+
+             if ( $BorderWidth != 1 )
+              {
+               $this->pChartObject->drawFilledRectangle($X-$CircleRadius-$BorderWidth,$Y-$CircleRadius-$BorderWidth,$X+$CircleRadius+$BorderWidth,$Y+$CircleRadius+$BorderWidth,$BorderColor);
+               $this->pChartObject->drawFilledRectangle($X-$CircleRadius,$Y-$CircleRadius,$X+$CircleRadius,$Y+$CircleRadius,$Color);
+              }
+             else
+              $this->pChartObject->drawFilledRectangle($X-$CircleRadius,$Y-$CircleRadius,$X+$CircleRadius,$Y+$CircleRadius,$Color);
+            }
+           elseif ( $Shape == BUBBLE_SHAPE_ROUND )
+            {
+             if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("CIRCLE",floor($X).",".floor($Y).",".floor($CircleRadius),$this->pChartObject->toHTMLColor($Palette[$Key]["R"],$Palette[$Key]["G"],$Palette[$Key]["B"]),$SerieDescription,$Data["Series"][$WeightSeries[$Key]]["Data"][$iKey]); }
+
+             if ( $BorderWidth != 1 )
+              {
+               $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius+$BorderWidth,$BorderColor);
+               $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius,$Color);
+              }
+             else
+              $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius,$Color);
+            }
+
+           $X = $X + $XStep;
+          }
+         elseif ( $Data["Orientation"] == SCALE_POS_TOPBOTTOM )
+          {
+           if ( $XDivs == 0 ) { $XStep = 0; } else { $XStep = ($this->pChartObject->GraphAreaY2-$this->pChartObject->GraphAreaY1-$XMargin*2)/$XDivs; }
+           $X = floor($PosArray); $CircleRadius = floor(abs($PosArray - $WeightArray)/2);
+
+           if ( $Shape == BUBBLE_SHAPE_SQUARE )
+            {
+             if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($X-$CircleRadius).",".floor($Y-$CircleRadius).",".floor($X+$CircleRadius).",".floor($Y+$CircleRadius),$this->pChartObject->toHTMLColor($Palette[$Key]["R"],$Palette[$Key]["G"],$Palette[$Key]["B"]),$SerieDescription,$Data["Series"][$WeightSeries[$Key]]["Data"][$iKey]); }
+
+             if ( $BorderWidth != 1 )
+              {
+               $this->pChartObject->drawFilledRectangle($X-$CircleRadius-$BorderWidth,$Y-$CircleRadius-$BorderWidth,$X+$CircleRadius+$BorderWidth,$Y+$CircleRadius+$BorderWidth,$BorderColor);
+               $this->pChartObject->drawFilledRectangle($X-$CircleRadius,$Y-$CircleRadius,$X+$CircleRadius,$Y+$CircleRadius,$Color);
+              }
+             else
+              $this->pChartObject->drawFilledRectangle($X-$CircleRadius,$Y-$CircleRadius,$X+$CircleRadius,$Y+$CircleRadius,$Color);
+            }
+           elseif ( $Shape == BUBBLE_SHAPE_ROUND )
+            {
+             if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("CIRCLE",floor($X).",".floor($Y).",".floor($CircleRadius),$this->pChartObject->toHTMLColor($Palette[$Key]["R"],$Palette[$Key]["G"],$Palette[$Key]["B"]),$SerieDescription,$Data["Series"][$WeightSeries[$Key]]["Data"][$iKey]); }
+
+             if ( $BorderWidth != 1 )
+              {
+               $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius+$BorderWidth,$BorderColor);
+               $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius,$Color);
+              }
+             else
+              $this->pChartObject->drawFilledCircle($X,$Y,$CircleRadius,$Color);
+            }
+
+           $Y = $Y + $XStep;
+          }
+        }
+      }
+    }
+
+   function writeBubbleLabel($SerieName,$SerieWeightName,$Points,$Format="")
+    {
+     $OverrideTitle	= isset($Format["OverrideTitle"]) ? $Format["OverrideTitle"] : NULL;
+     $DrawPoint		= isset($Format["DrawPoint"]) ? $Format["DrawPoint"] : LABEL_POINT_BOX;
+
+     if ( !is_array($Points) ) { $Point = $Points; $Points = ""; $Points[] = $Point; }
+
+     $Data    = $this->pDataObject->getData();
+     $Palette = $this->pDataObject->getPalette();
+
+     if ( !isset($Data["Series"][$SerieName]) || !isset($Data["Series"][$SerieWeightName]) )
+      return(0);
+
+     list($XMargin,$XDivs) = $this->pChartObject->scaleGetXSettings();
+
+     $AxisID	 = $Data["Series"][$SerieName]["Axis"];
+     $AxisMode	 = $Data["Axis"][$AxisID]["Display"];
+     $AxisFormat = $Data["Axis"][$AxisID]["Format"];
+     $AxisUnit	 = $Data["Axis"][$AxisID]["Unit"];
+     $XStep	 = ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs;
+
+     $X = $this->pChartObject->GraphAreaX1 + $XMargin;
+     $Y = $this->pChartObject->GraphAreaY1 + $XMargin;
+
+     $Color = array("R"=>$Data["Series"][$SerieName]["Color"]["R"],"G"=>$Data["Series"][$SerieName]["Color"]["G"],"B"=>$Data["Series"][$SerieName]["Color"]["B"],"Alpha"=>$Data["Series"][$SerieName]["Color"]["Alpha"]);
+
+     foreach($Points as $Key => $Point)
+      {
+       $Value    = $Data["Series"][$SerieName]["Data"][$Point];
+       $PosArray = $this->pChartObject->scaleComputeY($Value,array("AxisID"=>$AxisID));
+
+       if ( isset($Data["Abscissa"]) && isset($Data["Series"][$Data["Abscissa"]]["Data"][$Point]) )
+        $Abscissa = $Data["Series"][$Data["Abscissa"]]["Data"][$Point]." : ";
+       else
+        $Abscissa = "";
+
+       $Value   = $this->pChartObject->scaleFormat($Value,$AxisMode,$AxisFormat,$AxisUnit);
+       $Weight  = $Data["Series"][$SerieWeightName]["Data"][$Point];
+       $Caption = $Abscissa.$Value." / ".$Weight;
+
+       if ( isset($Data["Series"][$SerieName]["Description"]) )
+        $Description = $Data["Series"][$SerieName]["Description"];
+       else
+        $Description = "No description";
+
+       $Series = "";
+       $Series[] = array("Format"=>$Color,"Caption"=>$Caption);
+
+       if ( $Data["Orientation"] == SCALE_POS_LEFTRIGHT )
+        {
+         if ( $XDivs == 0 ) { $XStep = 0; } else { $XStep = ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs; }
+
+         $X = floor($X + $Point * $XStep);
+         $Y = floor($PosArray);
+        }
+       else
+        {
+         if ( $XDivs == 0 ) { $YStep = 0; } else { $YStep = ($this->pChartObject->GraphAreaY2-$this->pChartObject->GraphAreaY1-$XMargin*2)/$XDivs; }
+
+         $X = floor($PosArray);
+         $Y = floor($Y + $Point * $YStep);
+        }
+
+       if ( $DrawPoint == LABEL_POINT_CIRCLE )
+        $this->pChartObject->drawFilledCircle($X,$Y,3,array("R"=>255,"G"=>255,"B"=>255,"BorderR"=>0,"BorderG"=>0,"BorderB"=>0));
+       elseif ( $DrawPoint == LABEL_POINT_BOX )
+        $this->pChartObject->drawFilledRectangle($X-2,$Y-2,$X+2,$Y+2,array("R"=>255,"G"=>255,"B"=>255,"BorderR"=>0,"BorderG"=>0,"BorderB"=>0));
+
+       $this->pChartObject->drawLabelBox($X,$Y-3,$Description,$Series,$Format);
+      }
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pCache.class.php

@@ -0,0 +1,280 @@
+<?php
+ /*
+     pCache - speed up the rendering by caching up the pictures
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ /* pData class definition */
+ class pCache
+  {
+   var $CacheFolder;
+   var $CacheIndex;
+   var $CacheDB;
+
+   /* Class creator */
+   function pCache($Settings="")
+    {
+     $CacheFolder	= isset($Settings["CacheFolder"]) ? $Settings["CacheFolder"] : "cache";
+     $CacheIndex	= isset($Settings["CacheIndex"]) ? $Settings["CacheIndex"] : "index.db";
+     $CacheDB		= isset($Settings["CacheDB"]) ? $Settings["CacheDB"] : "cache.db";
+
+     $this->CacheFolder	= $CacheFolder;
+     $this->CacheIndex	= $CacheIndex;
+     $this->CacheDB	= $CacheDB;
+
+     if (!file_exists($this->CacheFolder."/".$this->CacheIndex)) { touch($this->CacheFolder."/".$this->CacheIndex); }
+     if (!file_exists($this->CacheFolder."/".$this->CacheDB))    { touch($this->CacheFolder."/".$this->CacheDB); }
+    }
+
+   /* Flush the cache contents */
+   function flush()
+    {
+     if (file_exists($this->CacheFolder."/".$this->CacheIndex)) { unlink($this->CacheFolder."/".$this->CacheIndex); touch($this->CacheFolder."/".$this->CacheIndex); }
+     if (file_exists($this->CacheFolder."/".$this->CacheDB))    { unlink($this->CacheFolder."/".$this->CacheDB); touch($this->CacheFolder."/".$this->CacheDB); }
+    }
+
+   /* Return the MD5 of the data array to clearly identify the chart */
+   function getHash($Data,$Marker="")
+    { return(md5($Marker.serialize($Data->Data))); }
+
+   /* Write the generated picture to the cache */
+   function writeToCache($ID,$pChartObject)
+    {
+     /* Compute the paths */
+     $TemporaryFile = $this->CacheFolder."/tmp_".rand(0,1000).".png";
+     $Database      = $this->CacheFolder."/".$this->CacheDB;
+     $Index         = $this->CacheFolder."/".$this->CacheIndex;
+
+     /* Flush the picture to a temporary file */
+     imagepng($pChartObject->Picture ,$TemporaryFile);
+
+     /* Retrieve the files size */
+     $PictureSize = filesize($TemporaryFile);
+     $DBSize      = filesize($Database);
+
+     /* Save the index */
+     $Handle = fopen($Index,"a");
+     fwrite($Handle, $ID.",".$DBSize.",".$PictureSize.",".time().",0      \r\n");
+     fclose($Handle);
+
+     /* Get the picture raw contents */
+     $Handle = fopen($TemporaryFile,"r");
+     $Raw    = fread($Handle,$PictureSize);
+     fclose($Handle);
+
+     /* Save the picture in the solid database file */
+     $Handle = fopen($Database,"a");
+     fwrite($Handle, $Raw);
+     fclose($Handle);
+
+     /* Remove temporary file */
+     unlink($TemporaryFile);
+    }
+
+   /* Remove object older than the specified TS */
+   function removeOlderThan($Expiry)
+    { $this->dbRemoval(array("Expiry"=>$Expiry)); }
+
+   /* Remove an object from the cache */
+   function remove($ID)
+    { $this->dbRemoval(array("Name"=>$ID)); }
+
+   /* Remove with specified criterias */
+   function dbRemoval($Settings)
+    {
+     $ID     = isset($Settings["Name"]) ? $Settings["Name"] : NULL;
+     $Expiry = isset($Settings["Expiry"]) ? $Settings["Expiry"] : -(24*60*60);
+     $TS     = time()-$Expiry;
+
+     /* Compute the paths */
+     $Database     = $this->CacheFolder."/".$this->CacheDB;
+     $Index        = $this->CacheFolder."/".$this->CacheIndex;
+     $DatabaseTemp = $this->CacheFolder."/".$this->CacheDB.".tmp";
+     $IndexTemp    = $this->CacheFolder."/".$this->CacheIndex.".tmp";
+
+     /* Single file removal */
+     if ( $ID != NULL )
+      {
+       /* Retrieve object informations */
+       $Object = $this->isInCache($ID,TRUE);
+
+       /* If it's not in the cache DB, go away */
+       if ( !$Object ) { return(0); }
+      }
+
+     /* Create the temporary files */
+     if (!file_exists($DatabaseTemp)) { touch($DatabaseTemp); }
+     if (!file_exists($IndexTemp))    { touch($IndexTemp); }
+
+     /* Open the file handles */
+     $IndexHandle     = @fopen($Index, "r");
+     $IndexTempHandle = @fopen($IndexTemp, "w");
+     $DBHandle        = @fopen($Database, "r");
+     $DBTempHandle    = @fopen($DatabaseTemp, "w");
+
+     /* Remove the selected ID from the database */
+     while (!feof($IndexHandle))
+      {
+       $Entry    = fgets($IndexHandle, 4096);
+       $Entry    = str_replace("\r","",$Entry);
+       $Entry    = str_replace("\n","",$Entry);
+       $Settings = preg_split("/,/",$Entry);
+
+       if ( $Entry != "" )
+        {
+         $PicID       = $Settings[0];
+         $DBPos       = $Settings[1];
+         $PicSize     = $Settings[2];
+         $GeneratedTS = $Settings[3];
+         $Hits        = $Settings[4];
+
+         if ( $Settings[0] != $ID && $GeneratedTS > $TS)
+          {
+           $CurrentPos  = ftell($DBTempHandle);
+           fwrite($IndexTempHandle, $PicID.",".$CurrentPos.",".$PicSize.",".$GeneratedTS.",".$Hits."\r\n");
+
+           fseek($DBHandle,$DBPos);
+           $Picture = fread($DBHandle,$PicSize);
+           fwrite($DBTempHandle,$Picture);
+          }
+        }
+      }
+
+     /* Close the handles */
+     fclose($IndexHandle);
+     fclose($IndexTempHandle);
+     fclose($DBHandle);
+     fclose($DBTempHandle);
+
+     /* Remove the prod files */
+     unlink($Database);
+     unlink($Index);
+
+     /* Swap the temp & prod DB */
+     rename($DatabaseTemp,$Database);
+     rename($IndexTemp,$Index);
+    }
+
+   function isInCache($ID,$Verbose=FALSE,$UpdateHitsCount=FALSE)
+    {
+     /* Compute the paths */
+     $Index = $this->CacheFolder."/".$this->CacheIndex;
+
+     /* Search the picture in the index file */
+     $Handle = @fopen($Index, "r");
+     while (!feof($Handle))
+      {
+       $IndexPos = ftell($Handle);
+       $Entry = fgets($Handle, 4096);
+       if ( $Entry != "" )
+        {
+         $Settings = preg_split("/,/",$Entry);
+         $PicID    = $Settings[0];
+         if ( $PicID == $ID )
+          {
+           fclose($Handle);
+
+           $DBPos       = $Settings[1];
+           $PicSize     = $Settings[2];
+           $GeneratedTS = $Settings[3];
+           $Hits        = intval($Settings[4]);
+
+           if ( $UpdateHitsCount )
+            {
+             $Hits++;
+             if ( strlen($Hits) < 7 ) { $Hits = $Hits.str_repeat(" ",7-strlen($Hits)); }
+
+             $Handle = @fopen($Index, "r+");
+             fseek($Handle,$IndexPos);
+             fwrite($Handle, $PicID.",".$DBPos.",".$PicSize.",".$GeneratedTS.",".$Hits."\r\n");
+             fclose($Handle);
+            }
+
+           if ($Verbose)
+            { return(array("DBPos"=>$DBPos,"PicSize"=>$PicSize,"GeneratedTS"=>$GeneratedTS,"Hits"=>$Hits)); }
+           else
+            { return(TRUE); }
+          }
+        }
+      }
+     fclose($Handle);
+
+     /* Picture isn't in the cache */
+     return(FALSE);
+    }
+
+   /* Automatic output method based on the calling interface */
+   function autoOutput($ID,$Destination="output.png")
+    {
+     if (php_sapi_name() == "cli")
+      $this->saveFromCache($ID,$Destination);
+     else
+      $this->strokeFromCache($ID);
+    }
+
+   function strokeFromCache($ID)
+    {
+     /* Get the raw picture from the cache */
+     $Picture = $this->getFromCache($ID);
+
+     /* Do we have a hit? */
+     if ( $Picture == NULL ) { return(FALSE); }
+
+     header('Content-type: image/png');
+     echo $Picture;
+
+     return(TRUE);
+    }
+
+   function saveFromCache($ID,$Destination)
+    {
+     /* Get the raw picture from the cache */
+     $Picture = $this->getFromCache($ID);
+
+     /* Do we have a hit? */
+     if ( $Picture == NULL ) { return(FALSE); }
+
+     /* Flush the picture to a file */
+     $Handle = fopen($Destination,"w");
+     fwrite($Handle,$Picture);
+     fclose($Handle);
+
+     /* All went fine */
+     return(TRUE);
+    }
+
+   function getFromCache($ID)
+    {
+     /* Compute the path */
+     $Database = $this->CacheFolder."/".$this->CacheDB;
+
+     /* Lookup for the picture in the cache */
+     $CacheInfo = $this->isInCache($ID,TRUE,TRUE);
+
+     /* Not in the cache */
+     if (!$CacheInfo) { return(NULL); }
+
+     /* Get the database extended information */     
+     $DBPos   = $CacheInfo["DBPos"];
+     $PicSize = $CacheInfo["PicSize"];
+
+     /* Extract the picture from the solid cache file */
+     $Handle = @fopen($Database, "r");
+     fseek($Handle,$DBPos);
+     $Picture = fread($Handle,$PicSize);
+     fclose($Handle);
+
+     /* Return back the raw picture data */
+     return($Picture);
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pData.class.php

@@ -0,0 +1,787 @@
+<?php
+ /*
+     pDraw - class to manipulate data arrays
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ /* Axis configuration */
+ define("AXIS_FORMAT_DEFAULT"		, 680001);
+ define("AXIS_FORMAT_TIME"		, 680002);
+ define("AXIS_FORMAT_DATE"		, 680003);
+ define("AXIS_FORMAT_METRIC"		, 680004);
+ define("AXIS_FORMAT_CURRENCY"		, 680005);
+ define("AXIS_FORMAT_CUSTOM"		, 680006);
+
+ /* Axis position */
+ define("AXIS_POSITION_LEFT"		, 681001);
+ define("AXIS_POSITION_RIGHT"		, 681002);
+ define("AXIS_POSITION_TOP"		, 681001);
+ define("AXIS_POSITION_BOTTOM"		, 681002);
+
+ /* Families of data points */
+ define("SERIE_SHAPE_FILLEDCIRCLE"	, 681011);
+ define("SERIE_SHAPE_FILLEDTRIANGLE"	, 681012);
+ define("SERIE_SHAPE_FILLEDSQUARE"	, 681013);
+ define("SERIE_SHAPE_FILLEDDIAMOND"	, 681017);
+ define("SERIE_SHAPE_CIRCLE"		, 681014);
+ define("SERIE_SHAPE_TRIANGLE"		, 681015);
+ define("SERIE_SHAPE_SQUARE"		, 681016);
+ define("SERIE_SHAPE_DIAMOND"		, 681018);
+
+ /* Axis position */
+ define("AXIS_X"			, 682001);
+ define("AXIS_Y"			, 682002);
+
+ /* Define value limits */
+ define("ABSOLUTE_MIN"          	, -10000000000000);
+ define("ABSOLUTE_MAX"          	, 10000000000000);
+
+ /* Replacement to the PHP NULL keyword */
+ define("VOID"                  	, 0.123456789);
+
+ /* Euro symbol for GD fonts */
+ define("EURO_SYMBOL"			, utf8_encode("&#8364;"));
+
+ /* pData class definition */
+ class pData
+  {
+   var $Data;
+
+   var $Palette = array("0"=>array("R"=>188,"G"=>224,"B"=>46,"Alpha"=>100),
+                        "1"=>array("R"=>224,"G"=>100,"B"=>46,"Alpha"=>100),
+                        "2"=>array("R"=>224,"G"=>214,"B"=>46,"Alpha"=>100),
+                        "3"=>array("R"=>46,"G"=>151,"B"=>224,"Alpha"=>100),
+                        "4"=>array("R"=>176,"G"=>46,"B"=>224,"Alpha"=>100),
+                        "5"=>array("R"=>224,"G"=>46,"B"=>117,"Alpha"=>100),
+                        "6"=>array("R"=>92,"G"=>224,"B"=>46,"Alpha"=>100),
+                        "7"=>array("R"=>224,"G"=>176,"B"=>46,"Alpha"=>100));
+
+   /* Class creator */
+   function pData()
+    {
+     $this->Data = "";
+     $this->Data["XAxisDisplay"]	= AXIS_FORMAT_DEFAULT;
+     $this->Data["XAxisFormat"]		= NULL;
+     $this->Data["XAxisName"]		= NULL;
+     $this->Data["XAxisUnit"]		= NULL;
+     $this->Data["Abscissa"]		= NULL;
+     $this->Data["AbsicssaPosition"]	= AXIS_POSITION_BOTTOM;
+
+     $this->Data["Axis"][0]["Display"]  = AXIS_FORMAT_DEFAULT;
+     $this->Data["Axis"][0]["Position"] = AXIS_POSITION_LEFT;
+     $this->Data["Axis"][0]["Identity"] = AXIS_Y;
+    }
+
+   /* Add a single point or an array to the given serie */
+   function addPoints($Values,$SerieName="Serie1")
+    {
+     if (!isset($this->Data["Series"][$SerieName]))
+      $this->initialise($SerieName);
+
+     if ( is_array($Values) )
+      {
+       foreach($Values as $Key => $Value)
+        { $this->Data["Series"][$SerieName]["Data"][] = $Value; }
+      }
+     else
+      $this->Data["Series"][$SerieName]["Data"][] = $Values;
+
+     if ( $Values != VOID )
+      {
+       $StrippedData = $this->stripVOID($this->Data["Series"][$SerieName]["Data"]);
+       if ( empty($StrippedData) ) { $this->Data["Series"][$SerieName]["Max"] = 0; $this->Data["Series"][$SerieName]["Min"] =0; return(0); }
+       $this->Data["Series"][$SerieName]["Max"] = max($StrippedData);
+       $this->Data["Series"][$SerieName]["Min"] = min($StrippedData);
+      }
+    }
+
+   /* Strip VOID values */
+   function stripVOID($Values)
+    { if (!is_array($Values)) { return(array()); } $Result = array(); foreach($Values as $Key => $Value) { if ( $Value != VOID ) { $Result[] = $Value; } } return($Result); }
+
+   /* Return the number of values contained in a given serie */
+   function getSerieCount($Serie)
+    { if (isset($this->Data["Series"][$Serie]["Data"])) { return(sizeof($this->Data["Series"][$Serie]["Data"])); } else { return(0); } }
+
+   /* Remove a serie from the pData object */
+   function removeSerie($Series)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie])) { unset($this->Data["Series"][$Serie]); } }
+    }
+
+   /* Return a value from given serie & index */
+   function getValueAt($Serie,$Index=0)
+    { if (isset($this->Data["Series"][$Serie]["Data"][$Index])) { return($this->Data["Series"][$Serie]["Data"][$Index]); } else { return(NULL); } }
+
+   /* Return the values array */
+   function getValues($Serie)
+    { if (isset($this->Data["Series"][$Serie]["Data"])) { return($this->Data["Series"][$Serie]["Data"]); } else { return(NULL); } }
+
+   /* Reverse the values in the given serie */
+   function reverseSerie($Series)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie]["Data"])) { $this->Data["Series"][$Serie]["Data"] = array_reverse($this->Data["Series"][$Serie]["Data"]); } }
+    }
+
+   /* Return the sum of the serie values */
+   function getSum($Serie)
+    { if (isset($this->Data["Series"][$Serie])) { return(array_sum($this->Data["Series"][$Serie]["Data"])); } else { return(NULL); } }
+
+   /* Return the max value of a given serie */
+   function getMax($Serie)
+    { if (isset($this->Data["Series"][$Serie]["Max"])) { return($this->Data["Series"][$Serie]["Max"]); } else { return(NULL); } }
+
+   /* Return the min value of a given serie */
+   function getMin($Serie)
+    { if (isset($this->Data["Series"][$Serie]["Min"])) { return($this->Data["Series"][$Serie]["Min"]); } else { return(NULL); } }
+
+   /* Set the description of a given serie */
+   function setSerieShape($Series,$Shape=SERIE_SHAPE_FILLEDCIRCLE)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["Shape"] = $Shape; } }
+    }
+
+   /* Set the description of a given serie */
+   function setSerieDescription($Series,$Description="My serie")
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["Description"] = $Description; } }
+    }
+
+   /* Set a serie as "drawable" while calling a rendering function */
+   function setSerieDrawable($Series,$Drawable=TRUE)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["isDrawable"] = $Drawable; } }
+    }
+
+   /* Set the icon associated to a given serie */
+   function setSeriePicture($Series,$Picture=NULL)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if (isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["Picture"] = $Picture; } }
+    }
+
+   /* Set the name of the X Axis */
+   function setXAxisName($Name)
+    { $this->Data["XAxisName"] = $Name; }
+
+   /* Set the display mode of the  X Axis */
+   function setXAxisDisplay($Mode,$Format=NULL)
+    { $this->Data["XAxisDisplay"] = $Mode; $this->Data["XAxisFormat"]  = $Format; }
+
+   /* Set the unit that will be displayed on the X axis */
+   function setXAxisUnit($Unit)
+    { $this->Data["XAxisUnit"] = $Unit; }
+
+   /* Set the serie that will be used as abscissa */
+   function setAbscissa($Serie)
+    { if (isset($this->Data["Series"][$Serie])) { $this->Data["Abscissa"] = $Serie; } }
+
+   function setAbsicssaPosition($Position = AXIS_POSITION_BOTTOM)
+    { $this->Data["AbsicssaPosition"] = $Position; }
+
+   /* Set the name of the abscissa axis */
+   function setAbscissaName($Name)
+    { $this->Data["AbscissaName"] = $Name; }
+
+   /* Create a scatter group specifyin X and Y data series */
+   function setScatterSerie($SerieX,$SerieY,$ID=0)
+    { if (isset($this->Data["Series"][$SerieX]) && isset($this->Data["Series"][$SerieY]) ) { $this->initScatterSerie($ID); $this->Data["ScatterSeries"][$ID]["X"] = $SerieX; $this->Data["ScatterSeries"][$ID]["Y"] = $SerieY; } }
+
+   /* Set the shape of a given sctatter serie */
+   function setScatterSerieShape($ID,$Shape=SERIE_SHAPE_FILLEDCIRCLE)
+    { if (isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["Shape"] = $Shape; } }
+
+   /* Set the description of a given scatter serie */
+   function setScatterSerieDescription($ID,$Description="My serie")
+    { if (isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["Description"] = $Description; } }
+
+   /* Set the icon associated to a given scatter serie */
+   function setScatterSeriePicture($ID,$Picture=NULL)
+    { if (isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["Picture"] = $Picture; } }
+
+   /* Set a scatter serie as "drawable" while calling a rendering function */
+   function setScatterSerieDrawable($ID ,$Drawable=TRUE)
+    { if (isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["isDrawable"] = $Drawable; } }
+
+   /* Define if a scatter serie should be draw with ticks */
+   function setScatterSerieTicks($ID,$Width=0)
+    { if ( isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["Ticks"] = $Width; } }
+
+   /* Define if a scatter serie should be draw with a special weight */
+   function setScatterSerieWeight($ID,$Weight=0)
+    { if ( isset($this->Data["ScatterSeries"][$ID]) ) { $this->Data["ScatterSeries"][$ID]["Weight"] = $Weight; } }
+
+   /* Associate a color to a scatter serie */
+   function setScatterSerieColor($ID,$Format)
+    {
+     $R	    = isset($Format["R"]) ? $Format["R"] : 0;
+     $G	    = isset($Format["G"]) ? $Format["G"] : 0;
+     $B	    = isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+
+     if ( isset($this->Data["ScatterSeries"][$ID]) )
+      {
+       $this->Data["ScatterSeries"][$ID]["Color"]["R"] = $R;
+       $this->Data["ScatterSeries"][$ID]["Color"]["G"] = $G;
+       $this->Data["ScatterSeries"][$ID]["Color"]["B"] = $B;
+       $this->Data["ScatterSeries"][$ID]["Color"]["Alpha"] = $Alpha;
+      }
+    }
+
+   /* Compute the series limits for an individual and global point of view */
+   function limits()
+    {
+     $GlobalMin = ABSOLUTE_MAX;
+     $GlobalMax = ABSOLUTE_MIN;
+
+     foreach($this->Data["Series"] as $Key => $Value)
+      {
+       if ( $this->Data["Abscissa"] != $Key && $this->Data["Series"][$Key]["isDrawable"] == TRUE)
+        {
+         if ( $GlobalMin > $this->Data["Series"][$Key]["Min"] ) { $GlobalMin = $this->Data["Series"][$Key]["Min"]; }
+         if ( $GlobalMax < $this->Data["Series"][$Key]["Max"] ) { $GlobalMax = $this->Data["Series"][$Key]["Max"]; }
+        }
+      }
+     $this->Data["Min"] = $GlobalMin;
+     $this->Data["Max"] = $GlobalMax;
+
+     return(array($GlobalMin,$GlobalMax));
+    }
+
+   /* Mark all series as drawable */
+   function drawAll()
+    { foreach($this->Data["Series"] as $Key => $Value) { if ( $this->Data["Abscissa"] != $Key ) { $this->Data["Series"][$Key]["isDrawable"]=TRUE; } } }    
+
+   /* Return the average value of the given serie */
+   function getSerieAverage($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $SerieData = $this->stripVOID($this->Data["Series"][$Serie]["Data"]);
+       return(array_sum($SerieData)/sizeof($SerieData));
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the geometric mean of the given serie */
+   function getGeometricMean($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $SerieData = $this->stripVOID($this->Data["Series"][$Serie]["Data"]);
+       $Seriesum  = 1; foreach($SerieData as $Key => $Value) { $Seriesum = $Seriesum * $Value; }
+       return(pow($Seriesum,1/sizeof($SerieData)));
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the harmonic mean of the given serie */
+   function getHarmonicMean($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $SerieData = $this->stripVOID($this->Data["Series"][$Serie]["Data"]);
+       $Seriesum  = 0; foreach($SerieData as $Key => $Value) { $Seriesum = $Seriesum + 1/$Value; }
+       return(sizeof($SerieData)/$Seriesum);
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the standard deviation of the given serie */
+   function getStandardDeviation($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $Average   = $this->getSerieAverage($Serie);
+       $SerieData = $this->stripVOID($this->Data["Series"][$Serie]["Data"]);
+
+       $DeviationSum = 0;
+       foreach($SerieData as $Key => $Value)
+        $DeviationSum = $DeviationSum + ($Value-$Average)*($Value-$Average);
+
+       $Deviation = sqrt($DeviationSum/count($SerieData));
+
+       return($Deviation);
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the Coefficient of variation of the given serie */
+   function getCoefficientOfVariation($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $Average           = $this->getSerieAverage($Serie);
+       $StandardDeviation = $this->getStandardDeviation($Serie);
+
+       if ( $StandardDeviation != 0 )
+        return($StandardDeviation/$Average);
+       else
+        return(NULL);
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the median value of the given serie */
+   function getSerieMedian($Serie)
+    {
+     if ( isset($this->Data["Series"][$Serie]) )
+      {
+       $SerieData = $this->stripVOID($this->Data["Series"][$Serie]["Data"]);
+       sort($SerieData);
+       $SerieCenter = floor(sizeof($SerieData)/2);
+
+       if ( isset($SerieData[$SerieCenter]) )
+        return($SerieData[$SerieCenter]);
+       else
+        return(NULL);
+      }
+     else
+      return(NULL);
+    }
+
+   /* Return the x th percentil of the given serie */
+   function getSeriePercentile($Serie="Serie1",$Percentil=95)
+    {
+     if (!isset($this->Data["Series"][$Serie]["Data"])) { return(NULL); }
+
+     $Values = count($this->Data["Series"][$Serie]["Data"])-1;
+     if ( $Values < 0 ) { $Values = 0; }
+
+     $PercentilID  = floor(($Values/100)*$Percentil+.5);
+     $SortedValues = $this->Data["Series"][$Serie]["Data"];
+     sort($SortedValues);
+
+     if ( is_numeric($SortedValues[$PercentilID]) )
+      return($SortedValues[$PercentilID]);
+     else
+      return(NULL);
+    }
+
+   /* Add random values to a given serie */
+   function addRandomValues($SerieName="Serie1",$Options="")
+    {
+     $Values    = isset($Options["Values"]) ? $Options["Values"] : 20;
+     $Min       = isset($Options["Min"]) ? $Options["Min"] : 0;
+     $Max       = isset($Options["Max"]) ? $Options["Max"] : 100;
+     $withFloat = isset($Options["withFloat"]) ? $Options["withFloat"] : FALSE;
+
+     for ($i=0;$i<=$Values;$i++)
+      {
+       if ( $withFloat ) { $Value = rand($Min*100,$Max*100)/100; } else { $Value = rand($Min,$Max); }
+       $this->addPoints($Value,$SerieName);
+      }
+    }
+
+   /* Test if we have valid data */
+   function containsData()
+    {
+     if (!isset($this->Data["Series"])) { return(FALSE); }
+
+     $Result = FALSE;
+     foreach($this->Data["Series"] as $Key => $Value)
+      { if ( $this->Data["Abscissa"] != $Key && $this->Data["Series"][$Key]["isDrawable"]==TRUE) { $Result=TRUE; } }
+     return($Result);
+    }
+
+   /* Set the display mode of an Axis */
+   function setAxisDisplay($AxisID,$Mode=AXIS_FORMAT_DEFAULT,$Format=NULL)
+    {
+     if ( isset($this->Data["Axis"][$AxisID] ) )
+      {
+       $this->Data["Axis"][$AxisID]["Display"] = $Mode;
+       if ( $Format != NULL ) { $this->Data["Axis"][$AxisID]["Format"] = $Format; }
+      }
+    }
+
+   /* Set the position of an Axis */
+   function setAxisPosition($AxisID,$Position=AXIS_POSITION_LEFT)
+    { if ( isset($this->Data["Axis"][$AxisID] ) ) { $this->Data["Axis"][$AxisID]["Position"] = $Position; } }
+
+   /* Associate an unit to an axis */
+   function setAxisUnit($AxisID,$Unit)
+    { if ( isset($this->Data["Axis"][$AxisID] ) ) { $this->Data["Axis"][$AxisID]["Unit"] = $Unit; } }
+
+   /* Associate a name to an axis */
+   function setAxisName($AxisID,$Name)
+    { if ( isset($this->Data["Axis"][$AxisID] ) ) { $this->Data["Axis"][$AxisID]["Name"] = $Name; } }
+
+   /* Associate a color to an axis */
+   function setAxisColor($AxisID,$Format)
+    {
+     $R	    = isset($Format["R"]) ? $Format["R"] : 0;
+     $G	    = isset($Format["G"]) ? $Format["G"] : 0;
+     $B	    = isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+
+     if ( isset($this->Data["Axis"][$AxisID] ) )
+      {
+       $this->Data["Axis"][$AxisID]["Color"]["R"] = $R;
+       $this->Data["Axis"][$AxisID]["Color"]["G"] = $G;
+       $this->Data["Axis"][$AxisID]["Color"]["B"] = $B;
+       $this->Data["Axis"][$AxisID]["Color"]["Alpha"] = $Alpha;
+      }
+    }
+
+
+   /* Design an axis as X or Y member */
+   function setAxisXY($AxisID,$Identity=AXIS_Y)
+    { if ( isset($this->Data["Axis"][$AxisID] ) ) { $this->Data["Axis"][$AxisID]["Identity"] = $Identity; } }
+
+   /* Associate one data serie with one axis */
+   function setSerieOnAxis($Series,$AxisID)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie)
+      {
+       $PreviousAxis = $this->Data["Series"][$Serie]["Axis"];
+
+       /* Create missing axis */
+       if ( !isset($this->Data["Axis"][$AxisID] ) )
+        { $this->Data["Axis"][$AxisID]["Position"] = AXIS_POSITION_LEFT; $this->Data["Axis"][$AxisID]["Identity"] = AXIS_Y;}
+
+       $this->Data["Series"][$Serie]["Axis"] = $AxisID;
+
+       /* Cleanup unused axis */
+       $Found = FALSE;
+       foreach($this->Data["Series"] as $SerieName => $Values) { if ( $Values["Axis"] == $PreviousAxis ) { $Found = TRUE; } }
+       if (!$Found) { unset($this->Data["Axis"][$PreviousAxis]); }
+      }
+    }
+
+   /* Define if a serie should be draw with ticks */
+   function setSerieTicks($Series,$Width=0)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if ( isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["Ticks"] = $Width; } }
+    }
+
+   /* Define if a serie should be draw with a special weight */
+   function setSerieWeight($Series,$Weight=0)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $Serie) { if ( isset($this->Data["Series"][$Serie]) ) { $this->Data["Series"][$Serie]["Weight"] = $Weight; } }
+    }
+
+   /* Returns the palette of the given serie */
+   function getSeriePalette($Serie)
+    {
+     if ( !isset($this->Data["Series"][$Serie]) ) { return(NULL); }
+
+     $Result = "";
+     $Result["R"] = $this->Data["Series"][$Serie]["Color"]["R"];
+     $Result["G"] = $this->Data["Series"][$Serie]["Color"]["G"];
+     $Result["B"] = $this->Data["Series"][$Serie]["Color"]["B"];
+     $Result["Alpha"] = $this->Data["Series"][$Serie]["Color"]["Alpha"];
+
+     return($Result);
+    }
+
+   /* Set the color of one serie */
+   function setPalette($Series,$Format=NULL)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+
+     foreach($Series as $Key => $Serie)
+      {
+       $R	    = isset($Format["R"]) ? $Format["R"] : 0;
+       $G	    = isset($Format["G"]) ? $Format["G"] : 0;
+       $B	    = isset($Format["B"]) ? $Format["B"] : 0;
+       $Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+
+       if ( isset($this->Data["Series"][$Serie]) )
+        {
+         $OldR = $this->Data["Series"][$Serie]["Color"]["R"]; $OldG = $this->Data["Series"][$Serie]["Color"]["G"]; $OldB = $this->Data["Series"][$Serie]["Color"]["B"];
+         $this->Data["Series"][$Serie]["Color"]["R"] = $R;
+         $this->Data["Series"][$Serie]["Color"]["G"] = $G;
+         $this->Data["Series"][$Serie]["Color"]["B"] = $B;
+         $this->Data["Series"][$Serie]["Color"]["Alpha"] = $Alpha;
+
+         /* Do reverse processing on the internal palette array */
+         foreach ($this->Palette as $Key => $Value)
+          { if ($Value["R"] == $OldR && $Value["G"] == $OldG && $Value["B"] == $OldB) { $this->Palette[$Key]["R"] = $R; $this->Palette[$Key]["G"] = $G; $this->Palette[$Key]["B"] = $B; $this->Palette[$Key]["Alpha"] = $Alpha;} }
+        }
+      }
+    }
+
+   /* Load a palette file */
+   function loadPalette($FileName,$Overwrite=FALSE)
+    {
+     if ( !file_exists($FileName) ) { return(-1); }
+     if ( $Overwrite ) { $this->Palette = ""; }
+
+     $fileHandle = @fopen($FileName, "r");
+     if (!$fileHandle) { return(-1); }
+     while (!feof($fileHandle))
+      {
+       $buffer = fgets($fileHandle, 4096);
+       if ( preg_match("/,/",$buffer) )
+        {
+         list($R,$G,$B,$Alpha) = preg_split("/,/",$buffer);
+         if ( $this->Palette == "" ) { $ID = 0; } else { $ID = count($this->Palette); }
+         $this->Palette[$ID] = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+        }
+      }
+     fclose($fileHandle);
+
+     /* Apply changes to current series */
+     $ID = 0;
+     if ( isset($this->Data["Series"]))
+      {
+       foreach($this->Data["Series"] as $Key => $Value)
+        {
+         if ( !isset($this->Palette[$ID]) )
+          $this->Data["Series"][$Key]["Color"] = array("R"=>0,"G"=>0,"B"=>0,"Alpha"=>0);
+         else
+          $this->Data["Series"][$Key]["Color"] = $this->Palette[$ID];
+         $ID++;
+        }
+      }
+    }
+
+   /* Initialise a given scatter serie */
+   function initScatterSerie($ID)
+    {
+     if ( isset($this->Data["ScatterSeries"][$ID]) ) { return(0); }
+
+     $this->Data["ScatterSeries"][$ID]["Description"]	= "Scatter ".$ID;
+     $this->Data["ScatterSeries"][$ID]["isDrawable"]	= TRUE;
+     $this->Data["ScatterSeries"][$ID]["Picture"]	= NULL;
+     $this->Data["ScatterSeries"][$ID]["Ticks"]		= 0;
+     $this->Data["ScatterSeries"][$ID]["Weight"]	= 0;
+
+     if ( isset($this->Palette[$ID]) )
+      $this->Data["ScatterSeries"][$ID]["Color"] = $this->Palette[$ID];
+     else
+      {
+       $this->Data["ScatterSeries"][$ID]["Color"]["R"] = rand(0,255);
+       $this->Data["ScatterSeries"][$ID]["Color"]["G"] = rand(0,255);
+       $this->Data["ScatterSeries"][$ID]["Color"]["B"] = rand(0,255);
+       $this->Data["ScatterSeries"][$ID]["Color"]["Alpha"] = 100;
+      }
+    }
+
+   /* Initialise a given serie */
+   function initialise($Serie)
+    {
+     if ( isset($this->Data["Series"]) ) { $ID = count($this->Data["Series"]); } else { $ID = 0; }
+
+     $this->Data["Series"][$Serie]["Description"]	= $Serie;
+     $this->Data["Series"][$Serie]["isDrawable"]	= TRUE;
+     $this->Data["Series"][$Serie]["Picture"]		= NULL;
+     $this->Data["Series"][$Serie]["Max"]		= NULL;
+     $this->Data["Series"][$Serie]["Min"]		= NULL;
+     $this->Data["Series"][$Serie]["Axis"]		= 0;
+     $this->Data["Series"][$Serie]["Ticks"]		= 0;
+     $this->Data["Series"][$Serie]["Weight"]		= 0;
+     $this->Data["Series"][$Serie]["Shape"]		= SERIE_SHAPE_FILLEDCIRCLE;
+
+     if ( isset($this->Palette[$ID]) )
+      $this->Data["Series"][$Serie]["Color"] = $this->Palette[$ID];
+     else
+      {
+       $this->Data["Series"][$Serie]["Color"]["R"] = rand(0,255);
+       $this->Data["Series"][$Serie]["Color"]["G"] = rand(0,255);
+       $this->Data["Series"][$Serie]["Color"]["B"] = rand(0,255);
+       $this->Data["Series"][$Serie]["Color"]["Alpha"] = 100;
+      }
+    }
+     
+   function normalize($NormalizationFactor=100,$UnitChange=NULL,$Round=1)
+    {
+     $Abscissa = $this->Data["Abscissa"];
+
+     $SelectedSeries = "";
+     $MaxVal         = 0;
+     foreach($this->Data["Axis"] as $AxisID => $Axis)
+      {
+       if ( $UnitChange != NULL ) { $this->Data["Axis"][$AxisID]["Unit"] = $UnitChange; }
+
+       foreach($this->Data["Series"] as $SerieName => $Serie)
+        {
+         if ($Serie["Axis"] == $AxisID && $Serie["isDrawable"] == TRUE && $SerieName != $Abscissa)
+          {
+           $SelectedSeries[$SerieName] = $SerieName;
+
+           if ( count($Serie["Data"] ) > $MaxVal ) { $MaxVal = count($Serie["Data"]); }
+          }
+        }
+      }
+
+     for($i=0;$i<=$MaxVal-1;$i++)
+      {
+       $Factor = 0;
+       foreach ($SelectedSeries as $Key => $SerieName )
+        {
+         $Value = $this->Data["Series"][$SerieName]["Data"][$i];
+         if ( $Value != VOID )
+          $Factor = $Factor + abs($Value);
+        }
+
+       if ( $Factor != 0 )
+        {
+         $Factor = $NormalizationFactor / $Factor;
+
+         foreach ($SelectedSeries as $Key => $SerieName )
+          {
+           $Value = $this->Data["Series"][$SerieName]["Data"][$i];
+
+           if ( $Value != VOID && $Factor != $NormalizationFactor )
+            $this->Data["Series"][$SerieName]["Data"][$i] = round(abs($Value)*$Factor,$Round);
+           elseif ( $Value == VOID || $Value == 0 )
+            $this->Data["Series"][$SerieName]["Data"][$i] = VOID;
+           elseif ( $Factor == $NormalizationFactor )
+            $this->Data["Series"][$SerieName]["Data"][$i] = $NormalizationFactor;
+          }
+        }
+      }
+
+     foreach ($SelectedSeries as $Key => $SerieName )
+      {
+       $this->Data["Series"][$SerieName]["Max"] = max($this->stripVOID($this->Data["Series"][$SerieName]["Data"]));
+       $this->Data["Series"][$SerieName]["Min"] = min($this->stripVOID($this->Data["Series"][$SerieName]["Data"]));
+      }
+    }
+
+   /* Load data from a CSV (or similar) data source */
+   function importFromCSV($FileName,$Options="")
+    {
+     $Delimiter		= isset($Options["Delimiter"]) ? $Options["Delimiter"] : ",";
+     $GotHeader		= isset($Options["GotHeader"]) ? $Options["GotHeader"] : FALSE;
+     $SkipColumns	= isset($Options["SkipColumns"]) ? $Options["SkipColumns"] : array(-1);
+     $DefaultSerieName	= isset($Options["DefaultSerieName"]) ? $Options["DefaultSerieName"] : "Serie";
+
+     $Handle = @fopen($FileName,"r");
+     if ($Handle)
+      {
+       $HeaderParsed = FALSE; $SerieNames = "";
+       while (!feof($Handle))
+        {
+         $Buffer = fgets($Handle, 4096);
+         $Buffer = str_replace(chr(10),"",$Buffer);
+         $Buffer = str_replace(chr(13),"",$Buffer);
+         $Values = preg_split("/".$Delimiter."/",$Buffer);
+
+         if ( $Buffer != "" )
+          {
+           if ( $GotHeader && !$HeaderParsed )
+            {
+             foreach($Values as $Key => $Name) { if ( !in_array($Key,$SkipColumns) ) { $SerieNames[$Key] = $Name; } }
+             $HeaderParsed = TRUE;
+            }
+           else
+            {
+             if ($SerieNames == "" ) { foreach($Values as $Key => $Name) {  if ( !in_array($Key,$SkipColumns) ) { $SerieNames[$Key] = $DefaultSerieName.$Key; } } }
+             foreach($Values as $Key => $Value) {  if ( !in_array($Key,$SkipColumns) ) { $this->addPoints($Value,$SerieNames[$Key]); } }
+            }
+          }
+        }
+       fclose($Handle);
+      }
+    }
+
+   /* Create a dataset based on a formula */
+   function createFunctionSerie($SerieName,$Formula="",$Options="")
+    {
+     $MinX		= isset($Options["MinX"]) ? $Options["MinX"] : -10;
+     $MaxX		= isset($Options["MaxX"]) ? $Options["MaxX"] : 10;
+     $XStep		= isset($Options["XStep"]) ? $Options["XStep"] : 1;
+     $AutoDescription	= isset($Options["AutoDescription"]) ? $Options["AutoDescription"] : FALSE;
+     $RecordAbscissa	= isset($Options["RecordAbscissa"]) ? $Options["RecordAbscissa"] : FALSE;
+     $AbscissaSerie	= isset($Options["AbscissaSerie"]) ? $Options["AbscissaSerie"] : "Abscissa";
+
+     if ( $Formula == "" ) { return(0); }
+
+     $Result = ""; $Abscissa = "";
+     for($i=$MinX; $i<=$MaxX; $i=$i+$XStep)
+      {
+       $Expression = "\$return = '!'.(".str_replace("z",$i,$Formula).");";
+       if ( @eval($Expression) === FALSE ) { $return = VOID; }
+       if ( $return == "!" ) { $return = VOID; } else { $return = $this->right($return,strlen($return)-1); }
+       if ( $return == "NAN" ) { $return = VOID; }
+       if ( $return == "INF" ) { $return = VOID; }
+       if ( $return == "-INF" ) { $return = VOID; }
+
+       $Abscissa[] = $i;
+       $Result[]   = $return;
+      }
+
+     $this->addPoints($Result,$SerieName);
+     if ( $AutoDescription ) { $this->setSerieDescription($SerieName,$Formula); }
+     if ( $RecordAbscissa ) { $this->addPoints($Abscissa,$AbscissaSerie); }
+    }
+
+   function negateValues($Series)
+    {
+     if ( !is_array($Series) ) { $Series = $this->convertToArray($Series); }
+     foreach($Series as $Key => $SerieName)
+      {
+       if (isset($this->Data["Series"][$SerieName]))
+        {
+         $Data = "";
+         foreach($this->Data["Series"][$SerieName]["Data"] as $Key => $Value)
+          { if ( $Value == VOID ) { $Data[] = VOID; } else { $Data[] = -$Value; } }
+         $this->Data["Series"][$SerieName]["Data"] = $Data;
+
+         $this->Data["Series"][$SerieName]["Max"] = max($this->stripVOID($this->Data["Series"][$SerieName]["Data"]));
+         $this->Data["Series"][$SerieName]["Min"] = min($this->stripVOID($this->Data["Series"][$SerieName]["Data"]));
+        }
+      }
+    }
+
+   /* Return the data & configuration of the series */
+   function getData()
+    { return($this->Data); }
+
+   /* Save a palette element */
+   function savePalette($ID,$Color)
+    { $this->Palette[$ID] = $Color; }
+
+   /* Return the palette of the series */
+   function getPalette()
+    { return($this->Palette); }
+
+   /* Called by the scaling algorithm to save the config */
+   function saveAxisConfig($Axis) { $this->Data["Axis"]=$Axis; }
+
+   /* Save the Y Margin if set */
+   function saveYMargin($Value) { $this->Data["YMargin"]=$Value; }
+
+   /* Save extended configuration to the pData object */
+   function saveExtendedData($Tag,$Values) { $this->Data["Extended"][$Tag]=$Values; }
+
+   /* Called by the scaling algorithm to save the orientation of the scale */
+   function saveOrientation($Orientation) { $this->Data["Orientation"]=$Orientation; }
+
+   /* Convert a string to a single elements array */
+   function convertToArray($Value)
+    { $Values = ""; $Values[] = $Value; return($Values); }
+
+   /* Class string wrapper */
+   function __toString()
+    { return("pData object."); }
+
+   function left($value,$NbChar)	{ return substr($value,0,$NbChar); }  
+   function right($value,$NbChar)	{ return substr($value,strlen($value)-$NbChar,$NbChar); }  
+   function mid($value,$Depart,$NbChar)	{ return substr($value,$Depart-1,$NbChar); }  
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pImage.class.php

@@ -0,0 +1,472 @@
+<?php
+ /*
+     pDraw - pChart core class
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ /* The GD extension is mandatory */
+ if (!extension_loaded('gd') && !extension_loaded('gd2'))
+  {
+   echo "GD extension must be loaded. \r\n";
+   exit();
+  }
+
+ /* Image map handling */
+ define("IMAGE_MAP_STORAGE_FILE"	, 680001);
+ define("IMAGE_MAP_STORAGE_SESSION"	, 680002);
+
+ /* Last generated chart layout */
+ define("CHART_LAST_LAYOUT_REGULAR"	, 680011);
+ define("CHART_LAST_LAYOUT_STACKED"	, 680012);
+
+ /* ImageMap string delimiter */
+ define("IMAGE_MAP_DELIMITER"		, chr(1));
+
+ class pImage extends pDraw
+  {
+   /* Image settings, size, quality, .. */
+   var $XSize		= NULL;				// Width of the picture
+   var $YSize		= NULL;				// Height of the picture
+   var $Picture		= NULL;				// GD picture object
+   var $Antialias	= TRUE;				// Turn antialias on or off
+   var $AntialiasQuality  = 0;				// Quality of the antialiasing implementation (0-1)
+   var $Mask		= "";				// Already drawn pixels mask (Filled circle implementation)
+   var $TransparentBackground = FALSE;			// Just to know if we need to flush the alpha channels when rendering
+
+   /* Graph area settings */
+   var $GraphAreaX1	= NULL;				// Graph area X origin
+   var $GraphAreaY1	= NULL;				// Graph area Y origin
+   var $GraphAreaX2	= NULL;				// Graph area bottom right X position
+   var $GraphAreaY2	= NULL;				// Graph area bottom right Y position
+
+   /* Scale settings */
+   var $ScaleMinDivHeight = 20;				// Minimum height for scame divs
+
+   /* Font properties */
+   var $FontName	= "fonts/GeosansLight.ttf";	// Default font file
+   var $FontSize	= 12;				// Default font size
+   var $FontBox		= NULL;				// Return the bounding box of the last written string
+   var $FontColorR	= 0;				// Default color settings
+   var $FontColorG	= 0;				// Default color settings
+   var $FontColorB	= 0;				// Default color settings
+   var $FontColorA	= 100;				// Default transparency
+
+   /* Shadow properties */
+   var $Shadow		= FALSE;			// Turn shadows on or off
+   var $ShadowX		= NULL;				// X Offset of the shadow
+   var $ShadowY		= NULL;				// Y Offset of the shadow
+   var $ShadowR		= NULL;				// R component of the shadow
+   var $ShadowG		= NULL;				// G component of the shadow
+   var $ShadowB		= NULL;				// B component of the shadow
+   var $Shadowa		= NULL;				// Alpha level of the shadow
+
+   /* Image map */
+   var $ImageMap	= NULL;				// Aray containing the image map
+   var $ImageMapIndex	= "pChart";			// Name of the session array
+   var $ImageMapStorageMode = NULL;			// Save the current imagemap storage mode
+   var $ImageMapAutoDelete  = TRUE;			// Automatic deletion of the image map temp files
+
+   /* Data Set */
+   var $DataSet		= NULL;				// Attached dataset
+
+   /* Last generated chart info */
+   var $LastChartLayout	= CHART_LAST_LAYOUT_REGULAR;	// Last layout : regular or stacked
+
+   /* Class constructor */
+   function pImage($XSize,$YSize,$DataSet=NULL,$TransparentBackground=FALSE)
+    {
+     $this->TransparentBackground = $TransparentBackground;
+
+     if ( $DataSet != NULL ) { $this->DataSet = $DataSet; }
+
+     $this->XSize   = $XSize;
+     $this->YSize   = $YSize;
+     $this->Picture = imagecreatetruecolor($XSize,$YSize);
+
+     if ( $this->TransparentBackground )
+      {
+       imagealphablending($this->Picture,FALSE);
+       imagefilledrectangle($this->Picture, 0,0,$XSize, $YSize, imagecolorallocatealpha($this->Picture, 255, 255, 255, 127));
+       imagealphablending($this->Picture,TRUE);
+       imagesavealpha($this->Picture,true); 
+      }
+     else
+      {
+       $C_White = $this->AllocateColor($this->Picture,255,255,255);
+       imagefilledrectangle($this->Picture,0,0,$XSize,$YSize,$C_White);
+      }
+    }
+
+   /* Enable / Disable and set shadow properties */
+   function setShadow($Enabled=TRUE,$Format="")
+    {
+     $X	    = isset($Format["X"]) ? $Format["X"] : 2;
+     $Y	    = isset($Format["Y"]) ? $Format["Y"] : 2;
+     $R	    = isset($Format["R"]) ? $Format["R"] : 0;
+     $G	    = isset($Format["G"]) ? $Format["G"] : 0;
+     $B	    = isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 10;
+
+     $this->Shadow  = $Enabled;
+     $this->ShadowX = $X;
+     $this->ShadowY = $Y;
+     $this->ShadowR = $R;
+     $this->ShadowG = $G;
+     $this->ShadowB = $B;
+     $this->Shadowa = $Alpha;
+    }
+
+   /* Set the graph area position */
+   function setGraphArea($X1,$Y1,$X2,$Y2)
+    {
+     if ( $X2 < $X1 || $X1 == $X2 || $Y2 < $Y1 || $Y1 == $Y2 ) { return(-1); }
+
+     $this->GraphAreaX1 = $X1; $this->DataSet->Data["GraphArea"]["X1"] = $X1;
+     $this->GraphAreaY1 = $Y1; $this->DataSet->Data["GraphArea"]["Y1"] = $Y1;
+     $this->GraphAreaX2 = $X2; $this->DataSet->Data["GraphArea"]["X2"] = $X2;
+     $this->GraphAreaY2 = $Y2; $this->DataSet->Data["GraphArea"]["Y2"] = $Y2;
+    }
+
+   /* Return the width of the picture */
+   function getWidth()
+    { return($this->XSize); }
+
+   /* Return the heigth of the picture */
+   function getHeight()
+    { return($this->YSize); }
+
+   /* Render the picture to a file */
+   function render($FileName)
+    {
+     if ( $this->TransparentBackground ) { imagealphablending($this->Picture,false); imagesavealpha($this->Picture,true); }
+     imagepng($this->Picture,$FileName);
+    }
+
+   /* Render the picture to a web browser stream */
+   function stroke($BrowserExpire=FALSE)
+    {
+     if ( $this->TransparentBackground ) { imagealphablending($this->Picture,false); imagesavealpha($this->Picture,true); }
+
+     if ( $BrowserExpire )
+      {
+       header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
+       header("Cache-Control: no-cache");
+       header("Pragma: no-cache");
+      }
+
+     header('Content-type: image/png');
+     imagepng($this->Picture);
+    }
+
+   /* Automatic output method based on the calling interface */
+   function autoOutput($FileName="output.png")
+    {
+     if (php_sapi_name() == "cli")
+      $this->Render($FileName);
+     else
+      $this->Stroke();
+    }
+
+   /* Return the length between two points */
+   function getLength($X1,$Y1,$X2,$Y2)
+    { return(sqrt(pow(max($X1,$X2)-min($X1,$X2),2)+pow(max($Y1,$Y2)-min($Y1,$Y2),2))); }
+
+   /* Return the orientation of a line */
+   function getAngle($X1,$Y1,$X2,$Y2)
+    {
+     $Opposite = $Y2 - $Y1; $Adjacent = $X2 - $X1;$Angle = rad2deg(atan2($Opposite,$Adjacent));
+     if ($Angle > 0) { return($Angle); } else { return(360-abs($Angle)); }
+    }
+
+   /* Return the surrounding box of text area */
+   function getTextBox_deprecated($X,$Y,$FontName,$FontSize,$Angle,$Text)
+    {
+     $Size    = imagettfbbox($FontSize,$Angle,$FontName,$Text);
+     $Width   = $this->getLength($Size[0],$Size[1],$Size[2],$Size[3])+1;
+     $Height  = $this->getLength($Size[2],$Size[3],$Size[4],$Size[5])+1;
+
+     $RealPos[0]["X"] = $X; $RealPos[0]["Y"] = $Y;
+     $RealPos[1]["X"] = cos((360-$Angle)*PI/180)*$Width + $RealPos[0]["X"]; $RealPos[1]["Y"] = sin((360-$Angle)*PI/180)*$Width + $RealPos[0]["Y"];
+     $RealPos[2]["X"] = cos((270-$Angle)*PI/180)*$Height + $RealPos[1]["X"]; $RealPos[2]["Y"] = sin((270-$Angle)*PI/180)*$Height + $RealPos[1]["Y"];
+     $RealPos[3]["X"] = cos((180-$Angle)*PI/180)*$Width + $RealPos[2]["X"]; $RealPos[3]["Y"] = sin((180-$Angle)*PI/180)*$Width + $RealPos[2]["Y"];
+
+     $RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"] = $RealPos[0]["X"];	$RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"] = $RealPos[0]["Y"];
+     $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"] = $RealPos[1]["X"];	$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"] = $RealPos[1]["Y"];
+
+     return($RealPos);
+    }
+
+   /* Return the surrounding box of text area */
+   function getTextBox($X,$Y,$FontName,$FontSize,$Angle,$Text)
+    {
+     $coords = imagettfbbox($FontSize, 0, $FontName, $Text);
+
+     $a = deg2rad($Angle); $ca = cos($a); $sa = sin($a); $RealPos = array();
+     for($i = 0; $i < 7; $i += 2)
+      {
+       $RealPos[$i/2]["X"] = $X + round($coords[$i] * $ca + $coords[$i+1] * $sa);
+       $RealPos[$i/2]["Y"] = $Y + round($coords[$i+1] * $ca - $coords[$i] * $sa);
+      }
+
+     $RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"]	= $RealPos[0]["X"];	$RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"]	= $RealPos[0]["Y"];
+     $RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"]	= $RealPos[1]["X"];	$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"]	= $RealPos[1]["Y"];
+     $RealPos[TEXT_ALIGN_TOPLEFT]["X"]		= $RealPos[3]["X"];	$RealPos[TEXT_ALIGN_TOPLEFT]["Y"]	= $RealPos[3]["Y"];
+     $RealPos[TEXT_ALIGN_TOPRIGHT]["X"]		= $RealPos[2]["X"];	$RealPos[TEXT_ALIGN_TOPRIGHT]["Y"]	= $RealPos[2]["Y"];
+     $RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["X"]	= ($RealPos[1]["X"]-$RealPos[0]["X"])/2+$RealPos[0]["X"];	$RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["Y"]	= ($RealPos[0]["Y"]-$RealPos[1]["Y"])/2+$RealPos[1]["Y"];
+     $RealPos[TEXT_ALIGN_TOPMIDDLE]["X"]	= ($RealPos[2]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];	$RealPos[TEXT_ALIGN_TOPMIDDLE]["Y"]	= ($RealPos[3]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
+     $RealPos[TEXT_ALIGN_MIDDLELEFT]["X"]	= ($RealPos[0]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];	$RealPos[TEXT_ALIGN_MIDDLELEFT]["Y"]	= ($RealPos[0]["Y"]-$RealPos[3]["Y"])/2+$RealPos[3]["Y"];
+     $RealPos[TEXT_ALIGN_MIDDLERIGHT]["X"]	= ($RealPos[1]["X"]-$RealPos[2]["X"])/2+$RealPos[2]["X"];	$RealPos[TEXT_ALIGN_MIDDLERIGHT]["Y"]	= ($RealPos[1]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
+     $RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["X"]	= ($RealPos[1]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];	$RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["Y"]	= ($RealPos[0]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
+
+     return($RealPos);
+    }
+
+   /* Set current font properties */
+   function setFontProperties($Format="")
+    {
+     $R		= isset($Format["R"]) ? $Format["R"] : -1;
+     $G		= isset($Format["G"]) ? $Format["G"] : -1;
+     $B		= isset($Format["B"]) ? $Format["B"] : -1;
+     $Alpha	= isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+     $FontName	= isset($Format["FontName"]) ? $Format["FontName"] : NULL;
+     $FontSize	= isset($Format["FontSize"]) ? $Format["FontSize"] : NULL;
+
+     if ( $R != -1)       {  $this->FontColorR = $R; }
+     if ( $G != -1)       {  $this->FontColorG = $G; }
+     if ( $B != -1)       {  $this->FontColorB = $B; }
+     if ( $Alpha != NULL) {  $this->FontColorA = $Alpha; }
+
+     if ( $FontName != NULL  )
+      $this->FontName = $FontName;
+ 
+     if ( $FontSize != NULL  )
+      $this->FontSize = $FontSize;
+    }
+
+   /* Returns the 1st decimal values (used to correct AA bugs) */
+   function getFirstDecimal($Value)
+    {
+     $Values = preg_split("/\./",$Value);
+     if ( isset($Values[1]) ) { return(substr($Values[1],0,1)); } else { return(0); }
+    }
+
+   /* Attach a dataset to your pChart Object */
+   function setDataSet(&$DataSet)
+    { $this->DataSet = $DataSet; }
+
+   /* Print attached dataset contents to STDOUT */
+   function printDataSet()
+    { print_r($this->DataSet); }
+
+   /* Initialise the image map methods */
+   function initialiseImageMap($Name="pChart",$StorageMode=IMAGE_MAP_STORAGE_SESSION,$UniqueID="imageMap",$StorageFolder="tmp")
+    {
+     $this->ImageMapIndex 		= $Name;
+     $this->ImageMapStorageMode		= $StorageMode;
+
+     if ($StorageMode == IMAGE_MAP_STORAGE_SESSION)
+      {
+       if(!isset($_SESSION)) { session_start(); }
+       $_SESSION[$this->ImageMapIndex]    = NULL;
+      }
+     elseif($StorageMode == IMAGE_MAP_STORAGE_FILE)
+      {
+       $this->ImageMapFileName 		= $UniqueID;
+       $this->ImageMapStorageFolder	= $StorageFolder;
+
+       if (file_exists($StorageFolder."/".$UniqueID.".map")) { unlink($StorageFolder."/".$UniqueID.".map"); }
+      }
+    }
+
+   /* Add a zone to the image map */
+   function addToImageMap($Type,$Plots,$Color=NULL,$Title=NULL,$Message=NULL,$HTMLEncode=FALSE)
+    {
+     if ( $this->ImageMapStorageMode == NULL ) { $this->initialiseImageMap(); }
+
+     /* Encode the characters in the imagemap in HTML standards */
+     $Title   = str_replace("&#8364;","\u20AC",$Title);
+     $Title   = htmlentities($Title,ENT_QUOTES,"ISO-8859-15");
+     if ( $HTMLEncode )
+      {
+       $Message = htmlentities($Message,ENT_QUOTES,"ISO-8859-15");
+       $Message = str_replace("&lt;","<",$Message);
+       $Message = str_replace("&gt;",">",$Message);
+      }
+
+     if ( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION )
+      {
+       if(!isset($_SESSION)) { $this->initialiseImageMap(); }
+       $_SESSION[$this->ImageMapIndex][] = array($Type,$Plots,$Color,$Title,$Message);
+      }
+     elseif($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE)
+      {
+       $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'a');
+       fwrite($Handle, $Type.IMAGE_MAP_DELIMITER.$Plots.IMAGE_MAP_DELIMITER.$Color.IMAGE_MAP_DELIMITER.$Title.IMAGE_MAP_DELIMITER.$Message."\r\n");
+       fclose($Handle);
+      }
+    }
+
+   /* Remove VOID values from an imagemap custom values array */
+   function removeVOIDFromArray($SerieName, $Values)
+    {
+     if ( !isset($this->DataSet->Data["Series"][$SerieName]) ) { return(-1); }
+
+     $Result = "";
+     foreach($this->DataSet->Data["Series"][$SerieName]["Data"] as $Key => $Value)
+      { if ( $Value != VOID && isset($Values[$Key]) ) { $Result[] = $Values[$Key]; } }
+     return($Result);
+    }
+
+   /* Replace the title of one image map serie */
+   function replaceImageMapTitle($OldTitle, $NewTitle)
+    {
+     if ( $this->ImageMapStorageMode == NULL ) { return(-1); }
+
+     if ( is_array($NewTitle) ) { $NewTitle = $this->removeVOIDFromArray($OldTitle, $NewTitle); }
+ 
+     if ( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION )
+      {
+       if(!isset($_SESSION)) { return(-1); }
+       if ( is_array($NewTitle) )
+        { $ID = 0; foreach($_SESSION[$this->ImageMapIndex] as $Key => $Settings) { if ( $Settings[3] == $OldTitle && isset($NewTitle[$ID])) { $_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle[$ID]; $ID++; } } }
+       else
+        { foreach($_SESSION[$this->ImageMapIndex] as $Key => $Settings) { if ( $Settings[3] == $OldTitle ) { $_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle; } } }
+      }
+     elseif( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE )
+      {
+       $TempArray = "";
+       $Handle    = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", "r");
+       if ($Handle)
+        {
+         while (($Buffer = fgets($Handle, 4096)) !== false)
+          {
+           $Fields      = split(IMAGE_MAP_DELIMITER,str_replace(array(chr(10),chr(13)),"",$Buffer));
+           $TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
+          }
+         fclose($Handle);
+
+         if ( is_array($NewTitle) )
+          { $ID = 0; foreach($TempArray as $Key => $Settings) { if ( $Settings[3] == $OldTitle && isset($NewTitle[$ID]) ) { $TempArray[$Key][3] = $NewTitle[$ID]; $ID++; } } }
+         else
+          { foreach($TempArray as $Key => $Settings) { if ( $Settings[3] == $OldTitle ) { $TempArray[$Key][3] = $NewTitle; } } }
+
+         $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'w');
+         foreach($TempArray as $Key => $Settings)
+          { fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n"); }
+         fclose($Handle);
+        }
+      }
+    }
+
+   /* Replace the values of the image map contents */
+   function replaceImageMapValues($Title, $Values)
+    {
+     if ( $this->ImageMapStorageMode == NULL ) { return(-1); }
+
+     $Values = $this->removeVOIDFromArray($Title, $Values);
+     $ID = 0; 
+     if ( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION )
+      {
+       if(!isset($_SESSION)) { return(-1); }
+       foreach($_SESSION[$this->ImageMapIndex] as $Key => $Settings) { if ( $Settings[3] == $Title ) { if ( isset($Values[$ID]) ) { $_SESSION[$this->ImageMapIndex][$Key][4] = $Values[$ID]; } $ID++; } }
+      }
+     elseif( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE )
+      {
+       $TempArray = "";
+       $Handle    = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", "r");
+       if ($Handle)
+        {
+         while (($Buffer = fgets($Handle, 4096)) !== false)
+          {
+           $Fields      = split(IMAGE_MAP_DELIMITER,str_replace(array(chr(10),chr(13)),"",$Buffer));
+           $TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
+          }
+         fclose($Handle);
+
+         foreach($TempArray as $Key => $Settings) { if ( $Settings[3] == $Title ) { if ( isset($Values[$ID]) ) { $TempArray[$Key][4] = $Values[$ID]; } $ID++; } }
+
+         $Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'w');
+         foreach($TempArray as $Key => $Settings)
+          { fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n"); }
+         fclose($Handle);
+        }
+      }
+    }
+
+   /* Dump the image map */
+   function dumpImageMap($Name="pChart",$StorageMode=IMAGE_MAP_STORAGE_SESSION,$UniqueID="imageMap",$StorageFolder="tmp")
+    {
+     $this->ImageMapIndex 		= $Name;
+     $this->ImageMapStorageMode		= $StorageMode;
+
+     if ( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION )
+      {
+       if(!isset($_SESSION)) { session_start(); }
+       if ( $_SESSION[$Name] != NULL )
+        {
+         foreach($_SESSION[$Name] as $Key => $Params)
+          { echo $Params[0].IMAGE_MAP_DELIMITER.$Params[1].IMAGE_MAP_DELIMITER.$Params[2].IMAGE_MAP_DELIMITER.$Params[3].IMAGE_MAP_DELIMITER.$Params[4]."\r\n"; }
+        }
+      }
+     elseif( $this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE )
+      {
+       if (file_exists($StorageFolder."/".$UniqueID.".map"))
+        {
+         $Handle = @fopen($StorageFolder."/".$UniqueID.".map", "r");
+         if ($Handle) { while (($Buffer = fgets($Handle, 4096)) !== false) { echo $Buffer; } }
+         fclose($Handle);
+
+         if ( $this->ImageMapAutoDelete ) { unlink($StorageFolder."/".$UniqueID.".map"); }
+        }
+      }
+
+     /* When the image map is returned to the client, the script ends */
+     exit();
+    }
+
+   /* Return the HTML converted color from the RGB composite values */
+   function toHTMLColor($R,$G,$B)
+    {
+     $R=intval($R); $G=intval($G); $B=intval($B);
+     $R=dechex($R<0?0:($R>255?255:$R)); $G=dechex($G<0?0:($G>255?255:$G));$B=dechex($B<0?0:($B>255?255:$B));
+     $Color="#".(strlen($R) < 2?'0':'').$R; $Color.=(strlen($G) < 2?'0':'').$G; $Color.= (strlen($B) < 2?'0':'').$B;
+     return($Color);
+    }
+
+   /* Reverse an array of points */
+   function reversePlots($Plots)
+    {
+     $Result = "";
+     for($i=count($Plots)-2;$i>=0;$i=$i-2) { $Result[] = $Plots[$i]; $Result[] = $Plots[$i+1]; }
+     return($Result);
+    }
+
+   /* Mirror Effect */
+   function drawAreaMirror($X,$Y,$Width,$Height,$Format="")
+    {
+     $StartAlpha	= isset($Format["StartAlpha"]) ? $Format["StartAlpha"] : 80;
+     $EndAlpha		= isset($Format["EndAlpha"]) ? $Format["EndAlpha"] : 0;
+
+     $AlphaStep = ($StartAlpha-$EndAlpha)/$Height;
+
+     $Picture = imagecreatetruecolor($this->XSize,$this->YSize);
+     imagecopy($Picture,$this->Picture,0,0,0,0,$this->XSize,$this->YSize);
+     
+     for($i=1;$i<=$Height;$i++)
+      {
+       if ( $Y+($i-1) < $this->YSize && $Y-$i > 0 ) { imagecopymerge($Picture,$this->Picture,$X,$Y+($i-1),$X,$Y-$i,$Width,1,$StartAlpha-$AlphaStep*$i); }
+      }
+
+     imagecopy($this->Picture,$Picture,0,0,0,0,$this->XSize,$this->YSize);
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pIndicator.class.php

@@ -0,0 +1,241 @@
+<?php
+ /*
+     pIndicator - class to draw indicators
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("INDICATOR_CAPTION_DEFAULT"	, 700001);
+ define("INDICATOR_CAPTION_EXTENDED"	, 700002);
+
+ define("INDICATOR_CAPTION_INSIDE"	, 700011);
+ define("INDICATOR_CAPTION_BOTTOM"	, 700012);
+
+ define("INDICATOR_VALUE_BUBBLE"	, 700021);
+ define("INDICATOR_VALUE_LABEL"		, 700022);
+
+ /* pIndicator class definition */
+ class pIndicator
+  {
+   var $pChartObject;
+
+   /* Class creator */
+   function pIndicator($pChartObject)
+    {
+     $this->pChartObject = $pChartObject;
+    }
+
+   /* Draw an indicator */
+   function draw($X,$Y,$Width,$Height,$Format="")
+    {
+     $Values			= isset($Format["Values"]) ? $Format["Values"] : VOID;
+     $IndicatorSections		= isset($Format["IndicatorSections"]) ? $Format["IndicatorSections"] : NULL;
+     $ValueDisplay		= isset($Format["ValueDisplay"]) ? $Format["ValueDisplay"] : INDICATOR_VALUE_BUBBLE;
+     $SectionsMargin		= isset($Format["SectionsMargin"]) ? $Format["SectionsMargin"] : 4;
+     $DrawLeftHead		= isset($Format["DrawLeftHead"]) ? $Format["DrawLeftHead"] : TRUE;
+     $DrawRightHead		= isset($Format["DrawRightHead"]) ? $Format["DrawRightHead"] : TRUE;
+     $HeadSize			= isset($Format["HeadSize"]) ? $Format["HeadSize"] : floor($Height/4);
+     $TextPadding		= isset($Format["TextPadding"]) ? $Format["TextPadding"] : 4;
+     $CaptionLayout		= isset($Format["CaptionLayout"]) ? $Format["CaptionLayout"] : INDICATOR_CAPTION_EXTENDED;
+     $CaptionPosition		= isset($Format["CaptionPosition"]) ? $Format["CaptionPosition"] : INDICATOR_CAPTION_INSIDE;
+     $CaptionColorFactor	= isset($Format["CaptionColorFactor"]) ? $Format["CaptionColorFactor"] : NULL;
+     $CaptionR			= isset($Format["CaptionR"]) ? $Format["CaptionR"] : 255;
+     $CaptionG			= isset($Format["CaptionG"]) ? $Format["CaptionG"] : 255;
+     $CaptionB			= isset($Format["CaptionB"]) ? $Format["CaptionB"] : 255;
+     $CaptionAlpha		= isset($Format["CaptionAlpha"]) ? $Format["CaptionAlpha"] : 100;
+     $SubCaptionColorFactor	= isset($Format["SubCaptionColorFactor"]) ? $Format["SubCaptionColorFactor"] : NULL;
+     $SubCaptionR		= isset($Format["SubCaptionR"]) ? $Format["SubCaptionR"] : 50;
+     $SubCaptionG		= isset($Format["SubCaptionG"]) ? $Format["SubCaptionG"] : 50;
+     $SubCaptionB		= isset($Format["SubCaptionB"]) ? $Format["SubCaptionB"] : 50;
+     $SubCaptionAlpha		= isset($Format["SubCaptionAlpha"]) ? $Format["SubCaptionAlpha"] : 100;
+     $ValueFontName		= isset($Format["ValueFontName"]) ? $Format["ValueFontName"] : $this->pChartObject->FontName;
+     $ValueFontSize		= isset($Format["ValueFontSize"]) ? $Format["ValueFontSize"] : $this->pChartObject->FontSize;
+     $CaptionFontName		= isset($Format["CaptionFontName"]) ? $Format["CaptionFontName"] : $this->pChartObject->FontName;
+     $CaptionFontSize		= isset($Format["CaptionFontSize"]) ? $Format["CaptionFontSize"] : $this->pChartObject->FontSize;
+     $Unit			= isset($Format["Unit"]) ? $Format["Unit"] : "";
+
+     /* Convert the Values to display to an array if needed */
+     if ( !is_array($Values) ) { $Value = $Values; $Values = ""; $Values[] = $Value; }
+
+     /* No section, let's die */
+     if ( $IndicatorSections == NULL ) { return(0); }
+
+     /* Determine indicator visual configuration */
+     $OverallMin = $IndicatorSections[0]["End"]; $OverallMax = $IndicatorSections[0]["Start"];
+     foreach ($IndicatorSections as $Key => $Settings)
+      {
+       if ( $Settings["End"] > $OverallMax )   { $OverallMax = $Settings["End"]; }
+       if ( $Settings["Start"] < $OverallMin ) { $OverallMin = $Settings["Start"]; }
+      }
+     $RealWidth = $Width - (count($IndicatorSections)-1)*$SectionsMargin;
+     $XScale    = $RealWidth / ($OverallMax-$OverallMin);
+
+     $X1 = $X; $ValuesPos = "";
+     foreach ($IndicatorSections as $Key => $Settings)
+      {
+       $Color      = array("R"=>$Settings["R"],"G"=>$Settings["G"],"B"=>$Settings["B"]);
+       $Caption    = $Settings["Caption"];
+       $SubCaption = $Settings["Start"]." - ".$Settings["End"];
+
+       $X2 = $X1 + ($Settings["End"] - $Settings["Start"]) * $XScale;
+
+       if ( $Key == 0 && $DrawLeftHead )
+        {
+         $Poly = ""; $Poly[] = $X1-1; $Poly[] = $Y; $Poly[] = $X1-1; $Poly[] = $Y+$Height; $Poly[] = $X1-1-$HeadSize; $Poly[] = $Y+($Height/2);
+         $this->pChartObject->drawPolygon($Poly,$Color);
+         $this->pChartObject->drawLine($X1-2,$Y,$X1-2-$HeadSize,$Y+($Height/2),$Color);
+         $this->pChartObject->drawLine($X1-2,$Y+$Height,$X1-2-$HeadSize,$Y+($Height/2),$Color);
+        }
+
+       /* Determine the position of the breaks */
+       $Break = "";
+       foreach($Values as $iKey => $Value)
+        {
+         if ( $Value >= $Settings["Start"] && $Value <= $Settings["End"] )
+          {
+           $XBreak  = $X1 + ($Value - $Settings["Start"]) * $XScale;
+           $ValuesPos[$Value] = $XBreak;
+           $Break[] = floor($XBreak);
+          }
+        }
+
+       if ( $ValueDisplay == INDICATOR_VALUE_LABEL )
+        {
+         if ( $Break == "" )
+          $this->pChartObject->drawFilledRectangle($X1,$Y,$X2,$Y+$Height,$Color);
+         else
+          {
+           sort($Break);
+           $Poly = ""; $Poly[] = $X1; $Poly[] = $Y; $LastPointWritten = FALSE;
+           foreach($Break as $iKey => $Value)
+            {
+             if ( $Value-5 >= $X1 )
+              { $Poly[] = $Value-5; $Poly[] = $Y; }
+             elseif ($X1 - ($Value-5) > 0 )
+              {
+               $Offset = $X1 - ($Value-5);
+               $Poly = ""; $Poly[] = $X1; $Poly[] = $Y + $Offset;
+              }
+
+             $Poly[] = $Value;   $Poly[] = $Y+5;
+
+             if ( $Value+5 <= $X2 )
+              { $Poly[] = $Value+5; $Poly[] = $Y; }
+             elseif (($Value+5) > $X2 )
+              {
+               $Offset = ($Value+5) - $X2;
+               $Poly[] = $X2; $Poly[] = $Y + $Offset;
+               $LastPointWritten = TRUE;
+              }
+
+            }
+           if ( !$LastPointWritten ) { $Poly[] = $X2; $Poly[] = $Y; }
+           $Poly[] = $X2; $Poly[] = $Y+$Height;
+           $Poly[] = $X1; $Poly[] = $Y+$Height;
+
+           $this->pChartObject->drawPolygon($Poly,$Color);
+          }
+        }
+       else
+        $this->pChartObject->drawFilledRectangle($X1,$Y,$X2,$Y+$Height,$Color);
+
+       if ( $Key == count($IndicatorSections)-1 && $DrawRightHead )
+        {
+         $Poly = ""; $Poly[] = $X2+1; $Poly[] = $Y; $Poly[] = $X2+1; $Poly[] = $Y+$Height; $Poly[] = $X2+1+$HeadSize; $Poly[] = $Y+($Height/2);
+         $this->pChartObject->drawPolygon($Poly,$Color);
+         $this->pChartObject->drawLine($X2+1,$Y,$X2+1+$HeadSize,$Y+($Height/2),$Color);
+         $this->pChartObject->drawLine($X2+1,$Y+$Height,$X2+1+$HeadSize,$Y+($Height/2),$Color);
+        }
+
+       if ( $CaptionPosition == INDICATOR_CAPTION_INSIDE )
+        {
+         $TxtPos  = $this->pChartObject->getTextBox($X1,$Y+$Height+$TextPadding,$CaptionFontName,$CaptionFontSize,0,$Caption);
+         $YOffset = ($TxtPos[0]["Y"] - $TxtPos[2]["Y"]) + $TextPadding;
+
+         if ( $CaptionLayout == INDICATOR_CAPTION_EXTENDED )
+          {
+           $TxtPos  = $this->pChartObject->getTextBox($X1,$Y+$Height+$TextPadding,$CaptionFontName,$CaptionFontSize,0,$SubCaption);
+           $YOffset = $YOffset + ($TxtPos[0]["Y"] - $TxtPos[2]["Y"]) + $TextPadding*2;
+          }
+
+         $XOffset = $TextPadding;
+        }
+       else
+        { $YOffset = 0; $XOffset = 0; }
+
+       if ( $CaptionColorFactor == NULL )
+        { $CaptionColor    = array("Align"=>TEXT_ALIGN_TOPLEFT,"FontName"=>$CaptionFontName,"FontSize"=>$CaptionFontSize,"R"=>$CaptionR,"G"=>$CaptionG,"B"=>$CaptionB,"Alpha"=>$CaptionAlpha); }
+       else
+        { $CaptionColor    = array("Align"=>TEXT_ALIGN_TOPLEFT,"FontName"=>$CaptionFontName,"FontSize"=>$CaptionFontSize,"R"=>$Settings["R"]+$CaptionColorFactor,"G"=>$Settings["G"]+$CaptionColorFactor,"B"=>$Settings["B"]+$CaptionColorFactor); }
+
+       if ( $SubCaptionColorFactor == NULL )
+        $SubCaptionColor = array("Align"=>TEXT_ALIGN_TOPLEFT,"FontName"=>$CaptionFontName,"FontSize"=>$CaptionFontSize,"R"=>$SubCaptionR,"G"=>$SubCaptionG,"B"=>$SubCaptionB,"Alpha"=>$SubCaptionAlpha);
+       else
+        $SubCaptionColor = array("Align"=>TEXT_ALIGN_TOPLEFT,"FontName"=>$CaptionFontName,"FontSize"=>$CaptionFontSize,"R"=>$Settings["R"]+$SubCaptionColorFactor,"G"=>$Settings["G"]+$SubCaptionColorFactor,"B"=>$Settings["B"]+$SubCaptionColorFactor);
+
+       $RestoreShadow = $this->pChartObject->Shadow;
+       $this->pChartObject->Shadow = FALSE;
+
+       if ( $CaptionLayout == INDICATOR_CAPTION_DEFAULT )
+        $this->pChartObject->drawText($X1,$Y+$Height+$TextPadding,$Caption,$CaptionColor);
+       elseif ( $CaptionLayout == INDICATOR_CAPTION_EXTENDED )
+        {
+         $TxtPos        = $this->pChartObject->getTextBox($X1,$Y+$Height+$TextPadding,$CaptionFontName,$CaptionFontSize,0,$Caption);
+         $CaptionHeight = $TxtPos[0]["Y"] - $TxtPos[2]["Y"];
+
+         $this->pChartObject->drawText($X1+$XOffset,$Y+$Height-$YOffset+$TextPadding,$Caption,$CaptionColor);
+         $this->pChartObject->drawText($X1+$XOffset,$Y+$Height-$YOffset+$CaptionHeight+$TextPadding*2,$SubCaption,$SubCaptionColor);
+        }
+
+       $this->pChartObject->Shadow = $RestoreShadow;
+
+       $X1 = $X2 + $SectionsMargin;
+      }
+
+     $RestoreShadow = $this->pChartObject->Shadow;
+     $this->pChartObject->Shadow = FALSE;
+
+     foreach($Values as $Key => $Value)
+      {
+       if ( $Value >= $OverallMin && $Value <= $OverallMax )
+        {
+         foreach ($IndicatorSections as $Key => $Settings)
+          {
+           if ( $Value >= $Settings["Start"] && $Value <= $Settings["End"] )
+            {
+             $X1 = $ValuesPos[$Value]; //$X + $Key*$SectionsMargin + ($Value - $OverallMin) * $XScale;
+
+             if ( $ValueDisplay == INDICATOR_VALUE_BUBBLE )
+              {
+               $TxtPos = $this->pChartObject->getTextBox($X1,$Y,$ValueFontName,$ValueFontSize,0,$Value.$Unit);
+               $Radius = floor(($TxtPos[1]["X"] - $TxtPos[0]["X"] + $TextPadding*4)/2);
+
+               $this->pChartObject->drawFilledCircle($X1,$Y,$Radius+4,array("R"=>$Settings["R"]+20,"G"=>$Settings["G"]+20,"B"=>$Settings["B"]+20));
+               $this->pChartObject->drawFilledCircle($X1,$Y,$Radius,array("R"=>255,"G"=>255,"B"=>255));
+
+               $TextSettings = array("Align"=>TEXT_ALIGN_MIDDLEMIDDLE,"FontName"=>$ValueFontName,"FontSize"=>$ValueFontSize);
+               $this->pChartObject->drawText($X1-1,$Y-1,$Value.$Unit,$TextSettings);
+              }
+             elseif( $ValueDisplay == INDICATOR_VALUE_LABEL )
+              {
+               $Caption = "";
+               $Caption[] = array("Format"=>array("R"=>$Settings["R"],"G"=>$Settings["G"],"B"=>$Settings["B"],"Alpha"=>100),"Caption"=>$Value.$Unit);
+               $this->pChartObject->drawLabelBox(floor($X1),floor($Y)+2,"Value - ".$Settings["Caption"],$Caption);
+              }
+            }
+           $X1 = $X2 + $SectionsMargin;
+          }
+        }
+      }
+     $this->pChartObject->Shadow = $RestoreShadow;
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pRadar.class.php

@@ -0,0 +1,681 @@
+<?php
+ /*
+     pRadar - class to draw radar charts
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("SEGMENT_HEIGHT_AUTO"		, 690001);
+
+ define("RADAR_LAYOUT_STAR"		, 690011);
+ define("RADAR_LAYOUT_CIRCLE"		, 690012);
+
+ define("RADAR_LABELS_ROTATED"		, 690021);
+ define("RADAR_LABELS_HORIZONTAL"	, 690022);
+
+ /* pRadar class definition */
+ class pRadar
+  {
+   var $pChartObject;
+
+   /* Class creator */
+   function pRadar()
+    { }
+
+   /* Draw a radar chart */
+   function drawRadar($Object,$Values,$Format="")
+    {
+     $this->pChartObject = $Object;
+
+     $FixedMax		= isset($Format["FixedMax"]) ? $Format["FixedMax"] : VOID;
+     $AxisR		= isset($Format["AxisR"]) ? $Format["AxisR"] : 60;
+     $AxisG		= isset($Format["AxisG"]) ? $Format["AxisG"] : 60;
+     $AxisB		= isset($Format["AxisB"]) ? $Format["AxisB"] : 60;
+     $AxisAlpha		= isset($Format["AxisAlpha"]) ? $Format["AxisAlpha"] : 50;
+     $AxisRotation      = isset($Format["AxisRotation"]) ? $Format["AxisRotation"] : 0;
+     $DrawTicks		= isset($Format["DrawTicks"]) ? $Format["DrawTicks"] : TRUE;
+     $TicksLength	= isset($Format["TicksLength"]) ? $Format["TicksLength"] : 2;
+     $DrawAxisValues	= isset($Format["DrawAxisValues"]) ? $Format["DrawAxisValues"] : TRUE;
+     $AxisBoxRounded	= isset($Format["AxisBoxRounded"]) ? $Format["AxisBoxRounded"] : TRUE;
+     $AxisFontName	= isset($Format["AxisFontName"]) ? $Format["AxisFontName"] : $this->pChartObject->FontName;
+     $AxisFontSize	= isset($Format["AxisFontSize"]) ? $Format["AxisFontSize"] : $this->pChartObject->FontSize;
+     $WriteValues	= isset($Format["WriteValues"]) ? $Format["WriteValues"] : FALSE;
+     $WriteValuesInBubble = isset($Format["WriteValuesInBubble"]) ? $Format["WriteValuesInBubble"] : TRUE;
+     $ValueFontName	= isset($Format["ValueFontName"]) ? $Format["ValueFontName"] : $this->pChartObject->FontName;
+     $ValueFontSize	= isset($Format["ValueFontSize"]) ? $Format["ValueFontSize"] : $this->pChartObject->FontSize;
+     $ValuePadding	= isset($Format["ValuePadding"]) ? $Format["ValuePadding"] : 4;
+     $OuterBubbleRadius	= isset($Format["OuterBubbleRadius"]) ? $Format["OuterBubbleRadius"] : 2;
+     $OuterBubbleR	= isset($Format["OuterBubbleR"]) ? $Format["OuterBubbleR"] : VOID;
+     $OuterBubbleG	= isset($Format["OuterBubbleG"]) ? $Format["OuterBubbleG"] : VOID;
+     $OuterBubbleB	= isset($Format["OuterBubbleB"]) ? $Format["OuterBubbleB"] : VOID;
+     $OuterBubbleAlpha	= isset($Format["OuterBubbleAlpha"]) ? $Format["OuterBubbleAlpha"] : 100;
+     $InnerBubbleR	= isset($Format["InnerBubbleR"]) ? $Format["InnerBubbleR"] : 255;
+     $InnerBubbleG	= isset($Format["InnerBubbleG"]) ? $Format["InnerBubbleG"] : 255;
+     $InnerBubbleB	= isset($Format["InnerBubbleB"]) ? $Format["InnerBubbleB"] : 255;
+     $InnerBubbleAlpha	= isset($Format["InnerBubbleAlpha"]) ? $Format["InnerBubbleAlpha"] : 100;
+     $DrawBackground	= isset($Format["DrawBackground"]) ? $Format["DrawBackground"] : TRUE;
+     $BackgroundR	= isset($Format["BackgroundR"]) ? $Format["BackgroundR"] : 255;
+     $BackgroundG	= isset($Format["BackgroundG"]) ? $Format["BackgroundG"] : 255;
+     $BackgroundB	= isset($Format["BackgroundB"]) ? $Format["BackgroundB"] : 255;
+     $BackgroundAlpha	= isset($Format["BackgroundAlpha"]) ? $Format["BackgroundAlpha"] : 50;
+     $BackgroundGradient= isset($Format["BackgroundGradient"]) ? $Format["BackgroundGradient"] : NULL;
+     $Layout		= isset($Format["Layout"]) ? $Format["Layout"] : RADAR_LAYOUT_STAR;
+     $SegmentHeight	= isset($Format["SegmentHeight"]) ? $Format["SegmentHeight"] : SEGMENT_HEIGHT_AUTO;
+     $Segments		= isset($Format["Segments"]) ? $Format["Segments"] : 4;
+     $WriteLabels	= isset($Format["WriteLabels"]) ? $Format["WriteLabels"] : TRUE;
+     $SkipLabels	= isset($Format["SkipLabels"]) ? $Format["SkipLabels"] : 1;
+     $LabelMiddle	= isset($Format["LabelMiddle"]) ? $Format["LabelMiddle"] : FALSE;
+     $LabelsBackground	= isset($Format["LabelsBackground"]) ? $Format["LabelsBackground"] : TRUE;
+     $LabelsBGR		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGR"] : 255;
+     $LabelsBGG		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGG"] : 255;
+     $LabelsBGB		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGB"] : 255;
+     $LabelsBGAlpha	= isset($Format["LabelsBGAlpha"]) ? $Format["LabelsBGAlpha"] : 50;
+     $LabelPos		= isset($Format["LabelPos"]) ? $Format["LabelPos"] : RADAR_LABELS_ROTATED;
+     $LabelPadding	= isset($Format["LabelPadding"]) ? $Format["LabelPadding"] : 4;
+     $DrawPoints	= isset($Format["DrawPoints"]) ? $Format["DrawPoints"] : TRUE;
+     $PointRadius	= isset($Format["PointRadius"]) ? $Format["PointRadius"] : 4;
+     $PointSurrounding	= isset($Format["PointRadius"]) ? $Format["PointRadius"] : -30;
+     $DrawLines		= isset($Format["DrawLines"]) ? $Format["DrawLines"] : TRUE;
+     $LineLoopStart	= isset($Format["LineLoopStart"]) ? $Format["LineLoopStart"] : TRUE;
+     $DrawPoly		= isset($Format["DrawPoly"]) ? $Format["DrawPoly"] : FALSE;
+     $PolyAlpha		= isset($Format["PolyAlpha"]) ? $Format["PolyAlpha"] : 40;
+     $FontSize		= $Object->FontSize;
+     $X1		= $Object->GraphAreaX1;
+     $Y1		= $Object->GraphAreaY1;
+     $X2		= $Object->GraphAreaX2;
+     $Y2		= $Object->GraphAreaY2;
+     $RecordImageMap	= isset($Format["RecordImageMap"]) ? $Format["RecordImageMap"] : FALSE;
+
+     /* Cancel default tick length if ticks not enabled */
+     if ( $DrawTicks == FALSE ) { $TicksLength = 0; }
+
+     /* Data Processing */
+     $Data    = $Values->getData();
+     $Palette = $Values->getPalette();
+
+     /* Catch the number of required axis */
+     $LabelSerie = $Data["Abscissa"];
+     if ( $LabelSerie != "" )
+      { $Points = count($Data["Series"][$LabelSerie]["Data"]); }
+     else
+      {
+       $Points = 0;
+       foreach($Data["Series"] as $SerieName => $DataArray)
+        { if ( count($DataArray["Data"]) > $Points ) { $Points = count($DataArray["Data"]); } }
+      }
+
+     /* Draw the axis */
+     $CenterX = ($X2-$X1)/2 + $X1;
+     $CenterY = ($Y2-$Y1)/2 + $Y1;
+
+     $EdgeHeight = min(($X2-$X1)/2,($Y2-$Y1)/2);
+     if ( $WriteLabels )
+      $EdgeHeight = $EdgeHeight - $FontSize - $LabelPadding - $TicksLength;
+
+     /* Determine the scale if set to automatic */
+     if ( $SegmentHeight == SEGMENT_HEIGHT_AUTO)
+      {
+       if ( $FixedMax != VOID )
+        $Max = $FixedMax;
+       else
+        {
+         $Max = 0;
+         foreach($Data["Series"] as $SerieName => $DataArray)
+          {
+           if ( $SerieName != $LabelSerie )
+            {
+             if ( max($DataArray["Data"]) > $Max ) { $Max = max($DataArray["Data"]); }
+            }
+          }
+        }
+       $MaxSegments = $EdgeHeight/20;
+       $Scale = $Object->computeScale(0,$Max,$MaxSegments,array(1,2,5));
+
+       $Segments      = $Scale["Rows"];
+       $SegmentHeight = $Scale["RowHeight"];
+      }
+
+     if ( $LabelMiddle && $SkipLabels == 1 )
+      { $Axisoffset = (360/$Points)/2; }
+     elseif ( $LabelMiddle && $SkipLabels != 1 )
+      { $Axisoffset = (360/($Points/$SkipLabels))/2; }
+     elseif ( !$LabelMiddle )
+      { $Axisoffset = 0; }
+
+     /* Background processing */
+     if ( $DrawBackground )
+      {
+       $RestoreShadow = $Object->Shadow;
+       $Object->Shadow = FALSE;
+
+       if ($BackgroundGradient == NULL)
+        {
+         if ( $Layout == RADAR_LAYOUT_STAR )
+          {
+           $Color      = array("R"=>$BackgroundR,"G"=>$BackgroundG,"B"=>$BackgroundB,"Alpha"=>$BackgroundAlpha);
+           $PointArray = "";
+           for($i=0;$i<=360;$i=$i+(360/$Points))
+            {
+             $PointArray[] = cos(deg2rad($i+$AxisRotation)) * $EdgeHeight + $CenterX;
+             $PointArray[] = sin(deg2rad($i+$AxisRotation)) * $EdgeHeight + $CenterY;
+            }
+           $Object->drawPolygon($PointArray,$Color);
+          }
+         elseif ( $Layout == RADAR_LAYOUT_CIRCLE )
+          {
+           $Color = array("R"=>$BackgroundR,"G"=>$BackgroundG,"B"=>$BackgroundB,"Alpha"=>$BackgroundAlpha);
+           $Object->drawFilledCircle($CenterX,$CenterY,$EdgeHeight,$Color);
+          }
+        }
+       else
+        {
+         $GradientROffset	= ($BackgroundGradient["EndR"] - $BackgroundGradient["StartR"]) / $Segments;
+         $GradientGOffset	= ($BackgroundGradient["EndG"] - $BackgroundGradient["StartG"]) / $Segments;
+         $GradientBOffset	= ($BackgroundGradient["EndB"] - $BackgroundGradient["StartB"]) / $Segments;
+         $GradientAlphaOffset	= ($BackgroundGradient["EndAlpha"] - $BackgroundGradient["StartAlpha"]) / $Segments;
+
+         if ( $Layout == RADAR_LAYOUT_STAR )
+          {
+           for($j=$Segments;$j>=1;$j--)
+            {
+             $Color      = array("R"=>$BackgroundGradient["StartR"]+$GradientROffset*$j,"G"=>$BackgroundGradient["StartG"]+$GradientGOffset*$j,"B"=>$BackgroundGradient["StartB"]+$GradientBOffset*$j,"Alpha"=>$BackgroundGradient["StartAlpha"]+$GradientAlphaOffset*$j);
+             $PointArray = "";
+
+             for($i=0;$i<=360;$i=$i+(360/$Points))
+              {
+               $PointArray[] = cos(deg2rad($i+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+               $PointArray[] = sin(deg2rad($i+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+              }
+             $Object->drawPolygon($PointArray,$Color);
+            }
+          }
+         elseif ( $Layout == RADAR_LAYOUT_CIRCLE )
+          {
+           for($j=$Segments;$j>=1;$j--)
+            {
+             $Color = array("R"=>$BackgroundGradient["StartR"]+$GradientROffset*$j,"G"=>$BackgroundGradient["StartG"]+$GradientGOffset*$j,"B"=>$BackgroundGradient["StartB"]+$GradientBOffset*$j,"Alpha"=>$BackgroundGradient["StartAlpha"]+$GradientAlphaOffset*$j);
+             $Object->drawFilledCircle($CenterX,$CenterY,($EdgeHeight/$Segments)*$j,$Color);
+            }
+          }
+        }
+       $Object->Shadow = $RestoreShadow;
+      }
+
+     /* Axis to axis lines */
+     $Color = array("R"=>$AxisR,"G"=>$AxisG,"B"=>$AxisB,"Alpha"=>$AxisAlpha);
+     $ColorDotted = array("R"=>$AxisR,"G"=>$AxisG,"B"=>$AxisB,"Alpha"=>$AxisAlpha*.8, "Ticks"=>2);
+     if ( $Layout == RADAR_LAYOUT_STAR )
+      {
+       for($j=1;$j<=$Segments;$j++)
+        {
+         for($i=0;$i<360;$i=$i+(360/$Points))
+          {
+           $EdgeX1 = cos(deg2rad($i+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+           $EdgeY1 = sin(deg2rad($i+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+           $EdgeX2 = cos(deg2rad($i+$AxisRotation+(360/$Points))) * ($EdgeHeight/$Segments)*$j + $CenterX;
+           $EdgeY2 = sin(deg2rad($i+$AxisRotation+(360/$Points))) * ($EdgeHeight/$Segments)*$j + $CenterY;
+
+           $Object->drawLine($EdgeX1,$EdgeY1,$EdgeX2,$EdgeY2,$Color);
+          }
+        }
+      }
+     elseif ( $Layout == RADAR_LAYOUT_CIRCLE )
+      {
+       for($j=1;$j<=$Segments;$j++)
+        {
+         $Radius = ($EdgeHeight/$Segments)*$j;
+         $Object->drawCircle($CenterX,$CenterY,$Radius,$Radius,$Color);
+        }
+      }
+
+     if ( $DrawAxisValues )
+      {
+       if ( $LabelsBackground )
+        $Options = array("DrawBox"=>TRUE, "Align"=>TEXT_ALIGN_MIDDLEMIDDLE,"BoxR"=>$LabelsBGR,"BoxG"=>$LabelsBGG,"BoxB"=>$LabelsBGB,"BoxAlpha"=>$LabelsBGAlpha);
+       else
+        $Options = array("Align"=>TEXT_ALIGN_MIDDLEMIDDLE);
+
+       if ( $AxisBoxRounded ) { $Options["BoxRounded"] = TRUE; }
+
+       $Options["FontName"] = $AxisFontName;
+       $Options["FontSize"] = $AxisFontSize;
+
+       $Angle  = 360 / ($Points*2);
+       for($j=1;$j<=$Segments;$j++)
+        {
+         $Label  = $j * $SegmentHeight;
+
+         if ( $Layout == RADAR_LAYOUT_CIRCLE )
+          {
+           $EdgeX1 = cos(deg2rad($Angle+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+           $EdgeY1 = sin(deg2rad($Angle+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+          }
+         elseif ( $Layout == RADAR_LAYOUT_STAR )
+          {
+           $EdgeX1 = cos(deg2rad($AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+           $EdgeY1 = sin(deg2rad($AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+           $EdgeX2 = cos(deg2rad((360 / $Points) + $AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+           $EdgeY2 = sin(deg2rad((360 / $Points) + $AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+
+           $EdgeX1 = ($EdgeX2 - $EdgeX1)/2 + $EdgeX1;
+           $EdgeY1 = ($EdgeY2 - $EdgeY1)/2 + $EdgeY1;
+          }
+
+         $Object->drawText($EdgeX1,$EdgeY1,$Label,$Options);
+        }
+      }
+
+     /* Axis lines */
+     $ID = 0;
+     for($i=0;$i<360;$i=$i+(360/$Points))
+      {
+       $EdgeX = cos(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$TicksLength) + $CenterX;
+       $EdgeY = sin(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$TicksLength) + $CenterY;
+
+       if ($ID % $SkipLabels == 0)
+        { $Object->drawLine($CenterX,$CenterY,$EdgeX,$EdgeY,$Color); }
+       else
+        { $Object->drawLine($CenterX,$CenterY,$EdgeX,$EdgeY,$ColorDotted); }
+
+       if ( $WriteLabels )
+        {
+         $LabelX = cos(deg2rad($i+$AxisRotation+$Axisoffset)) * ($EdgeHeight+$LabelPadding+$TicksLength) + $CenterX;
+         $LabelY = sin(deg2rad($i+$AxisRotation+$Axisoffset)) * ($EdgeHeight+$LabelPadding+$TicksLength) + $CenterY;
+
+         if ( $LabelSerie != "" )
+          { $Label = isset($Data["Series"][$LabelSerie]["Data"][$ID]) ? $Data["Series"][$LabelSerie]["Data"][$ID] : ""; }
+         else
+          $Label = $ID;
+
+         if ($ID % $SkipLabels == 0)
+          {
+           if ( $LabelPos == RADAR_LABELS_ROTATED )
+            $Object->drawText($LabelX,$LabelY,$Label,array("Angle"=>(360-($i+$AxisRotation+$Axisoffset))-90,"Align"=>TEXT_ALIGN_BOTTOMMIDDLE));
+           else
+            {
+             if ( (floor($LabelX) == floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); }
+             if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMLEFT)); }
+             if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) == floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_MIDDLELEFT)); }
+             if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPLEFT)); }
+             if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMRIGHT)); }
+             if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) == floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_MIDDLERIGHT)); }
+             if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPRIGHT)); }
+             if ( (floor($LabelX) == floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPMIDDLE)); }
+            }
+          }
+        }
+       $ID++;
+      }
+
+     /* Compute the plots position */
+     $ID = 0; $Plot = "";
+     foreach($Data["Series"] as $SerieName => $DataS)
+      {
+       if ( $SerieName != $LabelSerie )
+        {
+         $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+         foreach($DataS["Data"] as $Key => $Value)
+          {
+           $Angle  = (360/$Points) * $Key;
+           $Length = ($EdgeHeight/($Segments*$SegmentHeight))*$Value;
+
+           $X = cos(deg2rad($Angle+$AxisRotation)) * $Length  + $CenterX;
+           $Y = sin(deg2rad($Angle+$AxisRotation)) * $Length  + $CenterY;
+
+           $Plot[$ID][] = array($X,$Y,$Value);
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("CIRCLE",floor($X).",".floor($Y).",".floor($PointRadius),$this->pChartObject->toHTMLColor($Palette[$ID]["R"],$Palette[$ID]["G"],$Palette[$ID]["B"]),$DataS["Description"],$Data["Series"][$LabelSerie]["Data"][$Key]." = ".$Value); }
+          }
+         $ID++;
+        }
+      }
+
+     /* Draw all that stuff! */
+     foreach($Plot as $ID => $Points)
+      {
+       $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+
+       /* Draw the polygons */
+       if ( $DrawPoly )
+        {
+         if ($PolyAlpha != NULL)
+          $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$PolyAlpha,"Surrounding"=>$PointSurrounding);
+
+         $PointsArray = "";
+         for($i=0; $i<count($Points);$i++) 
+          { $PointsArray[] = $Points[$i][0]; $PointsArray[] = $Points[$i][1]; }
+         $Object->drawPolygon($PointsArray,$Color);
+        }
+
+       $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+
+       /* Bubble and labels settings */
+       $TextSettings = array("Align"=>TEXT_ALIGN_MIDDLEMIDDLE,"FontName"=>$ValueFontName,"FontSize"=>$ValueFontSize,"R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"]);
+       $InnerColor = array("R"=>$InnerBubbleR,"G"=>$InnerBubbleG,"B"=>$InnerBubbleB,"Alpha"=>$InnerBubbleAlpha);
+       if ( $OuterBubbleR != VOID )
+        $OuterColor = array("R"=>$OuterBubbleR,"G"=>$OuterBubbleG,"B"=>$OuterBubbleB,"Alpha"=>$OuterBubbleAlpha);
+       else
+        $OuterColor = array("R"=>$Palette[$ID]["R"]+20,"G"=>$Palette[$ID]["G"]+20,"B"=>$Palette[$ID]["B"]+20,"Alpha"=>$Palette[$ID]["Alpha"]);
+
+       /* Loop to the starting points if asked */
+       if ( $LineLoopStart && $DrawLines )
+        $Object->drawLine($Points[count($Points)-1][0],$Points[count($Points)-1][1],$Points[0][0],$Points[0][1],$Color);
+
+       /* Draw the lines & points */
+       for($i=0; $i<count($Points);$i++) 
+        {
+         if ( $DrawLines && $i < count($Points)-1)
+          $Object->drawLine($Points[$i][0],$Points[$i][1],$Points[$i+1][0],$Points[$i+1][1],$Color);
+
+         if ( $DrawPoints )
+          $Object->drawFilledCircle($Points[$i][0],$Points[$i][1],$PointRadius,$Color);
+
+         if ( $WriteValuesInBubble && $WriteValues )
+          {
+           $TxtPos = $this->pChartObject->getTextBox($Points[$i][0],$Points[$i][1],$ValueFontName,$ValueFontSize,0,$Points[$i][2]);
+           $Radius = floor(($TxtPos[1]["X"] - $TxtPos[0]["X"] + $ValuePadding*2)/2);
+
+           $this->pChartObject->drawFilledCircle($Points[$i][0],$Points[$i][1],$Radius+$OuterBubbleRadius,$OuterColor);
+           $this->pChartObject->drawFilledCircle($Points[$i][0],$Points[$i][1],$Radius,$InnerColor);
+          }
+
+         if ( $WriteValues )
+          $this->pChartObject->drawText($Points[$i][0]-1,$Points[$i][1]-1,$Points[$i][2],$TextSettings);
+        }
+      }
+    }
+
+
+
+   /* Draw a radar chart */
+   function drawPolar($Object,$Values,$Format="")
+    {
+     $this->pChartObject = $Object;
+
+     $FixedMax		= isset($Format["FixedMax"]) ? $Format["FixedMax"] : VOID;
+     $AxisR		= isset($Format["AxisR"]) ? $Format["AxisR"] : 60;
+     $AxisG		= isset($Format["AxisG"]) ? $Format["AxisG"] : 60;
+     $AxisB		= isset($Format["AxisB"]) ? $Format["AxisB"] : 60;
+     $AxisAlpha		= isset($Format["AxisAlpha"]) ? $Format["AxisAlpha"] : 50;
+     $AxisRotation      = isset($Format["AxisRotation"]) ? $Format["AxisRotation"] : -90;
+     $DrawTicks		= isset($Format["DrawTicks"]) ? $Format["DrawTicks"] : TRUE;
+     $TicksLength	= isset($Format["TicksLength"]) ? $Format["TicksLength"] : 2;
+     $DrawAxisValues	= isset($Format["DrawAxisValues"]) ? $Format["DrawAxisValues"] : TRUE;
+     $AxisBoxRounded	= isset($Format["AxisBoxRounded"]) ? $Format["AxisBoxRounded"] : TRUE;
+     $AxisFontName	= isset($Format["FontName"]) ? $Format["FontName"] : $this->pChartObject->FontName;
+     $AxisFontSize	= isset($Format["FontSize"]) ? $Format["FontSize"] : $this->pChartObject->FontSize;
+     $WriteValues	= isset($Format["WriteValues"]) ? $Format["WriteValues"] : FALSE;
+     $WriteValuesInBubble = isset($Format["WriteValuesInBubble"]) ? $Format["WriteValuesInBubble"] : TRUE;
+     $ValueFontName	= isset($Format["ValueFontName"]) ? $Format["ValueFontName"] : $this->pChartObject->FontName;
+     $ValueFontSize	= isset($Format["ValueFontSize"]) ? $Format["ValueFontSize"] : $this->pChartObject->FontSize;
+     $ValuePadding	= isset($Format["ValuePadding"]) ? $Format["ValuePadding"] : 4;
+     $OuterBubbleRadius	= isset($Format["OuterBubbleRadius"]) ? $Format["OuterBubbleRadius"] : 2;
+     $OuterBubbleR	= isset($Format["OuterBubbleR"]) ? $Format["OuterBubbleR"] : VOID;
+     $OuterBubbleG	= isset($Format["OuterBubbleG"]) ? $Format["OuterBubbleG"] : VOID;
+     $OuterBubbleB	= isset($Format["OuterBubbleB"]) ? $Format["OuterBubbleB"] : VOID;
+     $OuterBubbleAlpha	= isset($Format["OuterBubbleAlpha"]) ? $Format["OuterBubbleAlpha"] : 100;
+     $InnerBubbleR	= isset($Format["InnerBubbleR"]) ? $Format["InnerBubbleR"] : 255;
+     $InnerBubbleG	= isset($Format["InnerBubbleG"]) ? $Format["InnerBubbleG"] : 255;
+     $InnerBubbleB	= isset($Format["InnerBubbleB"]) ? $Format["InnerBubbleB"] : 255;
+     $InnerBubbleAlpha	= isset($Format["InnerBubbleAlpha"]) ? $Format["InnerBubbleAlpha"] : 100;
+     $DrawBackground	= isset($Format["DrawBackground"]) ? $Format["DrawBackground"] : TRUE;
+     $BackgroundR	= isset($Format["BackgroundR"]) ? $Format["BackgroundR"] : 255;
+     $BackgroundG	= isset($Format["BackgroundG"]) ? $Format["BackgroundG"] : 255;
+     $BackgroundB	= isset($Format["BackgroundB"]) ? $Format["BackgroundB"] : 255;
+     $BackgroundAlpha	= isset($Format["BackgroundAlpha"]) ? $Format["BackgroundAlpha"] : 50;
+     $BackgroundGradient= isset($Format["BackgroundGradient"]) ? $Format["BackgroundGradient"] : NULL;
+     $AxisSteps		= isset($Format["AxisSteps"]) ? $Format["AxisSteps"] : 20;
+     $SegmentHeight	= isset($Format["SegmentHeight"]) ? $Format["SegmentHeight"] : SEGMENT_HEIGHT_AUTO;
+     $Segments		= isset($Format["Segments"]) ? $Format["Segments"] : 4;
+     $WriteLabels	= isset($Format["WriteLabels"]) ? $Format["WriteLabels"] : TRUE;
+     $LabelsBackground	= isset($Format["LabelsBackground"]) ? $Format["LabelsBackground"] : TRUE;
+     $LabelsBGR		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGR"] : 255;
+     $LabelsBGG		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGG"] : 255;
+     $LabelsBGB		= isset($Format["LabelsBGR"]) ? $Format["LabelsBGB"] : 255;
+     $LabelsBGAlpha	= isset($Format["LabelsBGAlpha"]) ? $Format["LabelsBGAlpha"] : 50;
+     $LabelPos		= isset($Format["LabelPos"]) ? $Format["LabelPos"] : RADAR_LABELS_ROTATED;
+     $LabelPadding	= isset($Format["LabelPadding"]) ? $Format["LabelPadding"] : 4;
+     $DrawPoints	= isset($Format["DrawPoints"]) ? $Format["DrawPoints"] : TRUE;
+     $PointRadius	= isset($Format["PointRadius"]) ? $Format["PointRadius"] : 4;
+     $PointSurrounding	= isset($Format["PointRadius"]) ? $Format["PointRadius"] : -30;
+     $DrawLines		= isset($Format["DrawLines"]) ? $Format["DrawLines"] : TRUE;
+     $LineLoopStart	= isset($Format["LineLoopStart"]) ? $Format["LineLoopStart"] : FALSE;
+     $DrawPoly		= isset($Format["DrawPoly"]) ? $Format["DrawPoly"] : FALSE;
+     $PolyAlpha		= isset($Format["PolyAlpha"]) ? $Format["PolyAlpha"] : NULL;
+     $FontSize		= $Object->FontSize;
+     $X1		= $Object->GraphAreaX1;
+     $Y1		= $Object->GraphAreaY1;
+     $X2		= $Object->GraphAreaX2;
+     $Y2		= $Object->GraphAreaY2;
+     $RecordImageMap	= isset($Format["RecordImageMap"]) ? $Format["RecordImageMap"] : FALSE;
+
+     if ( $AxisBoxRounded ) { $DrawAxisValues = TRUE; }
+
+     /* Cancel default tick length if ticks not enabled */
+     if ( $DrawTicks == FALSE ) { $TicksLength = 0; }
+
+     /* Data Processing */
+     $Data    = $Values->getData();
+     $Palette = $Values->getPalette();
+
+     /* Catch the number of required axis */
+     $LabelSerie = $Data["Abscissa"];
+     if ( $LabelSerie != "" )
+      { $Points = count($Data["Series"][$LabelSerie]["Data"]); }
+     else
+      {
+       $Points = 0;
+       foreach($Data["Series"] as $SerieName => $DataArray)
+        { if ( count($DataArray["Data"]) > $Points ) { $Points = count($DataArray["Data"]); } }
+      }
+
+     /* Draw the axis */
+     $CenterX = ($X2-$X1)/2 + $X1;
+     $CenterY = ($Y2-$Y1)/2 + $Y1;
+
+     $EdgeHeight = min(($X2-$X1)/2,($Y2-$Y1)/2);
+     if ( $WriteLabels )
+      $EdgeHeight = $EdgeHeight - $FontSize - $LabelPadding - $TicksLength;
+
+     /* Determine the scale if set to automatic */
+     if ( $SegmentHeight == SEGMENT_HEIGHT_AUTO)
+      {
+       if ( $FixedMax != VOID )
+        $Max = $FixedMax;
+       else
+        {
+         $Max = 0;
+         foreach($Data["Series"] as $SerieName => $DataArray)
+          {
+           if ( $SerieName != $LabelSerie )
+            {
+             if ( max($DataArray["Data"]) > $Max ) { $Max = max($DataArray["Data"]); }
+            }
+          }
+         }
+       $MaxSegments = $EdgeHeight/20;
+       $Scale = $Object->computeScale(0,$Max,$MaxSegments,array(1,2,5));
+
+       $Segments      = $Scale["Rows"];
+       $SegmentHeight = $Scale["RowHeight"];
+      }
+
+
+     /* Background processing */
+     if ( $DrawBackground )
+      {
+       $RestoreShadow = $Object->Shadow;
+       $Object->Shadow = FALSE;
+
+       if ($BackgroundGradient == NULL)
+        {
+         $Color = array("R"=>$BackgroundR,"G"=>$BackgroundG,"B"=>$BackgroundB,"Alpha"=>$BackgroundAlpha);
+         $Object->drawFilledCircle($CenterX,$CenterY,$EdgeHeight,$Color);
+        }
+       else
+        {
+         $GradientROffset	= ($BackgroundGradient["EndR"] - $BackgroundGradient["StartR"]) / $Segments;
+         $GradientGOffset	= ($BackgroundGradient["EndG"] - $BackgroundGradient["StartG"]) / $Segments;
+         $GradientBOffset	= ($BackgroundGradient["EndB"] - $BackgroundGradient["StartB"]) / $Segments;
+         $GradientAlphaOffset	= ($BackgroundGradient["EndAlpha"] - $BackgroundGradient["StartAlpha"]) / $Segments;
+
+         for($j=$Segments;$j>=1;$j--)
+          {
+           $Color      = array("R"=>$BackgroundGradient["StartR"]+$GradientROffset*$j,"G"=>$BackgroundGradient["StartG"]+$GradientGOffset*$j,"B"=>$BackgroundGradient["StartB"]+$GradientBOffset*$j,"Alpha"=>$BackgroundGradient["StartAlpha"]+$GradientAlphaOffset*$j);
+           $Object->drawFilledCircle($CenterX,$CenterY,($EdgeHeight/$Segments)*$j,$Color);
+          }
+        }
+       $Object->Shadow = $RestoreShadow;
+      }
+
+     /* Axis to axis lines */
+     $Color = array("R"=>$AxisR,"G"=>$AxisG,"B"=>$AxisB,"Alpha"=>$AxisAlpha);
+     for($j=1;$j<=$Segments;$j++)
+      {
+       $Radius = ($EdgeHeight/$Segments)*$j;
+       $Object->drawCircle($CenterX,$CenterY,$Radius,$Radius,$Color);
+      }
+
+     if ( $DrawAxisValues )
+      {
+       if ( $LabelsBackground )
+        $Options = array("DrawBox"=>TRUE, "Align"=>TEXT_ALIGN_MIDDLEMIDDLE,"BoxR"=>$LabelsBGR,"BoxG"=>$LabelsBGG,"BoxB"=>$LabelsBGB,"BoxAlpha"=>$LabelsBGAlpha);
+       else
+        $Options = array("Align"=>TEXT_ALIGN_MIDDLEMIDDLE);
+
+       if ( $AxisBoxRounded ) { $Options["BoxRounded"] = TRUE; }
+
+       $Options["FontName"] = $AxisFontName;
+       $Options["FontSize"] = $AxisFontSize;
+
+       $Angle  = 360 / ($Points*2);
+       for($j=1;$j<=$Segments;$j++)
+        {
+         $EdgeX1 = cos(deg2rad($Angle+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterX;
+         $EdgeY1 = sin(deg2rad($Angle+$AxisRotation)) * ($EdgeHeight/$Segments)*$j + $CenterY;
+         $Label  = $j*$SegmentHeight;
+
+         $Object->drawText($EdgeX1,$EdgeY1,$Label,$Options);
+        }
+      }
+
+     /* Axis lines */
+     $ID = 0;
+     for($i=0;$i<=359;$i=$i+$AxisSteps)
+      {
+       $EdgeX = cos(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$TicksLength) + $CenterX;
+       $EdgeY = sin(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$TicksLength) + $CenterY;
+
+       $Object->drawLine($CenterX,$CenterY,$EdgeX,$EdgeY,$Color);
+
+       if ( $WriteLabels )
+        {
+         $LabelX = cos(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$LabelPadding+$TicksLength) + $CenterX;
+         $LabelY = sin(deg2rad($i+$AxisRotation)) * ($EdgeHeight+$LabelPadding+$TicksLength) + $CenterY;
+         $Label = $i."°";
+
+         if ( $LabelPos == RADAR_LABELS_ROTATED )
+          $Object->drawText($LabelX,$LabelY,$Label,array("Angle"=>(360-$i),"Align"=>TEXT_ALIGN_BOTTOMMIDDLE));
+         else
+          {
+           if ( (floor($LabelX) == floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); }
+           if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMLEFT)); }
+           if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) == floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_MIDDLELEFT)); }
+           if ( (floor($LabelX) >  floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPLEFT)); }
+           if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) <  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_BOTTOMRIGHT)); }
+           if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) == floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_MIDDLERIGHT)); }
+           if ( (floor($LabelX) <  floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPRIGHT)); }
+           if ( (floor($LabelX) == floor($CenterX)) && (floor($LabelY) >  floor($CenterY)) )	{ $Object->drawText($LabelX,$LabelY,$Label,array("Align"=>TEXT_ALIGN_TOPMIDDLE)); }
+          }
+        }
+       $ID++;
+      }
+
+     /* Compute the plots position */
+     $ID = 0; $Plot = "";
+     foreach($Data["Series"] as $SerieName => $DataSet)
+      {
+       if ( $SerieName != $LabelSerie )
+        {
+         $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+         foreach($DataSet["Data"] as $Key => $Value)
+          {
+           $Angle  = $Data["Series"][$LabelSerie]["Data"][$Key];
+           $Length = ($EdgeHeight/($Segments*$SegmentHeight))*$Value;
+
+           $X = cos(deg2rad($Angle+$AxisRotation)) * $Length  + $CenterX;
+           $Y = sin(deg2rad($Angle+$AxisRotation)) * $Length  + $CenterY;
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("CIRCLE",floor($X).",".floor($Y).",".floor($PointRadius),$this->pChartObject->toHTMLColor($Palette[$ID]["R"],$Palette[$ID]["G"],$Palette[$ID]["B"]),$DataSet["Description"],$Data["Series"][$LabelSerie]["Data"][$Key]."&deg = ".$Value); }
+
+           $Plot[$ID][] = array($X,$Y,$Value);
+          }
+         $ID++;
+        }
+      }
+
+     /* Draw all that stuff! */
+     foreach($Plot as $ID => $Points)
+      {
+       $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+
+       /* Draw the polygons */
+       if ( $DrawPoly )
+        {
+         if ($PolyAlpha != NULL)
+          $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$PolyAlpha,"Surrounding"=>$PointSurrounding);
+
+         $PointsArray = "";
+         for($i=0; $i<count($Points);$i++) 
+          { $PointsArray[] = $Points[$i][0]; $PointsArray[] = $Points[$i][1]; }
+
+         $Object->drawPolygon($PointsArray,$Color);
+        }
+
+       $Color = array("R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"],"Alpha"=>$Palette[$ID]["Alpha"],"Surrounding"=>$PointSurrounding);
+
+       /* Bubble and labels settings */
+       $TextSettings = array("Align"=>TEXT_ALIGN_MIDDLEMIDDLE,"FontName"=>$ValueFontName,"FontSize"=>$ValueFontSize,"R"=>$Palette[$ID]["R"],"G"=>$Palette[$ID]["G"],"B"=>$Palette[$ID]["B"]);
+       $InnerColor = array("R"=>$InnerBubbleR,"G"=>$InnerBubbleG,"B"=>$InnerBubbleB,"Alpha"=>$InnerBubbleAlpha);
+       if ( $OuterBubbleR != VOID )
+        $OuterColor = array("R"=>$OuterBubbleR,"G"=>$OuterBubbleG,"B"=>$OuterBubbleB,"Alpha"=>$OuterBubbleAlpha);
+       else
+        $OuterColor = array("R"=>$Palette[$ID]["R"]+20,"G"=>$Palette[$ID]["G"]+20,"B"=>$Palette[$ID]["B"]+20,"Alpha"=>$Palette[$ID]["Alpha"]);
+
+       /* Loop to the starting points if asked */
+       if ( $LineLoopStart && $DrawLines )
+        $Object->drawLine($Points[count($Points)-1][0],$Points[count($Points)-1][1],$Points[0][0],$Points[0][1],$Color);
+       
+       /* Draw the lines & points */
+       for($i=0; $i<count($Points);$i++) 
+        {
+         if ( $DrawLines && $i < count($Points)-1)
+          $Object->drawLine($Points[$i][0],$Points[$i][1],$Points[$i+1][0],$Points[$i+1][1],$Color);
+
+         if ( $DrawPoints )
+          $Object->drawFilledCircle($Points[$i][0],$Points[$i][1],$PointRadius,$Color);
+
+         if ( $WriteValuesInBubble && $WriteValues )
+          {
+           $TxtPos = $this->pChartObject->getTextBox($Points[$i][0],$Points[$i][1],$ValueFontName,$ValueFontSize,0,$Points[$i][2]);
+           $Radius = floor(($TxtPos[1]["X"] - $TxtPos[0]["X"] + $ValuePadding*2)/2);
+
+           $this->pChartObject->drawFilledCircle($Points[$i][0],$Points[$i][1],$Radius+$OuterBubbleRadius,$OuterColor);
+           $this->pChartObject->drawFilledCircle($Points[$i][0],$Points[$i][1],$Radius,$InnerColor);
+          }
+
+         if ( $WriteValues )
+          $this->pChartObject->drawText($Points[$i][0]-1,$Points[$i][1]-1,$Points[$i][2],$TextSettings);
+        }
+      }
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pSplit.class.php

@@ -0,0 +1,131 @@
+<?php
+ /*
+     pSplit - class to draw spline splitted charts
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("TEXT_POS_TOP"		, 690001);
+ define("TEXT_POS_RIGHT"	, 690002);
+
+ /* pSplit class definition */
+ class pSplit
+  {
+   var $pChartObject;
+
+   /* Class creator */
+   function pSplit()
+    { }
+
+   /* Create the encoded string */
+   function drawSplitPath($Object,$Values,$Format="")
+    {
+     $this->pChartObject = $Object;
+
+     $Spacing		= isset($Format["Spacing"]) ? $Format["Spacing"] : 20;
+     $TextPadding	= isset($Format["TextPadding"]) ? $Format["TextPadding"] : 2;
+     $TextPos		= isset($Format["TextPos"]) ? $Format["TextPos"] : TEXT_POS_TOP;
+     $Surrounding       = isset($Format["Surrounding"]) ? $Format["Surrounding"] : NULL;
+     $Force		= isset($Format["Force"]) ? $Format["Force"] : 70;
+     $Segments		= isset($Format["Segments"]) ? $Format["Segments"] : 15;
+     $FontSize		= $Object->FontSize;
+     $X1		= $Object->GraphAreaX1;
+     $Y1		= $Object->GraphAreaY1;
+     $X2		= $Object->GraphAreaX2;
+     $Y2		= $Object->GraphAreaY2;
+
+     /* Data Processing */
+     $Data    = $Values->getData();
+     $Palette = $Values->getPalette();
+
+     $LabelSerie = $Data["Abscissa"];
+     $DataSerie  = "";
+
+     foreach($Data["Series"] as $SerieName => $Value)
+      { if ( $SerieName != $LabelSerie && $DataSerie == "" ) { $DataSerie = $SerieName; } }
+
+     $DataSerieSum   = array_sum($Data["Series"][$DataSerie]["Data"]);
+     $DataSerieCount = count($Data["Series"][$DataSerie]["Data"]);
+
+     /* Scale Processing */
+     if ( $TextPos == TEXT_POS_RIGHT )
+      $YScale     = (($Y2-$Y1) - (($DataSerieCount+1)*$Spacing)) / $DataSerieSum;
+     else
+      $YScale     = (($Y2-$Y1) - ($DataSerieCount*$Spacing)) / $DataSerieSum;
+     $LeftHeight = $DataSerieSum * $YScale;
+
+     /* Re-compute graph width depending of the text mode choosen */
+     if ( $TextPos == TEXT_POS_RIGHT )
+      {
+       $MaxWidth = 0;
+       foreach($Data["Series"][$LabelSerie]["Data"] as $Key => $Label)
+        {
+         $Boundardies = $Object->getTextBox(0,0,$Object->FontName,$Object->FontSize,0,$Label);
+         if ( $Boundardies[1]["X"] > $MaxWidth ) { $MaxWidth = $Boundardies[1]["X"] + $TextPadding*2; }
+        }
+       $X2 = $X2 - $MaxWidth;
+      }
+
+     /* Drawing */
+     $LeftY    = ((($Y2-$Y1) / 2) + $Y1) - ($LeftHeight/2);
+     $RightY   = $Y1;
+     $VectorX  = (($X2-$X1) / 2);
+
+     foreach($Data["Series"][$DataSerie]["Data"] as $Key => $Value)
+      {
+       if ( isset($Data["Series"][$LabelSerie]["Data"][$Key]) )
+        $Label = $Data["Series"][$LabelSerie]["Data"][$Key];
+       else
+        $Label = "-";
+
+       $LeftY1 = $LeftY;
+       $LeftY2 = $LeftY + $Value * $YScale;
+
+       $RightY1 = $RightY + $Spacing;
+       $RightY2 = $RightY + $Spacing + $Value * $YScale;;
+
+       $Settings = array("R"=>$Palette[$Key]["R"],"G"=>$Palette[$Key]["G"],"B"=>$Palette[$Key]["B"],"Alpha"=>$Palette[$Key]["Alpha"],"NoDraw"=>TRUE,"Segments"=>$Segments,"Surrounding"=>$Surrounding);
+
+       $PolyGon = "";
+
+       $Angle    = $Object->getAngle($X2,$RightY1,$X1,$LeftY1);
+       $VectorX1 = cos(deg2rad($Angle+90)) * $Force + ($X2-$X1)/2 + $X1;
+       $VectorY1 = sin(deg2rad($Angle+90)) * $Force + ($RightY1-$LeftY1)/2 + $LeftY1;
+       $VectorX2 = cos(deg2rad($Angle-90)) * $Force + ($X2-$X1)/2 + $X1;
+       $VectorY2 = sin(deg2rad($Angle-90)) * $Force + ($RightY1-$LeftY1)/2 + $LeftY1;
+
+       $Points = $Object->drawBezier($X1,$LeftY1,$X2,$RightY1,$VectorX1,$VectorY1,$VectorX2,$VectorY2,$Settings);
+       foreach($Points as $Key => $Pos) { $PolyGon[] = $Pos["X"]; $PolyGon[] = $Pos["Y"]; }
+
+
+       $Angle    = $Object->getAngle($X2,$RightY2,$X1,$LeftY2);
+       $VectorX1 = cos(deg2rad($Angle+90)) * $Force + ($X2-$X1)/2 +$X1;
+       $VectorY1 = sin(deg2rad($Angle+90)) * $Force + ($RightY2-$LeftY2)/2 + $LeftY2;
+       $VectorX2 = cos(deg2rad($Angle-90)) * $Force + ($X2-$X1)/2 +$X1;
+       $VectorY2 = sin(deg2rad($Angle-90)) * $Force + ($RightY2-$LeftY2)/2 + $LeftY2;
+
+       $Points = $Object->drawBezier($X1,$LeftY2,$X2,$RightY2,$VectorX1,$VectorY1,$VectorX2,$VectorY2,$Settings);
+       $Points = array_reverse($Points);
+       foreach($Points as $Key => $Pos) { $PolyGon[] = $Pos["X"]; $PolyGon[] = $Pos["Y"]; }
+
+       $Object->drawPolygon($PolyGon,$Settings);
+
+       if ( $TextPos == TEXT_POS_RIGHT )
+        $Object->drawText($X2+$TextPadding,($RightY2-$RightY1)/2+$RightY1,$Label,array("Align"=>TEXT_ALIGN_MIDDLELEFT));
+       else
+        $Object->drawText($X2,$RightY1-$TextPadding,$Label,array("Align"=>TEXT_ALIGN_BOTTOMRIGHT));
+
+       $LeftY  = $LeftY2;
+       $RightY = $RightY2;
+      }
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pSpring.class.php

@@ -0,0 +1,868 @@
+<?php
+ /*
+     pSpring - class to draw spring graphs
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("NODE_TYPE_FREE"	, 690001);
+ define("NODE_TYPE_CENTRAL"	, 690002);
+
+ define("NODE_SHAPE_CIRCLE"	, 690011);
+ define("NODE_SHAPE_TRIANGLE"	, 690012);
+ define("NODE_SHAPE_SQUARE"	, 690013);
+
+ define("ALGORITHM_RANDOM"	, 690021);
+ define("ALGORITHM_WEIGHTED"	, 690022);
+ define("ALGORITHM_CIRCULAR"	, 690023);
+ define("ALGORITHM_CENTRAL"	, 690024);
+
+ define("LABEL_CLASSIC"		, 690031);
+ define("LABEL_LIGHT"		, 690032);
+
+ /* pSpring class definition */
+ class pSpring
+  {
+   var $History;
+   var $pChartObject;
+   var $Data;
+   var $Links;
+   var $X1;
+   var $Y1;
+   var $X2;
+   var $Y2;
+   var $AutoComputeFreeZone;
+   var $Labels;
+
+   /* Class creator */
+   function pSpring()
+    {
+     /* Initialise data arrays */
+     $this->Data = "";
+     $this->Links = "";
+
+     /* Set nodes defaults */
+     $this->Default["R"]		= 255;
+     $this->Default["G"]		= 255;
+     $this->Default["B"]		= 255;
+     $this->Default["Alpha"]		= 100;
+     $this->Default["BorderR"]		= 0;
+     $this->Default["BorderG"]		= 0;
+     $this->Default["BorderB"]		= 0;
+     $this->Default["BorderAlpha"]	= 100;
+     $this->Default["Surrounding"]	= NULL;
+     $this->Default["BackgroundR"]	= 255;
+     $this->Default["BackgroundG"]	= 255;
+     $this->Default["BackgroundB"]	= 255;
+     $this->Default["BackgroundAlpha"]	= 0;
+     $this->Default["Force"]		= 1;
+     $this->Default["NodeType"]		= NODE_TYPE_FREE;
+     $this->Default["Size"]		= 5;
+     $this->Default["Shape"]		= NODE_SHAPE_CIRCLE;
+     $this->Default["FreeZone"]		= 40;
+     $this->Default["LinkR"]		= 0;
+     $this->Default["LinkG"]		= 0;
+     $this->Default["LinkB"]		= 0;
+     $this->Default["LinkAlpha"]	= 0;
+
+     $this->Labels["Type"]		= LABEL_CLASSIC;
+     $this->Labels["R"]			= 0;
+     $this->Labels["G"]			= 0;
+     $this->Labels["B"]			= 0;
+     $this->Labels["Alpha"]		= 100;
+
+     $this->AutoComputeFreeZone         = FALSE;
+    }
+
+   /* Set default links options */
+   function setLinkDefaults($Settings="")
+    {
+     if ( isset($Settings["R"]) )     { $this->Default["LinkR"] = $Settings["R"]; }
+     if ( isset($Settings["G"]) )     { $this->Default["LinkG"] = $Settings["G"]; }
+     if ( isset($Settings["B"]) )     { $this->Default["LinkB"] = $Settings["B"]; }
+     if ( isset($Settings["Alpha"]) ) { $this->Default["LinkAlpha"] = $Settings["Alpha"]; }
+    }
+
+   /* Set default links options */
+   function setLabelsSettings($Settings="")
+    {
+     if ( isset($Settings["Type"]) )  { $this->Labels["Type"] = $Settings["Type"]; }
+     if ( isset($Settings["R"]) )     { $this->Labels["R"] = $Settings["R"]; }
+     if ( isset($Settings["G"]) )     { $this->Labels["G"] = $Settings["G"]; }
+     if ( isset($Settings["B"]) )     { $this->Labels["B"] = $Settings["B"]; }
+     if ( isset($Settings["Alpha"]) ) { $this->Labels["Alpha"] = $Settings["Alpha"]; }
+    }
+
+   /* Auto compute the FreeZone size based on the number of connections */
+   function autoFreeZone()
+    {
+     /* Check connections reciprocity */
+     foreach($this->Data as $Key => $Settings)
+      {
+       if ( isset($Settings["Connections"]) )
+        { $this->Data[$Key]["FreeZone"] = count($Settings["Connections"])*10 + 20; }
+       else
+        { $this->Data[$Key]["FreeZone"] = 20; }
+      }
+
+    }
+
+   /* Set link properties */
+   function linkProperties($FromNode,$ToNode,$Settings)
+    {
+     if ( !isset($this->Data[$FromNode]) ) { return(0); }
+     if ( !isset($this->Data[$ToNode]) )   { return(0); }
+
+     $R			= isset($Settings["R"]) ? $Settings["R"] : 0;
+     $G			= isset($Settings["G"]) ? $Settings["G"] : 0;
+     $B			= isset($Settings["B"]) ? $Settings["B"] : 0;
+     $Alpha		= isset($Settings["Alpha"]) ? $Settings["Alpha"] : 100;
+     $Name		= isset($Settings["Name"]) ? $Settings["Name"] : NULL;
+     $Ticks		= isset($Settings["Ticks"]) ? $Settings["Ticks"] : NULL;
+
+     $this->Links[$FromNode][$ToNode]["R"] = $R;         $this->Links[$ToNode][$FromNode]["R"] = $R;
+     $this->Links[$FromNode][$ToNode]["G"] = $G;         $this->Links[$ToNode][$FromNode]["G"] = $G;
+     $this->Links[$FromNode][$ToNode]["B"] = $B;         $this->Links[$ToNode][$FromNode]["B"] = $B;
+     $this->Links[$FromNode][$ToNode]["Alpha"] = $Alpha; $this->Links[$ToNode][$FromNode]["Alpha"] = $Alpha;
+     $this->Links[$FromNode][$ToNode]["Name"] = $Name;   $this->Links[$ToNode][$FromNode]["Name"] = $Name;
+     $this->Links[$FromNode][$ToNode]["Ticks"] = $Ticks; $this->Links[$ToNode][$FromNode]["Ticks"] = $Ticks;
+    }
+
+   function setNodeDefaults($Settings="")
+    {
+     if ( isset($Settings["R"]) ) { $this->Default["R"]					= $Settings["R"]; }
+     if ( isset($Settings["G"]) ) { $this->Default["G"]					= $Settings["G"]; }
+     if ( isset($Settings["B"]) ) { $this->Default["B"]					= $Settings["B"]; }
+     if ( isset($Settings["Alpha"]) ) { $this->Default["Alpha"]				= $Settings["Alpha"]; }
+     if ( isset($Settings["BorderR"]) ) { $this->Default["BorderR"]			= $Settings["BorderR"]; }
+     if ( isset($Settings["BorderG"]) ) { $this->Default["BorderG"]			= $Settings["BorderG"]; }
+     if ( isset($Settings["BorderB"]) ) { $this->Default["BorderB"]			= $Settings["BorderB"]; }
+     if ( isset($Settings["BorderAlpha"]) ) { $this->Default["BorderAlpha"]		= $Settings["BorderAlpha"]; }
+     if ( isset($Settings["Surrounding"]) ) { $this->Default["Surrounding"]		= $Settings["Surrounding"]; }
+     if ( isset($Settings["BackgroundR"]) ) { $this->Default["BackgroundR"]		= $Settings["BackgroundR"]; }
+     if ( isset($Settings["BackgroundG"]) ) { $this->Default["BackgroundG"]		= $Settings["BackgroundG"]; }
+     if ( isset($Settings["BackgroundB"]) ) { $this->Default["BackgroundB"]		= $Settings["BackgroundB"]; }
+     if ( isset($Settings["BackgroundAlpha"]) ) { $this->Default["BackgroundAlpha"]	= $Settings["BackgroundAlpha"]; }
+     if ( isset($Settings["NodeType"]) ) { $this->Default["NodeType"]			= $Settings["NodeType"]; }
+     if ( isset($Settings["Size"]) ) { $this->Default["Size"]				= $Settings["Size"]; }
+     if ( isset($Settings["Shape"]) ) { $this->Default["Shape"]				= $Settings["Shape"]; }
+     if ( isset($Settings["FreeZone"]) ) { $this->Default["FreeZone"]			= $Settings["FreeZone"]; }
+    }
+
+   /* Add a node */
+   function addNode($NodeID,$Settings="")
+    {
+     /* if the node already exists, ignore */
+     if (isset($this->Data[$NodeID])) { return(0); }
+
+     $Name		= isset($Settings["Name"]) ? $Settings["Name"] : "Node ".$NodeID;
+     $Connections	= isset($Settings["Connections"]) ? $Settings["Connections"] : NULL;
+
+     $R			= isset($Settings["R"]) ? $Settings["R"] : $this->Default["R"];
+     $G			= isset($Settings["G"]) ? $Settings["G"] : $this->Default["G"];
+     $B			= isset($Settings["B"]) ? $Settings["B"] : $this->Default["B"];
+     $Alpha		= isset($Settings["Alpha"]) ? $Settings["Alpha"] : $this->Default["Alpha"];
+     $BorderR		= isset($Settings["BorderR"]) ? $Settings["BorderR"] : $this->Default["BorderR"];
+     $BorderG		= isset($Settings["BorderG"]) ? $Settings["BorderG"] : $this->Default["BorderG"];
+     $BorderB		= isset($Settings["BorderB"]) ? $Settings["BorderB"] : $this->Default["BorderB"];
+     $BorderAlpha	= isset($Settings["BorderAlpha"]) ? $Settings["BorderAlpha"] : $this->Default["BorderAlpha"];
+     $Surrounding	= isset($Settings["Surrounding"]) ? $Settings["Surrounding"] : $this->Default["Surrounding"];
+     $BackgroundR	= isset($Settings["BackgroundR"]) ? $Settings["BackgroundR"] : $this->Default["BackgroundR"];
+     $BackgroundG	= isset($Settings["BackgroundG"]) ? $Settings["BackgroundG"] : $this->Default["BackgroundG"];
+     $BackgroundB	= isset($Settings["BackgroundB"]) ? $Settings["BackgroundB"] : $this->Default["BackgroundB"];
+     $BackgroundAlpha	= isset($Settings["BackgroundAlpha"]) ? $Settings["BackgroundAlpha"] : $this->Default["BackgroundAlpha"];
+     $Force		= isset($Settings["Force"]) ? $Settings["Force"] :  $this->Default["Force"];
+     $NodeType		= isset($Settings["NodeType"]) ? $Settings["NodeType"] : $this->Default["NodeType"];
+     $Size		= isset($Settings["Size"]) ? $Settings["Size"] : $this->Default["Size"];
+     $Shape		= isset($Settings["Shape"]) ? $Settings["Shape"] : $this->Default["Shape"];
+     $FreeZone		= isset($Settings["FreeZone"]) ? $Settings["FreeZone"] : $this->Default["FreeZone"];
+
+     if ( $Surrounding != NULL ) { $BorderR = $R + $Surrounding; $BorderG = $G + $Surrounding; $BorderB = $B + $Surrounding; }
+
+     $this->Data[$NodeID]["R"] = $R; $this->Data[$NodeID]["G"] = $G; $this->Data[$NodeID]["B"] = $B; $this->Data[$NodeID]["Alpha"] = $Alpha;
+     $this->Data[$NodeID]["BorderR"] = $BorderR; $this->Data[$NodeID]["BorderG"] = $BorderG; $this->Data[$NodeID]["BorderB"] = $BorderB; $this->Data[$NodeID]["BorderAlpha"] = $BorderAlpha;
+     $this->Data[$NodeID]["BackgroundR"]	= $BackgroundR; $this->Data[$NodeID]["BackgroundG"] = $BackgroundG; $this->Data[$NodeID]["BackgroundB"] = $BackgroundB; $this->Data[$NodeID]["BackgroundAlpha"] = $BackgroundAlpha;
+     $this->Data[$NodeID]["Name"]		= $Name;
+     $this->Data[$NodeID]["Force"]		= $Force;
+     $this->Data[$NodeID]["Type"]		= $NodeType;
+     $this->Data[$NodeID]["Size"]		= $Size;
+     $this->Data[$NodeID]["Shape"]		= $Shape;
+     $this->Data[$NodeID]["FreeZone"]		= $FreeZone;
+     if ( $Connections != NULL )
+      {
+       if ( is_array($Connections ) )
+        {
+         foreach($Connections as $Key => $Value)
+          $this->Data[$NodeID]["Connections"][] = $Value;
+        }
+       else
+        $this->Data[$NodeID]["Connections"][] = $Connections;
+      }
+    }
+
+   /* Set color attribute for a list of nodes */
+   function setNodesColor($Nodes,$Settings="")
+    {
+     if ( is_array($Nodes) )
+      {
+       foreach ($Nodes as $Key => $NodeID)
+        {
+         if (isset($this->Data[$NodeID]) )
+          {
+           if ( isset($Settings["R"]) ) { $this->Data[$NodeID]["R"] = $Settings["R"]; }
+           if ( isset($Settings["G"]) ) { $this->Data[$NodeID]["G"] = $Settings["G"]; }
+           if ( isset($Settings["B"]) ) { $this->Data[$NodeID]["B"] = $Settings["B"]; }
+           if ( isset($Settings["Alpha"]) ) { $this->Data[$NodeID]["Alpha"] = $Settings["Alpha"]; }
+           if ( isset($Settings["BorderR"]) ) { $this->Data[$NodeID]["BorderR"] = $Settings["BorderR"]; }
+           if ( isset($Settings["BorderG"]) ) { $this->Data[$NodeID]["BorderG"] = $Settings["BorderG"]; }
+           if ( isset($Settings["BorderB"]) ) { $this->Data[$NodeID]["BorderB"] = $Settings["BorderB"]; }
+           if ( isset($Settings["BorderAlpha"]) ) { $this->Data[$NodeID]["BorderAlpha"] = $Settings["BorderAlpha"]; }
+           if ( isset($Settings["Surrounding"]) ) { $this->Data[$NodeID]["BorderR"] = $this->Data[$NodeID]["R"] + $Settings["Surrounding"]; $this->Data[$NodeID]["BorderG"] = $this->Data[$NodeID]["G"] + $Settings["Surrounding"]; $this->Data[$NodeID]["BorderB"] = $this->Data[$NodeID]["B"] + $Settings["Surrounding"]; }
+          }
+        }
+      }
+     else
+      {
+       if ( isset($Settings["R"]) ) { $this->Data[$Nodes]["R"] = $Settings["R"]; }
+       if ( isset($Settings["G"]) ) { $this->Data[$Nodes]["G"] = $Settings["G"]; }
+       if ( isset($Settings["B"]) ) { $this->Data[$Nodes]["B"] = $Settings["B"]; }
+       if ( isset($Settings["Alpha"]) ) { $this->Data[$Nodes]["Alpha"] = $Settings["Alpha"]; }
+       if ( isset($Settings["BorderR"]) ) { $this->Data[$Nodes]["BorderR"] = $Settings["BorderR"]; }
+       if ( isset($Settings["BorderG"]) ) { $this->Data[$Nodes]["BorderG"] = $Settings["BorderG"]; }
+       if ( isset($Settings["BorderB"]) ) { $this->Data[$Nodes]["BorderB"] = $Settings["BorderB"]; }
+       if ( isset($Settings["BorderAlpha"]) ) { $this->Data[$Nodes]["BorderAlpha"] = $Settings["BorderAlpha"]; }
+       if ( isset($Settings["Surrounding"]) ) { $this->Data[$Nodes]["BorderR"] = $this->Data[$NodeID]["R"] + $Settings["Surrounding"]; $this->Data[$NodeID]["BorderG"] = $this->Data[$NodeID]["G"] + $Settings["Surrounding"]; $this->Data[$NodeID]["BorderB"] = $this->Data[$NodeID]["B"] + $Settings["Surrounding"]; }
+      }
+    }
+
+   /* Returns all the nodes details */
+   function dumpNodes()
+    { return($this->Data); }
+
+   /* Check if a connection exists and create it if required */
+   function checkConnection($SourceID, $TargetID)
+    {
+     if ( isset($this->Data[$SourceID]["Connections"]) )
+      {
+       foreach ($this->Data[$SourceID]["Connections"] as $Key => $ConnectionID)
+        { if ( $TargetID == $ConnectionID ) { return(TRUE); } }
+      }
+     $this->Data[$SourceID]["Connections"][] = $TargetID;
+    }
+   /* Get the median linked nodes position */
+   function getMedianOffset($Key,$X,$Y)
+    {
+     $Cpt = 1;
+     if ( isset($this->Data[$Key]["Connections"]) )
+      {
+       foreach($this->Data[$Key]["Connections"] as $ID => $NodeID)
+        {
+         if ( isset($this->Data[$NodeID]["X"]) && isset($this->Data[$NodeID]["Y"]) )
+          {
+           $X = $X + $this->Data[$NodeID]["X"];
+           $Y = $Y + $this->Data[$NodeID]["Y"];
+           $Cpt++;
+          }
+        }
+      }
+     return(array("X"=>$X/$Cpt,"Y"=>$Y/$Cpt));
+    }
+
+   /* Return the ID of the attached partner with the biggest weight */
+   function getBiggestPartner($Key)
+    {
+     if ( !isset($this->Data[$Key]["Connections"]) ) { return(""); }
+
+     $MaxWeight = 0; $Result = "";
+     foreach($this->Data[$Key]["Connections"] as $Key => $PeerID)
+      {
+       if ( $this->Data[$PeerID]["Weight"] > $MaxWeight )
+        { $MaxWeight = $this->Data[$PeerID]["Weight"]; $Result = $PeerID; }
+      }
+     return($Result);
+    }
+
+   /* Do the initial node positions computing pass */
+   function firstPass($Algorithm)
+    {
+     $CenterX = ($this->X2 - $this->X1) / 2 + $this->X1;
+     $CenterY = ($this->Y2 - $this->Y1) / 2 + $this->Y1;
+
+     /* Check connections reciprocity */
+     foreach($this->Data as $Key => $Settings)
+      {
+       if ( isset($Settings["Connections"]) )
+        {
+         foreach($Settings["Connections"] as $ID => $ConnectionID)
+          $this->checkConnection($ConnectionID,$Key);
+        }
+      }
+
+     if ( $this->AutoComputeFreeZone ) { $this->autoFreeZone(); }
+
+     /* Get the max number of connections */
+     $MaxConnections = 0;
+     foreach($this->Data as $Key => $Settings)
+      { if ( isset($Settings["Connections"]) ) { if ( $MaxConnections < count($Settings["Connections"] ) ) { $MaxConnections = count($Settings["Connections"]); } } }
+
+     if ( $Algorithm == ALGORITHM_WEIGHTED )
+      {
+       foreach($this->Data as $Key => $Settings)
+        {
+         if ( $Settings["Type"] == NODE_TYPE_CENTRAL ) { $this->Data[$Key]["X"] = $CenterX; $this->Data[$Key]["Y"] = $CenterY; }
+         if ( $Settings["Type"] == NODE_TYPE_FREE )
+          {
+           if ( isset($Settings["Connections"]) )
+            { $Connections = count($Settings["Connections"]); }
+           else
+            { $Connections = 0; }
+
+           $Ring  = $MaxConnections - $Connections;
+           $Angle = rand(0,360);
+           
+           $this->Data[$Key]["X"] = cos(deg2rad($Angle)) * ($Ring*$this->RingSize) + $CenterX;
+           $this->Data[$Key]["Y"] = sin(deg2rad($Angle)) * ($Ring*$this->RingSize) + $CenterY;
+          }
+        }
+      }
+     elseif ( $Algorithm == ALGORITHM_CENTRAL )
+      {
+       /* Put a weight on each nodes */
+       foreach($this->Data as $Key => $Settings)
+        {
+         if ( isset($Settings["Connections"]) )
+          $this->Data[$Key]["Weight"] = count($Settings["Connections"]);
+         else
+          $this->Data[$Key]["Weight"] = 0;
+        }
+
+       $MaxConnections = $MaxConnections + 1;
+       for($i=$MaxConnections;$i>=0;$i--)
+        {
+         foreach($this->Data as $Key => $Settings)
+          {
+           if ( $Settings["Type"] == NODE_TYPE_CENTRAL ) { $this->Data[$Key]["X"] = $CenterX; $this->Data[$Key]["Y"] = $CenterY; }
+           if ( $Settings["Type"] == NODE_TYPE_FREE )
+            {
+             if ( isset($Settings["Connections"]) )
+              { $Connections = count($Settings["Connections"]); }
+             else
+              { $Connections = 0; }
+
+             if ( $Connections == $i )
+              {
+               $BiggestPartner = $this->getBiggestPartner($Key);
+               if ( $BiggestPartner != "" )
+                {
+                 $Ring          = $this->Data[$BiggestPartner]["FreeZone"];
+                 $Weight        = $this->Data[$BiggestPartner]["Weight"];
+                 $AngleDivision = 360 / $this->Data[$BiggestPartner]["Weight"];
+                 $Done          = FALSE; $Tries = 0;
+                 while (!$Done && $Tries <= $Weight*2)
+                  {
+                   $Tries++;
+                   $Angle = floor(rand(0,$Weight)*$AngleDivision);
+                   if ( !isset($this->Data[$BiggestPartner]["Angular"][$Angle]) || !isset($this->Data[$BiggestPartner]["Angular"]) )
+                    {
+                     $this->Data[$BiggestPartner]["Angular"][$Angle] = $Angle;
+                     $Done = TRUE; 
+                    }
+                  }
+                 if ( !$Done )
+                  { $Angle = rand(0,360); $this->Data[$BiggestPartner]["Angular"][$Angle] = $Angle; }
+
+                 $X = cos(deg2rad($Angle)) * ($Ring) + $this->Data[$BiggestPartner]["X"];
+                 $Y = sin(deg2rad($Angle)) * ($Ring) + $this->Data[$BiggestPartner]["Y"];
+
+                 $this->Data[$Key]["X"] = $X;
+                 $this->Data[$Key]["Y"] = $Y;
+                }
+              }
+            }
+          }
+        }
+      }
+     elseif ( $Algorithm == ALGORITHM_CIRCULAR )
+      {
+       $MaxConnections = $MaxConnections + 1;
+       for($i=$MaxConnections;$i>=0;$i--)
+        {
+         foreach($this->Data as $Key => $Settings)
+          {
+           if ( $Settings["Type"] == NODE_TYPE_CENTRAL ) { $this->Data[$Key]["X"] = $CenterX; $this->Data[$Key]["Y"] = $CenterY; }
+           if ( $Settings["Type"] == NODE_TYPE_FREE )
+            {
+             if ( isset($Settings["Connections"]) )
+              { $Connections = count($Settings["Connections"]); }
+             else
+              { $Connections = 0; }
+
+             if ( $Connections == $i )
+              {
+               $Ring  = $MaxConnections - $Connections;
+               $Angle = rand(0,360);
+
+               $X = cos(deg2rad($Angle)) * ($Ring*$this->RingSize) + $CenterX;
+               $Y = sin(deg2rad($Angle)) * ($Ring*$this->RingSize) + $CenterY;
+
+               $MedianOffset = $this->getMedianOffset($Key,$X,$Y);
+
+               $this->Data[$Key]["X"] = $MedianOffset["X"];
+               $this->Data[$Key]["Y"] = $MedianOffset["Y"];
+              }
+            }
+          }
+        }
+      }
+     elseif ( $Algorithm == ALGORITHM_RANDOM )
+      {
+       foreach($this->Data as $Key => $Settings)
+        {
+         if ( $Settings["Type"] == NODE_TYPE_FREE )
+          {
+           $this->Data[$Key]["X"] = $CenterX + rand(-20,20);
+           $this->Data[$Key]["Y"] = $CenterY + rand(-20,20);
+          }
+         if ( $Settings["Type"] == NODE_TYPE_CENTRAL ) { $this->Data[$Key]["X"] = $CenterX; $this->Data[$Key]["Y"] = $CenterY; }
+        }
+      }
+    }
+
+   /* Compute one pass */
+   function doPass()
+    {
+     /* Compute vectors */
+     foreach($this->Data as $Key => $Settings)
+      {
+       if ( $Settings["Type"] != NODE_TYPE_CENTRAL )
+        {
+         unset($this->Data[$Key]["Vectors"]);
+
+         $X1 = $Settings["X"];
+         $Y1 = $Settings["Y"];
+
+         /* Repulsion vectors */
+         foreach($this->Data as $Key2 => $Settings2)
+          {
+           if ( $Key != $Key2 )
+            {
+             $X2 = $this->Data[$Key2]["X"];
+             $Y2 = $this->Data[$Key2]["Y"];
+             $FreeZone = $this->Data[$Key2]["FreeZone"];
+
+             $Distance = $this->getDistance($X1,$Y1,$X2,$Y2);
+             $Angle    = $this->getAngle($X1,$Y1,$X2,$Y2) + 180;
+
+             /* Nodes too close, repulsion occurs */
+             if ( $Distance < $FreeZone )
+              {
+               $Force = log(pow(2,$FreeZone-$Distance));
+               if ( $Force > 1 )
+                { $this->Data[$Key]["Vectors"][] = array("Type"=>"R","Angle"=>$Angle % 360,"Force"=>$Force); }
+              }
+            }
+          }
+
+         /* Attraction vectors */
+         if ( isset($Settings["Connections"]) )
+          {
+           foreach($Settings["Connections"] as $ID => $NodeID)
+            {
+             if ( isset($this->Data[$NodeID]) )
+              {
+               $X2 = $this->Data[$NodeID]["X"];
+               $Y2 = $this->Data[$NodeID]["Y"];
+               $FreeZone = $this->Data[$Key2]["FreeZone"];
+
+               $Distance = $this->getDistance($X1,$Y1,$X2,$Y2);
+               $Angle    = $this->getAngle($X1,$Y1,$X2,$Y2);
+
+               if ( $Distance > $FreeZone )
+                $Force = log(($Distance-$FreeZone)+1);
+               else
+                { $Force = log(($FreeZone-$Distance)+1); ($Angle = $Angle + 180); }
+
+               if ( $Force > 1 )
+                $this->Data[$Key]["Vectors"][] = array("Type"=>"A","Angle"=>$Angle % 360,"Force"=>$Force);
+              }
+            }
+          }
+        }
+      }
+
+     /* Move the nodes accoding to the vectors */
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X = $Settings["X"];
+       $Y = $Settings["Y"];
+
+       if ( isset($Settings["Vectors"]) && $Settings["Type"] != NODE_TYPE_CENTRAL )
+        {
+         foreach($Settings["Vectors"] as $ID => $Vector)
+          {
+           $Type  = $Vector["Type"];
+           $Force = $Vector["Force"];
+           $Angle = $Vector["Angle"];
+           $Factor = $Type == "A" ? $this->MagneticForceA : $this->MagneticForceR;
+
+           $X = cos(deg2rad($Angle)) * $Force * $Factor + $X;
+           $Y = sin(deg2rad($Angle)) * $Force * $Factor + $Y;
+          }
+        }
+
+       $this->Data[$Key]["X"] = $X;
+       $this->Data[$Key]["Y"] = $Y;
+      }
+    }
+
+   function lastPass()
+    {
+     /* Put everything inside the graph area */
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X = $Settings["X"];
+       $Y = $Settings["Y"];
+
+       if ( $X < $this->X1 ) { $X = $this->X1; }
+       if ( $X > $this->X2 ) { $X = $this->X2; }
+       if ( $Y < $this->Y1 ) { $Y = $this->Y1; }
+       if ( $Y > $this->Y2 ) { $Y = $this->Y2; }
+
+       $this->Data[$Key]["X"] = $X;
+       $this->Data[$Key]["Y"] = $Y;
+      }
+
+     /* Dump all links */
+     $Links = "";
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X1 = $Settings["X"];
+       $Y1 = $Settings["Y"];
+
+       if ( isset($Settings["Connections"]) )
+        {
+         foreach ($Settings["Connections"] as $ID => $NodeID)
+          {
+           if ( isset($this->Data[$NodeID]) )
+            {
+             $X2 = $this->Data[$NodeID]["X"];
+             $Y2 = $this->Data[$NodeID]["Y"];
+
+             $Links[] = array("X1"=>$X1,"Y1"=>$Y1,"X2"=>$X2,"Y2"=>$Y2,"Source"=>$Settings["Name"],"Destination"=>$this->Data[$NodeID]["Name"]);
+            }
+          }
+        }
+      }
+
+     /* Check collisions */
+     $Conflicts = 0;
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X1 = $Settings["X"];
+       $Y1 = $Settings["Y"];
+
+       if ( isset($Settings["Connections"]) )
+        {
+         foreach ($Settings["Connections"] as $ID => $NodeID)
+          {
+           if ( isset($this->Data[$NodeID]) )
+            {
+             $X2 = $this->Data[$NodeID]["X"];
+             $Y2 = $this->Data[$NodeID]["Y"];
+
+             foreach($Links as $IDLinks => $Link)
+              {
+               $X3 = $Link["X1"]; $Y3 = $Link["Y1"]; $X4 = $Link["X2"]; $Y4 = $Link["Y2"];
+
+               if ( !($X1 == $X3 && $X2 == $X4 && $Y1 == $Y3 && $Y2 == $Y4 ) )
+                {
+                 if ( $this->intersect($X1,$Y1,$X2,$Y2,$X3,$Y3,$X4,$Y4) )
+                  {
+                   if ( $Link["Source"] != $Settings["Name"] && $Link["Source"] != $this->Data[$NodeID]["Name"] && $Link["Destination"] != $Settings["Name"] && $Link["Destination"] != $this->Data[$NodeID]["Name"] )
+                    { $Conflicts++; }
+                  }
+                }
+              }
+            }
+          }
+        }
+      }
+     return($Conflicts/2);
+    }
+
+   /* Center the graph */
+   function center()
+    {
+     /* Determine the real center */
+     $TargetCenterX = ($this->X2 - $this->X1) / 2 + $this->X1;
+     $TargetCenterY = ($this->Y2 - $this->Y1) / 2 + $this->Y1;
+
+     /* Get current boundaries */
+     $XMin = $this->X2; $XMax = $this->X1;
+     $YMin = $this->Y2; $YMax = $this->Y1;
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X = $Settings["X"];
+       $Y = $Settings["Y"];
+
+       if ( $X < $XMin) { $XMin = $X; }
+       if ( $X > $XMax) { $XMax = $X; }
+       if ( $Y < $YMin) { $YMin = $Y; }
+       if ( $Y > $YMax) { $YMax = $Y; }
+      }
+     $CurrentCenterX = ($XMax - $XMin) / 2 + $XMin;
+     $CurrentCenterY = ($YMax - $YMin) / 2 + $YMin;
+
+     /* Compute the offset to apply */
+     $XOffset = $TargetCenterX - $CurrentCenterX;
+     $YOffset = $TargetCenterY - $CurrentCenterY;
+
+     /* Correct the points position */
+     foreach($this->Data as $Key => $Settings)
+      {
+       $this->Data[$Key]["X"] = $Settings["X"] + $XOffset;
+       $this->Data[$Key]["Y"] = $Settings["Y"] + $YOffset;
+      }
+    }
+
+   /* Create the encoded string */
+   function drawSpring($Object,$Settings="")
+    {
+     $this->pChartObject = $Object;
+
+     $Pass			= isset($Settings["Pass"]) ? $Settings["Pass"] : 50;
+     $Retries			= isset($Settings["Retry"]) ? $Settings["Retry"] : 10;
+     $this->MagneticForceA	= isset($Settings["MagneticForceA"]) ? $Settings["MagneticForceA"] : 1.5;
+     $this->MagneticForceR	= isset($Settings["MagneticForceR"]) ? $Settings["MagneticForceR"] : 2;
+     $this->RingSize		= isset($Settings["RingSize"]) ? $Settings["RingSize"] : 40;
+     $DrawVectors		= isset($Settings["DrawVectors"]) ? $Settings["DrawVectors"] : FALSE;
+     $DrawQuietZone		= isset($Settings["DrawQuietZone"]) ? $Settings["DrawQuietZone"] : FALSE;
+     $CenterGraph		= isset($Settings["CenterGraph"]) ? $Settings["CenterGraph"] : TRUE;
+     $TextPadding		= isset($Settings["TextPadding"]) ? $Settings["TextPadding"] : 4;
+     $Algorithm			= isset($Settings["Algorithm"]) ? $Settings["Algorithm"] : ALGORITHM_WEIGHTED;
+
+     $FontSize		= $Object->FontSize;
+     $this->X1		= $Object->GraphAreaX1;
+     $this->Y1		= $Object->GraphAreaY1;
+     $this->X2		= $Object->GraphAreaX2;
+     $this->Y2		= $Object->GraphAreaY2;
+
+     $Conflicts = 1; $Jobs = 0; $this->History["MinimumConflicts"] = -1;
+     while ($Conflicts != 0 && $Jobs < $Retries )
+      {
+       $Jobs++;
+
+       /* Compute the initial settings */
+       $this->firstPass($Algorithm);
+
+       /* Apply the vectors */
+       if ( $Pass > 0 ) 
+        {
+         for ($i=0; $i<=$Pass; $i++) { $this->doPass(); }
+        }
+
+       $Conflicts = $this->lastPass();
+       if ( $this->History["MinimumConflicts"] == -1 || $Conflicts < $this->History["MinimumConflicts"] )
+        { $this->History["MinimumConflicts"] = $Conflicts; $this->History["Result"] = $this->Data; }
+      }
+
+     $Conflicts  = $this->History["MinimumConflicts"];
+     $this->Data = $this->History["Result"];
+
+     if ( $CenterGraph ) { $this->center(); }
+
+     /* Draw the connections */
+     $Drawn = "";
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X	= $Settings["X"];
+       $Y	= $Settings["Y"];
+
+       if ( isset($Settings["Connections"]) )
+        {
+         foreach ($Settings["Connections"] as $ID => $NodeID)
+          {
+           if ( !isset($Drawn[$Key]) )    { $Drawn[$Key] = ""; }
+           if ( !isset($Drawn[$NodeID]) ) { $Drawn[$NodeID] = ""; }
+
+           if ( isset($this->Data[$NodeID]) && !isset($Drawn[$Key][$NodeID]) && !isset($Drawn[$NodeID][$Key]) )
+            {
+             $Color = array("R"=>$this->Default["LinkR"],"G"=>$this->Default["LinkG"],"B"=>$this->Default["LinkB"],"Alpha"=>$this->Default["Alpha"]);
+
+             if ( $this->Links != "" )
+              {
+               if ( isset($this->Links[$Key][$NodeID]["R"]) )
+                { $Color = array("R"=>$this->Links[$Key][$NodeID]["R"],"G"=>$this->Links[$Key][$NodeID]["G"],"B"=>$this->Links[$Key][$NodeID]["B"],"Alpha"=>$this->Links[$Key][$NodeID]["Alpha"]); }
+
+               if ( isset($this->Links[$Key][$NodeID]["Ticks"]) )
+                 { $Color["Ticks"] = $this->Links[$Key][$NodeID]["Ticks"]; }
+              }
+
+             $X2 = $this->Data[$NodeID]["X"];
+             $Y2 = $this->Data[$NodeID]["Y"];
+             $this->pChartObject->drawLine($X,$Y,$X2,$Y2,$Color);
+             $Drawn[$Key][$NodeID] = TRUE;
+
+             if ( isset($this->Links) && $this->Links != "" )
+              {
+               if ( isset($this->Links[$Key][$NodeID]["Name"]) || isset($this->Links[$NodeID][$Key]["Name"]) )
+                {
+                 $Name  = isset($this->Links[$Key][$NodeID]["Name"]) ? $this->Links[$Key][$NodeID]["Name"] : $this->Links[$NodeID][$Key]["Name"];
+                 $TxtX  = ($X2 - $X)/2 + $X;
+                 $TxtY  = ($Y2 - $Y)/2 + $Y;
+
+                 if ( $X <= $X2 )
+                  $Angle = (360-$this->getAngle($X,$Y,$X2,$Y2)) % 360;
+                 else
+                  $Angle = (360-$this->getAngle($X2,$Y2,$X,$Y)) % 360;
+
+                 $Settings          = $Color;
+                 $Settings["Angle"] = $Angle;
+                 $Settings["Align"] = TEXT_ALIGN_BOTTOMMIDDLE;
+                 $this->pChartObject->drawText($TxtX,$TxtY,$Name,$Settings);
+                }
+              }
+            }
+          }
+        }
+      }
+
+     /* Draw the quiet zones */
+     if ( $DrawQuietZone )
+      {
+       foreach($this->Data as $Key => $Settings)
+        {
+         $X	 = $Settings["X"];
+         $Y	 = $Settings["Y"];
+         $FreeZone = $Settings["FreeZone"];
+
+         $this->pChartObject->drawFilledCircle($X,$Y,$FreeZone,array("R"=>0,"G"=>0,"B"=>0,"Alpha"=>2));
+        }
+      }
+
+
+     /* Draw the nodes */
+     foreach($this->Data as $Key => $Settings)
+      {
+       $X	 = $Settings["X"];
+       $Y	 = $Settings["Y"];
+       $Name	 = $Settings["Name"];
+       $FreeZone = $Settings["FreeZone"];
+       $Shape    = $Settings["Shape"];
+       $Size     = $Settings["Size"];
+
+       $Color	 = array("R"=>$Settings["R"],"G"=>$Settings["G"],"B"=>$Settings["B"],"Alpha"=>$Settings["Alpha"],"BorderR"=>$Settings["BorderR"],"BorderG"=>$Settings["BorderG"],"BorderB"=>$Settings["BorderB"],"BorderApha"=>$Settings["BorderAlpha"]);
+
+       if ( $Shape == NODE_SHAPE_CIRCLE )
+        {
+         $this->pChartObject->drawFilledCircle($X,$Y,$Size,$Color);
+        }
+       elseif ( $Shape == NODE_SHAPE_TRIANGLE )
+        {
+         $Points = "";
+         $Points[] = cos(deg2rad(270)) * $Size + $X; $Points[] = sin(deg2rad(270)) * $Size + $Y;
+         $Points[] = cos(deg2rad(45)) * $Size + $X;  $Points[] = sin(deg2rad(45)) * $Size + $Y;
+         $Points[] = cos(deg2rad(135)) * $Size + $X; $Points[] = sin(deg2rad(135)) * $Size + $Y;
+         $this->pChartObject->drawPolygon($Points,$Color);
+        }
+       elseif ( $Shape == NODE_SHAPE_SQUARE )
+        {
+         $Offset = $Size/2; $Size = $Size / 2;
+         $this->pChartObject->drawFilledRectangle($X-$Offset,$Y-$Offset,$X+$Offset,$Y+$Offset,$Color);
+        }
+
+       if ( $Name != "" )
+        {
+         $LabelOptions = array("R"=>$this->Labels["R"],"G"=>$this->Labels["G"],"B"=>$this->Labels["B"],"Alpha"=>$this->Labels["Alpha"]);
+
+         if ( $this->Labels["Type"] == LABEL_LIGHT )
+          {
+           $LabelOptions["Align"] = TEXT_ALIGN_BOTTOMLEFT;
+           $this->pChartObject->drawText($X,$Y,$Name,$LabelOptions);
+          }
+         elseif ( $this->Labels["Type"] == LABEL_CLASSIC )
+          {
+           $LabelOptions["Align"]         = TEXT_ALIGN_TOPMIDDLE;
+           $LabelOptions["DrawBox"]       = TRUE;
+           $LabelOptions["BoxAlpha"]      = 50;
+           $LabelOptions["BorderOffset"]  = 4;
+           $LabelOptions["RoundedRadius"] = 3;
+           $LabelOptions["BoxRounded"]    = TRUE;
+           $LabelOptions["NoShadow"]      = TRUE;
+
+           $this->pChartObject->drawText($X,$Y+$Size+$TextPadding,$Name,$LabelOptions);
+          }
+        }
+      }
+
+     /* Draw the vectors */
+     if ( $DrawVectors )
+      {
+       foreach($this->Data as $Key => $Settings)
+        {
+         $X1 = $Settings["X"];
+         $Y1 = $Settings["Y"];
+
+         if ( isset($Settings["Vectors"]) && $Settings["Type"] != NODE_TYPE_CENTRAL )
+          {
+           foreach($Settings["Vectors"] as $ID => $Vector)
+            {
+             $Type  = $Vector["Type"];
+             $Force = $Vector["Force"];
+             $Angle = $Vector["Angle"];
+             $Factor = $Type == "A" ? $this->MagneticForceA : $this->MagneticForceR;
+             $Color  = $Type == "A" ? array("FillR"=>255,"FillG"=>0,"FillB"=>0) : array("FillR"=>0,"FillG"=>255,"FillB"=>0);
+
+             $X2 = cos(deg2rad($Angle)) * $Force * $Factor + $X1;
+             $Y2 = sin(deg2rad($Angle)) * $Force * $Factor + $Y1;
+
+             $this->pChartObject->drawArrow($X1,$Y1,$X2,$Y2,$Color);
+            }
+          }
+        }
+      }
+
+     return(array("Pass"=>$Jobs,"Conflicts"=>$Conflicts));
+    }
+
+   /* Return the distance between two points */
+   function getDistance($X1,$Y1,$X2,$Y2)
+    { return (sqrt(($X2-$X1)*($X2-$X1)+($Y2-$Y1)*($Y2-$Y1))); }
+
+   /* Return the angle made by a line and the X axis */
+   function getAngle($X1,$Y1,$X2,$Y2)
+    {
+     $Opposite = $Y2 - $Y1; $Adjacent = $X2 - $X1;$Angle = rad2deg(atan2($Opposite,$Adjacent));
+     if ($Angle > 0) { return($Angle); } else { return(360-abs($Angle)); }
+    }
+
+   function intersect($X1,$Y1,$X2,$Y2,$X3,$Y3,$X4,$Y4)
+    {
+     $A = (($X3 * $Y4 - $X4 * $Y3) * ($X1 - $X2) - ($X1 * $Y2 - $X2 * $Y1) * ($X3 - $X4));
+     $B = (($Y1 - $Y2) * ($X3 - $X4) - ($Y3 - $Y4) * ($X1 - $X2));
+
+     if ( $B == 0 ) { return(FALSE); }
+     $Xi = $A / $B;
+
+     $C = ($X1 - $X2);
+     if ( $C == 0 ) { return(FALSE); }
+     $Yi = $Xi * (($Y1 - $Y2)/$C) + (($X1 * $Y2 - $X2 * $Y1)/$C);
+
+     if ( $Xi >= min($X1,$X2) && $Xi >= min($X3,$X4) && $Xi <= max($X1,$X2) && $Xi <= max($X3,$X4))
+      {
+       if ( $Yi >= min($Y1,$Y2) && $Yi >= min($Y3,$Y4) && $Yi <= max($Y1,$Y2) && $Yi <= max($Y3,$Y4))
+        { return(TRUE); }
+      }
+
+      return(FALSE);   
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pStock.class.php

@@ -0,0 +1,216 @@
+<?php
+ /*
+     pStock - class to draw stock charts
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("STOCK_MISSING_SERIE"	, 180001);
+
+ /* pStock class definition */
+ class pStock
+  {
+   var $pChartObject;
+   var $pDataObject;
+
+   /* Class creator */
+   function pStock($pChartObject,$pDataObject)
+    {
+     $this->pChartObject = $pChartObject;
+     $this->pDataObject  = $pDataObject;
+    }
+
+   /* Draw a stock chart */
+   function drawStockChart($Format="")
+    {
+     $SerieOpen		= isset($Format["SerieOpen"]) ? $Format["SerieOpen"] : "Open";
+     $SerieClose	= isset($Format["SerieClose"]) ? $Format["SerieClose"] : "Close";
+     $SerieMin		= isset($Format["SerieMin"]) ? $Format["SerieMin"] : "Min";
+     $SerieMax		= isset($Format["SerieMax"]) ? $Format["SerieMax"] : "Max";
+     $SerieMedian	= isset($Format["SerieMedian"]) ? $Format["SerieMedian"] : NULL;
+     $LineWidth		= isset($Format["LineWidth"]) ? $Format["LineWidth"] : 1;
+     $LineR		= isset($Format["LineR"]) ? $Format["LineR"] : 0;
+     $LineG		= isset($Format["LineG"]) ? $Format["LineG"] : 0;
+     $LineB		= isset($Format["LineB"]) ? $Format["LineB"] : 0;
+     $LineAlpha		= isset($Format["LineAlpha"]) ? $Format["LineAlpha"] : 100;
+     $ExtremityWidth	= isset($Format["ExtremityWidth"]) ? $Format["ExtremityWidth"] : 1;
+     $ExtremityLength	= isset($Format["ExtremityLength"]) ? $Format["ExtremityLength"] : 3;
+     $ExtremityR	= isset($Format["ExtremityR"]) ? $Format["ExtremityR"] : 0;
+     $ExtremityG	= isset($Format["ExtremityG"]) ? $Format["ExtremityG"] : 0;
+     $ExtremityB	= isset($Format["ExtremityB"]) ? $Format["ExtremityB"] : 0;
+     $ExtremityAlpha	= isset($Format["ExtremityAlpha"]) ? $Format["ExtremityAlpha"] : 100;
+     $BoxWidth		= isset($Format["BoxWidth"]) ? $Format["BoxWidth"] : 8;
+     $BoxUpR		= isset($Format["BoxUpR"]) ? $Format["BoxUpR"] : 188;
+     $BoxUpG		= isset($Format["BoxUpG"]) ? $Format["BoxUpG"] : 224;
+     $BoxUpB		= isset($Format["BoxUpB"]) ? $Format["BoxUpB"] : 46;
+     $BoxUpAlpha	= isset($Format["BoxUpAlpha"]) ? $Format["BoxUpAlpha"] : 100;
+     $BoxUpSurrounding	= isset($Format["BoxUpSurrounding"]) ? $Format["BoxUpSurrounding"] : NULL;
+     $BoxUpBorderR	= isset($Format["BoxUpBorderR"]) ? $Format["BoxUpBorderR"] : $BoxUpR-20;
+     $BoxUpBorderG	= isset($Format["BoxUpBorderG"]) ? $Format["BoxUpBorderG"] : $BoxUpG-20;
+     $BoxUpBorderB	= isset($Format["BoxUpBorderB"]) ? $Format["BoxUpBorderB"] : $BoxUpB-20;
+     $BoxUpBorderAlpha	= isset($Format["BoxUpBorderAlpha"]) ? $Format["BoxUpBorderAlpha"] : 100;
+     $BoxDownR		= isset($Format["BoxDownR"]) ? $Format["BoxDownR"] : 224;
+     $BoxDownG		= isset($Format["BoxDownG"]) ? $Format["BoxDownG"] : 100;
+     $BoxDownB		= isset($Format["BoxDownB"]) ? $Format["BoxDownB"] : 46;
+     $BoxDownAlpha	= isset($Format["BoxDownAlpha"]) ? $Format["BoxDownAlpha"] : 100;
+     $BoxDownSurrounding= isset($Format["BoxDownSurrounding"]) ? $Format["BoxDownSurrounding"] : NULL;
+     $BoxDownBorderR	= isset($Format["BoxDownBorderR"]) ? $Format["BoxDownBorderR"] : $BoxDownR-20;
+     $BoxDownBorderG	= isset($Format["BoxDownBorderG"]) ? $Format["BoxDownBorderG"] : $BoxDownG-20;
+     $BoxDownBorderB	= isset($Format["BoxDownBorderB"]) ? $Format["BoxDownBorderB"] : $BoxDownB-20;
+     $BoxDownBorderAlpha= isset($Format["BoxDownBorderAlpha"]) ? $Format["BoxDownBorderAlpha"] : 100;
+     $ShadowOnBoxesOnly	= isset($Format["ShadowOnBoxesOnly"]) ? $Format["ShadowOnBoxesOnly"] : TRUE;
+     $MedianR		= isset($Format["MedianR"]) ? $Format["MedianR"] : 255;
+     $MedianG		= isset($Format["MedianG"]) ? $Format["MedianG"] : 0;
+     $MedianB		= isset($Format["MedianB"]) ? $Format["MedianB"] : 0;
+     $MedianAlpha	= isset($Format["MedianAlpha"]) ? $Format["MedianAlpha"] : 100;
+     $RecordImageMap	= isset($Format["RecordImageMap"]) ? $Format["RecordImageMap"] : FALSE;
+     $ImageMapTitle	= isset($Format["ImageMapTitle"]) ? $Format["ImageMapTitle"] : "Stock Chart";
+
+
+     /* Data Processing */
+     $Data    = $this->pDataObject->getData();
+     $Palette = $this->pDataObject->getPalette();
+
+     if ( $BoxUpSurrounding != NULL )	{ $BoxUpBorderR = $BoxUpR + $BoxUpSurrounding; $BoxUpBorderG = $BoxUpG + $BoxUpSurrounding; $BoxUpBorderB = $BoxUpB + $BoxUpSurrounding; }
+     if ( $BoxDownSurrounding != NULL )	{ $BoxDownBorderR = $BoxDownR + $BoxDownSurrounding; $BoxDownBorderG = $BoxDownG + $BoxDownSurrounding; $BoxDownBorderB = $BoxDownB + $BoxDownSurrounding; }
+
+     if ( $LineWidth != 1 ) { $LineOffset = $LineWidth / 2; }
+     $BoxOffset = $BoxWidth / 2;
+
+     $Data = $this->pChartObject->DataSet->getData();
+     list($XMargin,$XDivs) = $this->pChartObject->scaleGetXSettings();
+
+     if ( !isset($Data["Series"][$SerieOpen]) || !isset($Data["Series"][$SerieClose]) || !isset($Data["Series"][$SerieMin]) || !isset($Data["Series"][$SerieMax]) )
+      return(STOCK_MISSING_SERIE);
+
+     $Plots = "";
+     foreach($Data["Series"][$SerieOpen]["Data"] as $Key => $Value)
+      {
+       $Point = "";
+       if ( isset($Data["Series"][$SerieClose]["Data"][$Key]) || isset($Data["Series"][$SerieMin]["Data"][$Key]) || isset($Data["Series"][$SerieMax]["Data"][$Key]) )
+        $Point = array($Value,$Data["Series"][$SerieClose]["Data"][$Key],$Data["Series"][$SerieMin]["Data"][$Key],$Data["Series"][$SerieMax]["Data"][$Key]);
+       if ( $SerieMedian != NULL && isset($Data["Series"][$SerieMedian]["Data"][$Key]) )
+        $Point[] = $Data["Series"][$SerieMedian]["Data"][$Key];
+
+       $Plots[] = $Point;
+      }
+
+     $AxisID	= $Data["Series"][$SerieOpen]["Axis"];
+     $Mode	= $Data["Axis"][$AxisID]["Display"];
+     $Format	= $Data["Axis"][$AxisID]["Format"];
+     $Unit	= $Data["Axis"][$AxisID]["Unit"];
+
+     $YZero	= $this->pChartObject->scaleComputeY(0,array("AxisID"=>$AxisID));
+     $XStep	= ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs;
+
+     $X = $this->pChartObject->GraphAreaX1 + $XMargin;
+     $Y = $this->pChartObject->GraphAreaY1 + $XMargin;
+
+     $LineSettings	= array("R"=>$LineR,"G"=>$LineG,"B"=>$LineB,"Alpha"=>$LineAlpha);
+     $ExtremitySettings	= array("R"=>$ExtremityR,"G"=>$ExtremityG,"B"=>$ExtremityB,"Alpha"=>$ExtremityAlpha);
+     $BoxUpSettings	= array("R"=>$BoxUpR,"G"=>$BoxUpG,"B"=>$BoxUpB,"Alpha"=>$BoxUpAlpha,"BorderR"=>$BoxUpBorderR,"BorderG"=>$BoxUpBorderG,"BorderB"=>$BoxUpBorderB,"BorderAlpha"=>$BoxUpBorderAlpha);
+     $BoxDownSettings	= array("R"=>$BoxDownR,"G"=>$BoxDownG,"B"=>$BoxDownB,"Alpha"=>$BoxDownAlpha,"BorderR"=>$BoxDownBorderR,"BorderG"=>$BoxDownBorderG,"BorderB"=>$BoxDownBorderB,"BorderAlpha"=>$BoxDownBorderAlpha);
+     $MedianSettings	= array("R"=>$MedianR,"G"=>$MedianG,"B"=>$MedianB,"Alpha"=>$MedianAlpha);
+
+     foreach($Plots as $Key =>$Points)
+      {
+       $PosArray = $this->pChartObject->scaleComputeY($Points,array("AxisID"=>$AxisID));
+
+       $Values = "Open :".$Data["Series"][$SerieOpen]["Data"][$Key]."<BR>Close : ".$Data["Series"][$SerieClose]["Data"][$Key]."<BR>Min : ".$Data["Series"][$SerieMin]["Data"][$Key]."<BR>Max : ".$Data["Series"][$SerieMax]["Data"][$Key]."<BR>";
+       if ( $SerieMedian != NULL ) { $Values = $Values."Median : ".$Data["Series"][$SerieMedian]["Data"][$Key]."<BR>"; }
+       if ( $PosArray[0] > $PosArray[1] ) { $ImageMapColor = $this->pChartObject->toHTMLColor($BoxUpR,$BoxUpG,$BoxUpB); } else { $ImageMapColor = $this->pChartObject->toHTMLColor($BoxDownR,$BoxDownG,$BoxDownB); } 
+
+       if ( $Data["Orientation"] == SCALE_POS_LEFTRIGHT )
+        {
+         if ( $YZero > $this->pChartObject->GraphAreaY2-1 ) { $YZero = $this->pChartObject->GraphAreaY2-1; }
+         if ( $YZero < $this->pChartObject->GraphAreaY1+1 ) { $YZero = $this->pChartObject->GraphAreaY1+1; }
+
+         if ( $XDivs == 0 ) { $XStep = 0; } else { $XStep = ($this->pChartObject->GraphAreaX2-$this->pChartObject->GraphAreaX1-$XMargin*2)/$XDivs; }
+
+         if ( $ShadowOnBoxesOnly ) { $RestoreShadow = $this->pChartObject->Shadow; $this->pChartObject->Shadow = FALSE; }
+
+         if ( $LineWidth == 1 )
+          $this->pChartObject->drawLine($X,$PosArray[2],$X,$PosArray[3],$LineSettings);
+         else
+          $this->pChartObject->drawFilledRectangle($X-$LineOffset,$PosArray[2],$X+$LineOffset,$PosArray[3],$LineSettings);
+
+         if ( $ExtremityWidth == 1 )
+          {
+           $this->pChartObject->drawLine($X-$ExtremityLength,$PosArray[2],$X+$ExtremityLength,$PosArray[2],$ExtremitySettings);
+           $this->pChartObject->drawLine($X-$ExtremityLength,$PosArray[3],$X+$ExtremityLength,$PosArray[3],$ExtremitySettings);
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($X-$ExtremityLength).",".floor($PosArray[2]).",".floor($X+$ExtremityLength).",".floor($PosArray[3]),$ImageMapColor,$ImageMapTitle,$Values); }
+          }
+         else
+          {
+           $this->pChartObject->drawFilledRectangle($X-$ExtremityLength,$PosArray[2],$X+$ExtremityLength,$PosArray[2]-$ExtremityWidth,$ExtremitySettings);
+           $this->pChartObject->drawFilledRectangle($X-$ExtremityLength,$PosArray[3],$X+$ExtremityLength,$PosArray[3]+$ExtremityWidth,$ExtremitySettings);
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($X-$ExtremityLength).",".floor($PosArray[2]-$ExtremityWidth).",".floor($X+$ExtremityLength).",".floor($PosArray[3]+$ExtremityWidth),$ImageMapColor,$ImageMapTitle,$Values); }
+          }
+
+         if ( $ShadowOnBoxesOnly ) { $this->pChartObject->Shadow = $RestoreShadow; }
+
+         if ( $PosArray[0] > $PosArray[1] )
+          $this->pChartObject->drawFilledRectangle($X-$BoxOffset,$PosArray[0],$X+$BoxOffset,$PosArray[1],$BoxUpSettings);
+         else
+          $this->pChartObject->drawFilledRectangle($X-$BoxOffset,$PosArray[0],$X+$BoxOffset,$PosArray[1],$BoxDownSettings);
+
+         if ( isset($PosArray[4]) )
+          $this->pChartObject->drawLine($X-$ExtremityLength,$PosArray[4],$X+$ExtremityLength,$PosArray[4],$MedianSettings);
+
+         $X = $X + $XStep;
+        }
+       elseif ( $Data["Orientation"] == SCALE_POS_TOPBOTTOM )
+        {
+         if ( $YZero > $this->pChartObject->GraphAreaX2-1 ) { $YZero = $this->pChartObject->GraphAreaX2-1; }
+         if ( $YZero < $this->pChartObject->GraphAreaX1+1 ) { $YZero = $this->pChartObject->GraphAreaX1+1; }
+
+         if ( $XDivs == 0 ) { $XStep = 0; } else { $XStep = ($this->pChartObject->GraphAreaY2-$this->pChartObject->GraphAreaY1-$XMargin*2)/$XDivs; }
+
+         if ( $LineWidth == 1 )
+          $this->pChartObject->drawLine($PosArray[2],$Y,$PosArray[3],$Y,$LineSettings);
+         else
+          $this->pChartObject->drawFilledRectangle($PosArray[2],$Y-$LineOffset,$PosArray[3],$Y+$LineOffset,$LineSettings);
+
+         if ( $ShadowOnBoxesOnly ) { $RestoreShadow = $this->pChartObject->Shadow; $this->pChartObject->Shadow = FALSE; }
+
+         if ( $ExtremityWidth == 1 )
+          {
+           $this->pChartObject->drawLine($PosArray[2],$Y-$ExtremityLength,$PosArray[2],$Y+$ExtremityLength,$ExtremitySettings);
+           $this->pChartObject->drawLine($PosArray[3],$Y-$ExtremityLength,$PosArray[3],$Y+$ExtremityLength,$ExtremitySettings);
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($PosArray[2]).",".floor($Y-$ExtremityLength).",".floor($PosArray[3]).",".floor($Y+$ExtremityLength),$ImageMapColor,$ImageMapTitle,$Values); }
+          }
+         else
+          {
+           $this->pChartObject->drawFilledRectangle($PosArray[2],$Y-$ExtremityLength,$PosArray[2]-$ExtremityWidth,$Y+$ExtremityLength,$ExtremitySettings);
+           $this->pChartObject->drawFilledRectangle($PosArray[3],$Y-$ExtremityLength,$PosArray[3]+$ExtremityWidth,$Y+$ExtremityLength,$ExtremitySettings);
+
+           if ( $RecordImageMap ) { $this->pChartObject->addToImageMap("RECT",floor($PosArray[2]-$ExtremityWidth).",".floor($Y-$ExtremityLength).",".floor($PosArray[3]+$ExtremityWidth).",".floor($Y+$ExtremityLength),$ImageMapColor,$ImageMapTitle,$Values); }
+          }
+
+         if ( $ShadowOnBoxesOnly ) { $this->pChartObject->Shadow = $RestoreShadow; }
+
+         if ( $PosArray[0] < $PosArray[1] )
+          $this->pChartObject->drawFilledRectangle($PosArray[0],$Y-$BoxOffset,$PosArray[1],$Y+$BoxOffset,$BoxUpSettings);
+         else
+          $this->pChartObject->drawFilledRectangle($PosArray[0],$Y-$BoxOffset,$PosArray[1],$Y+$BoxOffset,$BoxDownSettings);
+
+         if ( isset($PosArray[4]) )
+          $this->pChartObject->drawLine($PosArray[4],$Y-$ExtremityLength,$PosArray[4],$Y+$ExtremityLength,$MedianSettings);
+
+         $Y = $Y + $XStep;
+        }
+      }
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/class/pSurface.class.php

@@ -0,0 +1,315 @@
+<?php
+ /*
+     pSurface - class to draw surface charts
+
+     Version     : 2.1.3
+     Made by     : Jean-Damien POGOLOTTI
+     Last Update : 09/09/11
+
+     This file can be distributed under the license you can find at :
+
+                       http://www.pchart.net/license
+
+     You can find the whole class documentation on the pChart web site.
+ */
+
+ define("UNKNOWN"		, 0.123456789);
+ define("IGNORED"		, -1);
+
+ define("LABEL_POSITION_LEFT"	, 880001);
+ define("LABEL_POSITION_RIGHT"	, 880002);
+ define("LABEL_POSITION_TOP"	, 880003);
+ define("LABEL_POSITION_BOTTOM"	, 880004);
+
+ /* pStock class definition */
+ class pSurface
+  {
+   var $pChartObject;
+   var $GridSizeX;
+   var $GridSizeY;
+   var $Points;
+
+   /* Class creator */
+   function pSurface($pChartObject)
+    {
+     $this->pChartObject = $pChartObject;
+     $this->GridSize     = 10;
+     $this->Points       = "";
+    }
+
+   /* Define the grid size and initialise the 2D matrix */
+   function setGrid($XSize=10,$YSize=10)
+    {
+     for($X=0; $X<=$XSize; $X++) { for($Y=0; $Y<=$YSize; $Y++) { $this->Points[$X][$Y]=UNKNOWN; } } 
+
+     $this->GridSizeX = $XSize;
+     $this->GridSizeY = $YSize;
+    }
+
+   /* Add a point on the grid */
+   function addPoint($X,$Y,$Value,$Force=TRUE)
+    {
+     if ( $X < 0 || $X >$this->GridSizeX ) { return(0); }
+     if ( $Y < 0 || $Y >$this->GridSizeY ) { return(0); }
+
+     if ( $this->Points[$X][$Y] == UNKNOWN || $Force )
+      $this->Points[$X][$Y] = $Value;
+     elseif ( $this->Points[$X][$Y] == UNKNOWN )
+      $this->Points[$X][$Y] = $Value;
+     else
+      $this->Points[$X][$Y] = ($this->Points[$X][$Y] + $Value)/2;
+    }
+
+   /* Write the X labels */
+   function writeXLabels($Format="")
+    {
+     $R			= isset($Format["R"]) ? $Format["R"] : $this->pChartObject->FontColorR;
+     $G			= isset($Format["G"]) ? $Format["G"] : $this->pChartObject->FontColorG;
+     $B			= isset($Format["B"]) ? $Format["B"] : $this->pChartObject->FontColorB;
+     $Alpha		= isset($Format["Alpha"]) ? $Format["Alpha"] : $this->pChartObject->FontColorA;
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $Padding		= isset($Format["Padding"]) ? $Format["Padding"] : 5;
+     $Position		= isset($Format["Position"]) ? $Format["Position"] : LABEL_POSITION_TOP;
+     $Labels		= isset($Format["Labels"]) ? $Format["Labels"] : NULL;
+     $CountOffset	= isset($Format["CountOffset"]) ? $Format["CountOffset"] : 0;
+
+     if ( $Labels != NULL && !is_array($Labels) ) { $Label = $Labels; $Labels = ""; $Labels[] = $Label; }
+
+     $X0    = $this->pChartObject->GraphAreaX1;
+     $XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
+
+     $Settings = array("Angle"=>$Angle,"R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+     if ( $Position == LABEL_POSITION_TOP )
+      {
+       $YPos  = $this->pChartObject->GraphAreaY1 - $Padding;
+       if ($Angle == 0 ) { $Settings["Align"] = TEXT_ALIGN_BOTTOMMIDDLE; }
+       if ($Angle != 0 ) { $Settings["Align"] = TEXT_ALIGN_MIDDLELEFT; }
+      }
+     elseif ( $Position == LABEL_POSITION_BOTTOM )
+      {
+       $YPos  = $this->pChartObject->GraphAreaY2 + $Padding;
+       if ($Angle == 0 ) { $Settings["Align"] = TEXT_ALIGN_TOPMIDDLE; }
+       if ($Angle != 0 ) { $Settings["Align"] = TEXT_ALIGN_MIDDLERIGHT; }
+      }
+     else
+      return(-1);
+
+     for($X=0;$X<=$this->GridSizeX;$X++)
+      {
+       $XPos = floor($X0+$X*$XSize + $XSize/2);
+
+       if( $Labels == NULL || !isset($Labels[$X]) )
+        $Value = $X+$CountOffset;
+       else
+        $Value = $Labels[$X];
+
+       $this->pChartObject->drawText($XPos,$YPos,$Value,$Settings);
+      }
+    }
+
+   /* Write the Y labels */
+   function writeYLabels($Format="")
+    {
+     $R			= isset($Format["R"]) ? $Format["R"] : $this->pChartObject->FontColorR;
+     $G			= isset($Format["G"]) ? $Format["G"] : $this->pChartObject->FontColorG;
+     $B			= isset($Format["B"]) ? $Format["B"] : $this->pChartObject->FontColorB;
+     $Alpha		= isset($Format["Alpha"]) ? $Format["Alpha"] : $this->pChartObject->FontColorA;
+     $Angle		= isset($Format["Angle"]) ? $Format["Angle"] : 0;
+     $Padding		= isset($Format["Padding"]) ? $Format["Padding"] : 5;
+     $Position		= isset($Format["Position"]) ? $Format["Position"] : LABEL_POSITION_LEFT;
+     $Labels		= isset($Format["Labels"]) ? $Format["Labels"] : NULL;
+     $CountOffset	= isset($Format["CountOffset"]) ? $Format["CountOffset"] : 0;
+
+     if ( $Labels != NULL && !is_array($Labels) ) { $Label = $Labels; $Labels = ""; $Labels[] = $Label; }
+
+     $Y0    = $this->pChartObject->GraphAreaY1;
+     $YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
+
+     $Settings = array("Angle"=>$Angle,"R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+     if ( $Position == LABEL_POSITION_LEFT )
+      { $XPos  = $this->pChartObject->GraphAreaX1 - $Padding; $Settings["Align"] = TEXT_ALIGN_MIDDLERIGHT; }
+     elseif ( $Position == LABEL_POSITION_RIGHT )
+      { $XPos  = $this->pChartObject->GraphAreaX2 + $Padding; $Settings["Align"] = TEXT_ALIGN_MIDDLELEFT; }
+     else
+      return(-1);
+
+     for($Y=0;$Y<=$this->GridSizeY;$Y++)
+      {
+       $YPos = floor($Y0+$Y*$YSize + $YSize/2);
+
+       if( $Labels == NULL || !isset($Labels[$Y]) )
+        $Value = $Y+$CountOffset;
+       else
+        $Value = $Labels[$Y];
+
+       $this->pChartObject->drawText($XPos,$YPos,$Value,$Settings);
+      }
+    }
+
+   /* Draw the area arround the specified Threshold */
+   function drawContour($Threshold,$Format="")
+    {
+     $R		= isset($Format["R"]) ? $Format["R"] : 0;
+     $G		= isset($Format["G"]) ? $Format["G"] : 0;
+     $B		= isset($Format["B"]) ? $Format["B"] : 0;
+     $Alpha	= isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
+     $Ticks	= isset($Format["Ticks"]) ? $Format["Ticks"] : 3;
+     $Padding	= isset($Format["Padding"]) ? $Format["Padding"] : 0;
+
+     $X0    = $this->pChartObject->GraphAreaX1;
+     $Y0    = $this->pChartObject->GraphAreaY1;
+     $XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
+     $YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
+
+     $Color = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha,"Ticks"=>$Ticks);
+
+     for($X=0;$X<=$this->GridSizeX;$X++)
+      {
+       for($Y=0;$Y<=$this->GridSizeY;$Y++)
+        {
+         $Value = $this->Points[$X][$Y];
+
+         if ( $Value != UNKNOWN && $Value != IGNORED && $Value >= $Threshold)
+          {
+           $X1 = floor($X0+$X*$XSize)+$Padding;
+           $Y1 = floor($Y0+$Y*$YSize)+$Padding;
+           $X2 = floor($X0+$X*$XSize+$XSize);
+           $Y2 = floor($Y0+$Y*$YSize+$YSize);
+
+           if ( $X > 0 && $this->Points[$X-1][$Y] != UNKNOWN && $this->Points[$X-1][$Y] != IGNORED && $this->Points[$X-1][$Y] < $Threshold)
+            $this->pChartObject->drawLine($X1,$Y1,$X1,$Y2,$Color);
+           if ( $Y > 0 && $this->Points[$X][$Y-1] != UNKNOWN && $this->Points[$X][$Y-1] != IGNORED && $this->Points[$X][$Y-1] < $Threshold)
+            $this->pChartObject->drawLine($X1,$Y1,$X2,$Y1,$Color);
+           if ( $X < $this->GridSizeX && $this->Points[$X+1][$Y] != UNKNOWN && $this->Points[$X+1][$Y] != IGNORED && $this->Points[$X+1][$Y] < $Threshold)
+            $this->pChartObject->drawLine($X2,$Y1,$X2,$Y2,$Color);
+           if ( $Y < $this->GridSizeY && $this->Points[$X][$Y+1] != UNKNOWN && $this->Points[$X][$Y+1] != IGNORED && $this->Points[$X][$Y+1] < $Threshold)
+            $this->pChartObject->drawLine($X1,$Y2,$X2,$Y2,$Color);
+          }
+        }
+      }
+    }
+
+   /* Draw the surface chart */
+   function drawSurface($Format="")
+    {
+     $Palette		= isset($Format["Palette"]) ? $Format["Palette"] : NULL;
+     $ShadeR1		= isset($Format["ShadeR1"]) ? $Format["ShadeR1"] : 77;
+     $ShadeG1		= isset($Format["ShadeG1"]) ? $Format["ShadeG1"] : 205;
+     $ShadeB1		= isset($Format["ShadeB1"]) ? $Format["ShadeB1"] : 21;
+     $ShadeA1		= isset($Format["ShadeA1"]) ? $Format["ShadeA1"] : 40;
+     $ShadeR2		= isset($Format["ShadeR2"]) ? $Format["ShadeR2"] : 227;
+     $ShadeG2		= isset($Format["ShadeG2"]) ? $Format["ShadeG2"] : 135;
+     $ShadeB2		= isset($Format["ShadeB2"]) ? $Format["ShadeB2"] : 61;
+     $ShadeA2		= isset($Format["ShadeA2"]) ? $Format["ShadeA2"] : 100;
+     $Border		= isset($Format["Border"]) ? $Format["Border"] : FALSE;
+     $BorderR		= isset($Format["BorderR"]) ? $Format["BorderR"] : 0;
+     $BorderG		= isset($Format["BorderG"]) ? $Format["BorderG"] : 0;
+     $BorderB		= isset($Format["BorderB"]) ? $Format["BorderB"] : 0;
+     $Surrounding	= isset($Format["Surrounding"]) ? $Format["Surrounding"] : -1;
+     $Padding		= isset($Format["Padding"]) ? $Format["Padding"] : 1;
+
+     $X0    = $this->pChartObject->GraphAreaX1;
+     $Y0    = $this->pChartObject->GraphAreaY1;
+     $XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
+     $YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
+
+     for($X=0;$X<=$this->GridSizeX;$X++)
+      {
+       for($Y=0;$Y<=$this->GridSizeY;$Y++)
+        {
+         $Value = $this->Points[$X][$Y];
+
+         if ( $Value != UNKNOWN && $Value != IGNORED )
+          {
+           $X1 = floor($X0+$X*$XSize)+$Padding;
+           $Y1 = floor($Y0+$Y*$YSize)+$Padding;
+           $X2 = floor($X0+$X*$XSize+$XSize);
+           $Y2 = floor($Y0+$Y*$YSize+$YSize);
+
+           if ( $Palette != NULL )
+            {
+             if ( isset($Palette[$Value]) && isset($Palette[$Value]["R"]) ) { $R = $Palette[$Value]["R"]; } else { $R = 0; }
+             if ( isset($Palette[$Value]) && isset($Palette[$Value]["G"]) ) { $G = $Palette[$Value]["G"]; } else { $G = 0; }
+             if ( isset($Palette[$Value]) && isset($Palette[$Value]["B"]) ) { $B = $Palette[$Value]["B"]; } else { $B = 0; }
+             if ( isset($Palette[$Value]) && isset($Palette[$Value]["Alpha"]) ) { $Alpha = $Palette[$Value]["Alpha"]; } else { $Alpha = 1000; }
+            }
+           else
+            {
+             $R = (($ShadeR2-$ShadeR1)/100)*$Value + $ShadeR1;
+             $G = (($ShadeG2-$ShadeG1)/100)*$Value + $ShadeG1;
+             $B = (($ShadeB2-$ShadeB1)/100)*$Value + $ShadeB1;
+             $Alpha = (($ShadeA2-$ShadeA1)/100)*$Value + $ShadeA1;
+            }
+
+           $Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
+           if ( $Border ) { $Settings["BorderR"] = $BorderR; $Settings["BorderG"] = $BorderG; $Settings["BorderB"] = $BorderB; }
+           if ( $Surrounding != -1 ) { $Settings["BorderR"] = $R+$Surrounding; $Settings["BorderG"] = $G+$Surrounding; $Settings["BorderB"] = $B+$Surrounding; }
+
+           $this->pChartObject->drawFilledRectangle($X1,$Y1,$X2-1,$Y2-1,$Settings);
+          }
+        }
+      }
+    }
+
+   /* Compute the missing points */
+   function computeMissing()
+    {
+     $Missing = "";
+     for($X=0;$X<=$this->GridSizeX;$X++)
+      {
+       for($Y=0;$Y<=$this->GridSizeY;$Y++)
+        {
+         if ( $this->Points[$X][$Y] == UNKNOWN )
+          $Missing[] = $X.",".$Y;
+        }
+      }
+     shuffle($Missing);
+     
+     foreach($Missing as $Key => $Pos)
+      {
+       $Pos = preg_split("/,/",$Pos);
+       $X   = $Pos[0];
+       $Y   = $Pos[1];
+
+       if ( $this->Points[$X][$Y] == UNKNOWN )
+        {
+         $NearestNeighbor = $this->getNearestNeighbor($X,$Y);
+
+         $Value = 0; $Points = 0;
+         for($Xi=$X-$NearestNeighbor;$Xi<=$X+$NearestNeighbor;$Xi++)
+          {
+           for($Yi=$Y-$NearestNeighbor;$Yi<=$Y+$NearestNeighbor;$Yi++)
+            {
+             if ($Xi >=0 && $Yi >= 0 && $Xi <= $this->GridSizeX && $Yi <= $this->GridSizeY && $this->Points[$Xi][$Yi] != UNKNOWN && $this->Points[$Xi][$Yi] != IGNORED)
+              {
+               $Value = $Value + $this->Points[$Xi][$Yi]; $Points++;
+              }
+            }
+          }
+
+         if ( $Points != 0 ) { $this->Points[$X][$Y] = $Value / $Points; }
+        }
+      }
+    }
+
+   /* Return the nearest Neighbor distance of a point */
+   function getNearestNeighbor($Xp,$Yp)
+    {
+     $Nearest = UNKNOWN;
+     for($X=0;$X<=$this->GridSizeX;$X++)
+      {
+       for($Y=0;$Y<=$this->GridSizeY;$Y++)
+        {
+         if ( $this->Points[$X][$Y] != UNKNOWN && $this->Points[$X][$Y] != IGNORED )
+          {
+           $DistanceX = max($Xp,$X)-min($Xp,$X);
+           $DistanceY = max($Yp,$Y)-min($Yp,$Y);
+           $Distance  = max($DistanceX,$DistanceY);
+           if ( $Distance < $Nearest || $Nearest == UNKNOWN ) { $Nearest = $Distance; }
+          }
+        }
+      }
+     return($Nearest);
+    }
+  }
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/data/128B.db

@@ -0,0 +1,107 @@
+0;32;11011001100
+1;33;11001101100
+2;34;11001100110
+3;35;10010011000
+4;36;10010001100
+5;37;10001001100
+6;38;10011001000
+7;39;10011000100
+8;40;10001100100
+9;41;11001001000
+10;42;11001000100
+11;43;11000100100
+12;44;10110011100
+13;45;10011011100
+14;46;10011001110
+15;47;10111001100
+16;48;10011101100
+17;49;10011100110
+18;50;11001110010
+19;51;11001011100
+20;52;11001001110
+21;53;11011100100
+22;54;11001110100
+23;55;11101101110
+24;56;11101001100
+25;57;11100101100
+26;58;11100100110
+27;59;11101100100
+28;60;11100110100
+29;61;11100110010
+30;62;11011011000
+31;63;11011000110
+32;64;11000110110
+33;65;10100011000
+34;66;10001011000
+35;67;10001000110
+36;68;10110001000
+37;69;10001101000
+38;70;10001100010
+39;71;11010001000
+40;72;11000101000
+41;73;11000100010
+42;74;10110111000
+43;75;10110001110
+44;76;10001101110
+45;77;10111011000
+46;78;10111000110
+47;79;10001110110
+48;80;11101110110
+49;81;11010001110
+50;82;11000101110
+51;83;11011101000
+52;84;11011100010
+53;85;11011101110
+54;86;11101011000
+55;87;11101000110
+56;88;11100010110
+57;89;11101101000
+58;90;11101100010
+59;91;11100011010
+60;92;11101111010
+61;93;11001000010
+62;94;11110001010
+63;95;10100110000
+64;96;10100001100
+65;97;10010110000
+66;98;10010000110
+67;99;10000101100
+68;100;10000100110
+69;101;10110010000
+70;102;10110000100
+71;103;10011010000
+72;104;10011000010
+73;105;10000110100
+74;106;10000110010
+75;107;11000010010
+76;108;11001010000
+77;109;11110111010
+78;110;11000010100
+79;111;10001111010
+80;112;10100111100
+81;113;10010111100
+82;114;10010011110
+83;115;10111100100
+84;116;10011110100
+85;117;10011110010
+86;118;11110100100
+87;119;11110010100
+88;120;11110010010
+89;121;11011011110
+90;122;11011110110
+91;123;11110110110
+92;124;10101111000
+93;125;10100011110
+94;126;10001011110
+95;200;10111101000
+96;201;10111100010
+97;202;11110101000
+98;203;11110100010
+99;204;10111011110
+100;205;10111101110
+101;206;11101011110
+102;207;11110101110
+103;208;11010000100
+104;209;11010010000
+105;210;11010011100
+106;211;1100011101011

tags/semmelstatzR_1_0_0_beta/includes/pChart/data/39.db

@@ -0,0 +1,44 @@
+0;101001101101
+1;110100101011
+2;101100101011
+3;110110010101
+4;101001101011
+5;110100110101
+6;101100110101
+7;101001011011
+8;110100101101
+9;101100101101
+A;110101001011
+B;101101001011
+C;110110100101
+D;101011001011
+E;110101100101
+F;101101100101
+G;101010011011
+H;110101001101
+I;101101001101
+J;101011001101
+K;110101010011
+L;101101010011
+M;110110101001
+N;101011010011
+O;110101101001
+P;101101101001
+Q;101010110011
+R;110101011001
+S;101101011001
+T;101011011001
+U;110010101011
+V;100110101011
+W;110011010101
+X;100101101011
+Y;110010110101
+Z;100110110101
+-;100101011011
+.;110010101101
+ ;100110101101
+$;100100100101
+/;100100101001
++;100101001001
+%;101001001001
+*;100101101101

tags/semmelstatzR_1_0_0_beta/includes/pChart/index.php

@@ -0,0 +1,6 @@
+<?php
+ /* If you crawl here, you may want to see the examples */
+
+ header('Location: /');
+ exit();
+?>

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/autumn.color

@@ -0,0 +1,6 @@
+185,106,154,100
+216,137,184,100
+156,192,137,100
+216,243,201,100
+253,232,215,100
+255,255,255,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/blind.color

@@ -0,0 +1,6 @@
+109,152,171,100
+0,39,94,100
+254,183,41,100
+168,177,184,100
+255,255,255,100
+0,0,0,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/evening.color

@@ -0,0 +1,6 @@
+242,245,237,100
+255,194,0,100
+255,91,0,100
+184,0,40,100
+132,0,46,100
+74,192,242,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/kitchen.color

@@ -0,0 +1,6 @@
+155,225,251,100
+197,239,253,100
+189,32,49,100
+35,31,32,100
+255,255,255,100
+0,98,149,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/light.color

@@ -0,0 +1,7 @@
+239,210,121,100
+149,203,233,100
+2,71,105,100
+175,215,117,100
+44,87,0,100
+222,157,127,100
+

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/navy.color

@@ -0,0 +1,6 @@
+25,78,132,100
+59,107,156,100
+31,36,42,100
+55,65,74,100
+96,187,34,100
+242,186,187,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/shade.color

@@ -0,0 +1,6 @@
+117,113,22,100
+174,188,33,100
+217,219,86,100
+0,71,127,100
+76,136,190,100
+141,195,233,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/spring.color

@@ -0,0 +1,6 @@
+146,123,81,100
+168,145,102,100
+128,195,28,100
+188,221,90,100
+255,121,0,100
+251,179,107,100

tags/semmelstatzR_1_0_0_beta/includes/pChart/palettes/summer.color

@@ -0,0 +1,6 @@
+253,184,19,100
+246,139,31,100
+241,112,34,100
+98,194,204,100
+228,246,248,100
+238,246,108,100

tags/semmelstatzR_1_0_0_beta/locale/semmelstatzR-de_DE.po

@@ -0,0 +1,90 @@
+msgid ""
+msgstr ""
+"Project-Id-Version: semmelstatzR\n"
+"Report-Msgid-Bugs-To: \n"
+"POT-Creation-Date: 2011-08-23 18:59+0100\n"
+"PO-Revision-Date: 2011-08-23 18:59+0100\n"
+"Last-Translator: Ortwin Pinke <translation@dceonline.de>\n"
+"Language-Team: \n"
+"MIME-Version: 1.0\n"
+"Content-Type: text/plain; charset=UTF-8\n"
+"Content-Transfer-Encoding: 8bit\n"
+"X-Poedit-KeywordsList: __;_e;_n:1,2;_c;_ngettext:1,2;_x:2c,1;semr_i18n\n"
+"X-Poedit-Basepath: ../../\n"
+"Plural-Forms: nplurals=2; plural=n != 1;\n"
+"X-Poedit-Language: German\n"
+"X-Poedit-SourceCharset: utf-8\n"
+"X-Poedit-Country: GERMANY\n"
+"X-Poedit-SearchPath-0: semmelstatzR\n"
+
+#: semmelstatzR/semmelstatzR.php:96
+msgid "Current Statz"
+msgstr "Aktuell"
+
+#: semmelstatzR/semmelstatzR.php:97
+msgid "History"
+msgstr "Historie"
+
+#: semmelstatzR/semmelstatzR.php:98
+msgid "Log"
+msgstr "Log"
+
+#: semmelstatzR/semmelstatzR.php:99
+msgid "Database"
+msgstr "Datenbank"
+
+#: semmelstatzR/semmelstatzR.php:100
+msgid "Templates"
+msgstr "Templates"
+
+#: semmelstatzR/semmelstatzR.php:101
+msgid "Options"
+msgstr "Optionen"
+
+#: semmelstatzR/semmelstatzR.php:273
+#, php-format
+msgid "%d Visitor online"
+msgid_plural "%d Visitors online"
+msgstr[0] "%d Besucher online"
+msgstr[1] "%d Besucher online"
+
+#: semmelstatzR/semmelstatzR.php:275
+#, php-format
+msgid "Today: %s"
+msgstr "Heute: %s"
+
+#: semmelstatzR/semmelstatzR.php:276
+msgid "more..."
+msgstr "mehr..."
+
+#: semmelstatzR/semmelstatzR.php:296
+msgid "Number of Items (max. 10):"
+msgstr "Anzahl der Einträge (max. 20):"
+
+#: semmelstatzR/semmelstatzR.php:319
+msgid "... no entries"
+msgstr "... keine Einträge"
+
+#: semmelstatzR/semmelstatzR.php:327
+#, php-format
+msgid "%d Visitor"
+msgid_plural "%d Visitors"
+msgstr[0] "%d Besucher"
+msgstr[1] "%d Besucher"
+
+#: semmelstatzR/semmelstatzR.php:328
+#, php-format
+msgid "%d Hit"
+msgid_plural "%d Hits"
+msgstr[0] "%d Aufruf"
+msgstr[1] "%d Aufrufe"
+
+#: semmelstatzR/semmelstatzR.php:329
+#, php-format
+msgid "%d Referrer"
+msgid_plural "%d Referrers"
+msgstr[0] "%d Referer"
+msgstr[1] "%d Referer"
+
+#~ msgid "Number of Whatever:"
+#~ msgstr "Anzahl von Was auch immer:"

tags/semmelstatzR_1_0_0_beta/semmelstatzR-database.php

@@ -0,0 +1,127 @@
+<?php
+/**
+ * file semmelstatzR_database.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+
+if(current_user_can('manage_statz')) {
+
+    global $wpdb;
+    $pre = $wpdb->prefix; $lenpre = strlen($pre);
+    $tablesstatus = $wpdb->get_results("SHOW TABLE STATUS");
+
+    print "<div class='wrap'>";
+    print "<div><a name='top'></a></div>";
+    print "<div id='icon-semmelstatzR' class='icon32'><br /></div>";
+    print "<h2>SemmelstatzR &rsaquo; Datenbank</h2>";
+
+    print "<div class='statz'>Datenbank</div>";
+        print "<table class='statzelement'>";
+    print "<tr>";
+    print "<th style='text-align:center;width:6%'>Nr.</th>";
+    print "<th style='text-align:left;width:20%'>Tabellen</th>";
+    print "<th style='text-align:right;width:10%'>Datens&auml;tze</th>";
+    print "<th style='text-align:right;width:10%'>Daten</th>";
+    print "<th style='text-align:right;width:10%'>Index</th>";
+    print "<th style='text-align:right;width:10%'>Daten & Index</th>";
+    print "<th style='text-align:right;width:7%'>&Uuml;berhang</th>";
+    
+    $row_usage = 0;
+    $data_usage = 0;
+    $index_usage = 0;
+    $total_usage = 0;
+    $overhead_usage = 0;
+    foreach($tablesstatus as $key=>$tablestatus) {
+
+        if(substr($tablestatus->Name,0,$lenpre) != $pre) continue;
+
+        print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+        print "<td style='text-align:center;'>".($key+1)."</td>";
+        print "<td style='text-align:left;'>".$tablestatus->Name."</td>";
+        print "<td style='text-align:right;'>".number_format($tablestatus->Rows,0,',','.')."</td>";
+        print "<td style='text-align:right;'>".number_format($tablestatus->Data_length/1024,0,',','.')."&nbsp;kb</td>";
+        print "<td style='text-align:right;'>".number_format($tablestatus->Index_length/1024,0,',','.')."&nbsp;kb</td>";
+        print "<td style='text-align:right;'>".number_format(($tablestatus->Data_length + $tablestatus->Index_length)/1024,0,',','.')."&nbsp;kb</td>";
+
+        if($tablestatus->Data_free > 0) {
+        print "<td style='color:#ff0000;text-align:right;'>";
+        print "&nbsp;".number_format($tablestatus->Data_free/1024,2,',','.')."&nbsp;kb"; 
+        print "</td>";
+        }
+        else {
+        print "<td style='text-align:right;'>--</td>";
+        }
+
+        $row_usage += $tablestatus->Rows;
+        $data_usage += $tablestatus->Data_length;
+        $index_usage +=  $tablestatus->Index_length;
+        $total_usage += $tablestatus->Data_length + $tablestatus->Index_length;
+        $overhead_usage += $tablestatus->Data_free;
+        echo '</tr>';
+    }
+
+    print "<tr>";
+    print "<th style='text-align:center;'>Gesamt</th>";
+    print "<th style='text-align:left;'>&nbsp;</th>";
+    print "<th style='text-align:right;'>".number_format($row_usage,0,',','.')."</th>";
+    print "<th style='text-align:right;'>".number_format($data_usage/1024,0,',','.')."&nbsp;kb</th>";
+    print "<th style='text-align:right;'>".number_format($index_usage/1024,0,',','.')."&nbsp;kb</th>";
+    print "<th style='text-align:right;'>".number_format($total_usage/1024,0,',','.')."&nbsp;kb</th>";
+    print "<th style='color:#ff0000;text-align:right;'>".number_format($overhead_usage/1024,2,',','.')."&nbsp;kb</th>";
+    print "</tr>";
+
+    print "<tr><td colspan='7'><p align='right'>Es werden ausschlie&szlig;lich die WORDPRESS-Tabellen angezeigt, die zum Blog <b>'".get_option('blogname')."'</b> geh&ouml;ren.</p></td></tr>";
+
+    print "</table>";
+    print "<hr />";
+
+    sem_showCopyright();
+
+    print "</div>";
+
+} else {
+    echo '<p>No permission to access this area</p>';
+}
+	
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR-history.php

@@ -0,0 +1,302 @@
+<?php
+/**
+ * file semmelstatzR_history.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+ 
+ if(!current_user_can('manage_statz')) {
+	die('Zugriff verweigert');
+}
+
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pData.class.php';
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pDraw.class.php';
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pImage.class.php';
+
+function sem_drawLast30DaysGoo() {
+    global $wpdb;
+
+    //$sql = $wpdb->get_results("ALTER TABLE ".$wpdb->statzhist." ORDER BY date ASC");
+    $results = $wpdb->get_results("SELECT DAY(date) as days, visitors FROM ".$wpdb->statzhist." WHERE date >= NOW() - INTERVAL 31 DAY ORDER BY date ASC");
+
+    print "<div class='statz'>Besucher: Die letzten 30 Tage</div>";
+    print "<div align='left'>";
+
+    if (empty($results)) {
+    print "<small>... noch keine Eintr&auml;ge</small></div>";
+    return;
+    }
+
+    foreach ($results as $result) {
+    $visitors[] = $result->visitors;
+    $days[] = $result->days;
+    }
+
+    $maxvalue = max($visitors);
+    $daylabels = implode('|', $days);
+    
+    $MyData = new pData();  
+    $MyData->addPoints($visitors,"Visitors");
+    $MyData->setAxisName(0,"Hits");
+    $MyData->addPoints($days,"Days");
+    $MyData->setAbscissa("Days");
+   
+    $myPicture = new pImage(780,150,$MyData);    
+    $myPicture->Antialias = FALSE;    
+    $myPicture->drawRectangle(0,0,779,149,array("R"=>0,"G"=>0,"B"=>0));   
+    $myPicture->setFontProperties(array("FontName"=>plugin_dir_path(__FILE__)."includes/pChart/fonts/Bedizen.ttf","FontSize"=>8));    
+    $myPicture->setGraphArea(30,20,760,130);
+    $scaleSettings = array("GridR"=>200,"GridG"=>200,"GridB"=>200);
+    $myPicture->drawScale($scaleSettings);
+    $myPicture->drawBarChart();
+    @$myPicture->Render(WP_CONTENT_DIR."/cache/Last30DaysGoo.png"); 
+
+    print "<div class='chart'>";
+
+    //print "<img src=http://chart.apis.google.com/chart?chg=25,25&chxl=0:|".$daylabels."|1:|0|".$maxvalue."&chbh=a&cht=bvs&chs=600x150&chxt=x,y&chd=".sem_encodeChartData($visitors).">";
+    if(is_readable(WP_CONTENT_DIR."/cache/Last30DaysGoo.png")) {
+        print '<img src="'.WP_CONTENT_URL.'/cache/Last30DaysGoo.png" />';
+    } else if(!is_dir(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Cannot find cache-folder!');
+    } else if(!is_writable(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Missing rights for cache-folder!');
+    }
+    print "</div>";
+
+    print "</div>";
+    print "<hr />";
+	}
+	
+### HISTORY Monatsgrafik GOOGLE-API
+
+	function sem_drawAllMonthGoo() {
+		global $wpdb;
+        
+		$nummonths = $wpdb->get_var("SELECT MONTH(date) FROM ".$wpdb->statzhist);
+		$results = $wpdb->get_results("SELECT MONTH(date) as months, SUM(visitors) as visitors FROM ".$wpdb->statzhist." GROUP BY months ORDER BY date ASC");
+		
+		print "<div class='statz'>Besucher: Die letzten ".$nummonths." Monate</div>";
+        print "<div align='left'>";
+		
+			if (empty($results)) {
+				print "<small>... noch keine Eintr&auml;ge</small></div>";
+				return;
+			}
+			
+			foreach ($results as $result) {
+				$visitors[] = $result->visitors;
+				$months[] = $result->months;
+			}
+			
+			$maxvalue = max($visitors);			
+			$monthlabels = implode('|', $months);
+   
+   $MyData = new pData();  
+    $MyData->addPoints($visitors,"Visitors");
+    $MyData->setAxisName(0,"Hits");
+    $MyData->addPoints($months,"Month");
+    $MyData->setAbscissa("Month");
+   
+    $myPicture = new pImage(780,150,$MyData);    
+    $myPicture->Antialias = FALSE;    
+    $myPicture->drawRectangle(0,0,779,149,array("R"=>0,"G"=>0,"B"=>0));   
+    $myPicture->setFontProperties(array("FontName"=>plugin_dir_path(__FILE__)."includes/pChart/fonts/Bedizen.ttf","FontSize"=>8));    
+    $myPicture->setGraphArea(30,20,760,130);
+    $scaleSettings = array("GridR"=>200,"GridG"=>200,"GridB"=>200);
+    $myPicture->drawScale($scaleSettings);
+    $myPicture->drawBarChart();
+    @$myPicture->Render(WP_CONTENT_DIR."/cache/AllMonthGoo.png"); 
+			
+			print "<div class='chart'>";
+		
+				//print "<img src=http://chart.apis.google.com/chart?chg=25,25&chxt=x,y&chxl=0:|".$monthlabels."|1:|0|".$maxvalue."&chbh=a&cht=bvs&chs=600x150&chd=".sem_encodeChartData($visitors).">";
+			if(is_readable(WP_CONTENT_DIR."/cache/AllMonthGoo.png")) {
+        print '<img src="'.WP_CONTENT_URL.'/cache/AllMonthGoo.png" />';
+    } else if(!is_dir(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Cannot find cache-folder!');
+    } else if(!is_writable(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Missing rights for cache-folder!');
+    }
+			print "</div>";
+			
+		print "</div>";
+		print "<hr />";
+	}
+	
+### HISTORY ALLE historischen Tage
+
+function sem_drawAllDaysGoo() {
+    /* @var $wpdb wpdb */
+    global $wpdb;
+
+    $numdays = $wpdb->get_var("SELECT COUNT(date) FROM ".$wpdb->statzhist);
+
+    $results = $wpdb->get_results("SELECT referers, visitors, hits, substring(date,1,10) AS date
+    FROM ".$wpdb->statzhist." GROUP BY date ORDER BY date ASC");
+    
+
+    print "<div class='statz'>Besucher: ".$numdays." Tage zur&uuml;ck</div>";
+    print "<div align='left'>";
+
+    if (empty($results)) {
+    print "<small>... noch keine Eintr&auml;ge</small></div>";
+    return;
+    }
+
+    foreach($results as $result) {
+    $visitors[] = $result->visitors;
+    $hits[] = $result->hits;
+    $referers[] = $result->referers;
+    }
+
+    $maxvalue = max($visitors);
+    
+    $MyData = new pData();  
+    $MyData->addPoints($visitors,"Visitors");
+    $MyData->setAxisName(0,"Hits");
+    $MyData->addPoints($hits,"Hits");
+    $MyData->setAbscissa("Hits");
+   
+    $myPicture = new pImage(780,150,$MyData);    
+    $myPicture->Antialias = FALSE;    
+    $myPicture->drawRectangle(0,0,779,149,array("R"=>0,"G"=>0,"B"=>0));   
+    $myPicture->setFontProperties(array("FontName"=>plugin_dir_path(__FILE__)."includes/pChart/fonts/Bedizen.ttf","FontSize"=>8));    
+    $myPicture->setGraphArea(30,20,760,130);
+    $scaleSettings = array("GridR"=>200,"GridG"=>200,"GridB"=>200);
+    $myPicture->drawScale($scaleSettings);
+    $myPicture->drawBarChart();
+    @$myPicture->Render(WP_CONTENT_DIR."/cache/AllDaysGoo.png"); 
+    
+    print "<div class='chart'>";
+    //print "<img src=http://chart.apis.google.com/chart?chg=25,25&cht=lc&chs=600x200&chd=".sem_encodeChartData($visitors)."&chxt=y&chxl=0:|0|".$maxvalue.">";
+    if(is_readable(WP_CONTENT_DIR."/cache/AllDaysGoo.png")) {
+        print '<img src="'.WP_CONTENT_URL.'/cache/AllDaysGoo.png" />';
+    } else if(!is_dir(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Cannot find cache-folder!');
+    } else if(!is_writable(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Missing rights for cache-folder!');
+    }
+    print "</div>";
+
+    print "</div>";
+    print "<hr />";
+}
+	
+	function sem_showAllDaysInNumbers() {
+		global $wpdb;
+		
+        $numdays = $wpdb->get_var("SELECT COUNT(date) as num FROM $wpdb->statzhist");
+		
+        $results = $wpdb->get_results("SELECT referers, visitors, hits, substring(date,1,10) AS date
+		FROM ".$wpdb->statzhist." GROUP BY date ORDER BY date DESC");
+        
+        print "<div class='statz'>Die letzten ".$numdays." Tage</div>";
+        if (empty($results)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='width:15%;text-align:center;'>Datum</th>";
+        print "<th style='width:10%;text-align:right;'>Besucher</th>";
+        print "<th style='width:10%;text-align:right;'>Hits</th>";
+        print "<th style='width:10%;text-align:right;'>Referer</th>";
+		print "<th style='text-align:right;'>&nbsp;</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+        $sum_visitors = 0;
+        $sum_hits = 0;
+        $sum_referers = 0;
+            foreach($results as $key=>$result) {
+                $date = mysql2date('d.m.Y',$result->date);
+                $visitors = $result->visitors; 
+                $sum_visitors += $visitors;
+                $hits = $result->hits; 
+                $sum_hits += $hits;
+                $referers = $result->referers; 
+                $sum_referers += $referers;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align:center;'>".$date."</td>";
+                print "<td style='text-align:right;'>".$visitors."</td>";
+                print "<td style='text-align:right;'>".$hits."</td>";
+                print "<td style='text-align:right;'>".$referers."</td>";
+				print "<td style='text-align:right;'>&nbsp;</td>";
+                print "</tr>";
+            }
+			
+        print "<tr><td>&nbsp;</td></tr>";
+        print "<tr class='alternate'"; print ">";
+        print "<td style='text-align:center;'><b>Gesamt</b></td>";
+        print "<td style='text-align:right;'><b>".$sum_visitors."</b></td>";
+        print "<td style='text-align:right;'><b>".$sum_hits."</b></td>";
+        print "<td style='text-align:right;'><b>".$sum_referers."</b></td>";
+        print "</tr>";
+        print "<tr>";
+        print "<td style='text-align:center;'><b>Durchschnitt</b></td>";
+        print "<td style='text-align:right;'>".ceil($sum_visitors / $numdays)."</td>";
+        print "<td style='text-align:right;'>".ceil($sum_hits / $numdays)."</td>";
+        print "<td style='text-align:right;'>".ceil($sum_referers / $numdays)."</td>";
+        print "</tr>";
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+	}
+
+	
+### ANZEIGE HISTORY
+	
+	print "<div class='wrap'>";
+		print "<div id='icon-semmelstatzR' class='icon32'><br /></div>";
+		print "<h2>SemmelstatzR &rsaquo; Historie</h2>";
+		
+		sem_drawLast30DaysGoo();
+		sem_drawAllMonthGoo();
+		sem_drawAllDaysGoo();
+		sem_showAllDaysInNumbers();
+		sem_showCopyright();
+	
+	print "</div>";
+		
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR-log.php

@@ -0,0 +1,151 @@
+<?php
+/**
+ * file semmelstatzR_log.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+
+if(!current_user_can('manage_statz')) {
+	die('Zugriff verweigert');
+}
+
+### ANZEIGE LOG
+
+		global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $limit = $sem_options["statz_datarecs_limit"]; $mask = $sem_options["statz_mask_referer"];
+        $completerecords =
+			$wpdb->get_results("SELECT id, ip, time, referer, page, username FROM ".$wpdb->statz." ORDER BY time DESC LIMIT 0, ".$limit);
+        
+		print "<div class='wrap'>";
+		print "<div id='icon-semmelstatzR' class='icon32'><br /></div>";
+        print "<h2>SemmelstatzR &rsaquo; Log</h2>";
+        print "<div class='statz'>Die neuesten ".$limit." Datens&auml;tze</div>";
+
+        if ($completerecords == NULL) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+            return;
+        }
+        
+        print "<table cellpadding='5' style='text-align:center; width:100%;'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align:center;width:110px;'><small>Datum</small></th>";
+        print "<th style='text-align:center;width:80px;'><small>TCP/IP</small></th>";
+        print "<th style='text-align:left;'><small>Referer</small></th>";
+        print "<th style='text-align:left;'><small>Suchbegriff</small></th>";
+        print "<th style='text-align:left;'><small>Post/Page</small></th>";
+        print "<th style='text-align:left;'><small>Username</small></th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+        
+            foreach ($completerecords as $key=>$completerecord) {
+                $id = $completerecord->id;
+                $ip = $completerecord->ip;
+                if(sem_checkIfIPisEncoded($ip) == true) $ip = sem_decodeIP($ip);
+                $date = mysql2date("d.m.Y G:i", $completerecord->time);
+                $referer = $completerecord->referer;
+                    if($referer == "") {
+                        $referer = "--";
+                    }
+                    else {
+                        if(strlen($referer) >= 50) {
+                            $printreferer = substr($referer, 0, 50)."...";
+                        }
+                        else {
+                            $printreferer = $referer;
+                        }
+                    }
+                $keyword = sem_getKeyword($referer);
+					if(empty($keyword)) $keyword ='--';
+                $page = $completerecord->page;
+                if ($page == 0) {
+                    $link = get_option('siteurl');
+                    $title = "0"; //oder wie auch immer
+                    }
+                else {
+                    $link = get_permalink($page);
+					$postarray = get_post($page, ARRAY_A);
+                    $title = $postarray['post_title'];
+                }
+                $username = $completerecord->username;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='white-space:nowrap;text-align:center;'><small>".$date."</small></td>";
+                print "<td style='white-space:nowrap;text-align:center;'>
+                <a target='_blank' style='border:none;' href='http://ws.arin.net/whois/?queryinput=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/arin.png' /></a>&nbsp;
+                <a target='_blank' style='border:none;' href='http://www.ripe.net/whois?searchtext=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/ripe.png' /></a>&nbsp;
+                <a target='_blank' style='border:none;' href='http://www.utrace.de/?query=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/utrace.png' /></a></td>";
+                print "<td style='text-align:left;'><small>";
+                    if ($referer == "--") {
+                        print "--</small></td>";
+                    }
+                    else {
+                        if($mask != true) {
+                            print "<a target='_blank' style='text-decoration:none;' href='".$referer."'>".$printreferer."</a></td>";
+                        }
+                        else {
+                            $referer = htmlspecialchars($referer, ENT_QUOTES);
+                            print "<a target='_blank' style='text-decoration:none;' href='http://www.google.com/url?sa=D&q=".$referer."'>".$printreferer."</a></td>";
+                        }
+                    }
+                    
+                print "<td style='text-align:left;'><small>".$keyword."</small></td>";
+                print "<td style='text-align:left;'><small><a target='_blank' style='text-decoration:none;' href='".$link."'>".$title."</small></td>";
+                print "<td style='text-align:left;'><small>".$username."</small></td>";
+                print "</tr>";
+            }
+        
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+		
+        if (function_exists('sem_showCopyright')) sem_showCopyright();
+		
+        print "</div>";
+
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR-options.php

@@ -0,0 +1,391 @@
+<?php
+/**
+ * file semmelstatzR_options.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+
+if(!current_user_can('manage_statz')) {
+	die('Zugriff verweigert');
+}
+ 
+    if(isset($_POST['options_save'])) {
+		
+		$sem_options['statz_write_admins'] = $_POST['statz_write_admins'];
+		$sem_options['statz_write_users'] = $_POST['statz_write_users'];
+		$sem_options['statz_encode_ip'] = $_POST['statz_encode_ip'];
+		$sem_options['statz_days_limit'] = $_POST['statz_days_limit'];
+		$sem_options['statz_show_dailystatz'] = $_POST['statz_show_dailystatz'];
+		$sem_options['statz_referer_limit'] = $_POST['statz_referer_limit'];
+		$sem_options['statz_show_referers'] = $_POST['statz_show_referers'];
+		$sem_options['statz_mask_referer'] = $_POST['statz_mask_referer'];
+		$sem_options['statz_keyword_limit'] = $_POST['statz_keyword_limit'];
+		$sem_options['statz_show_keywords'] = $_POST['statz_show_keywords'];
+		$sem_options['statz_topreads_limit'] = $_POST['statz_topreads_limit'];
+		$sem_options['statz_show_reads'] = $_POST['statz_show_reads'];
+		$sem_options['statz_show_todayreads'] = $_POST['statz_show_todayreads'];
+		$sem_options['statz_comment_limit'] = $_POST['statz_comment_limit'];
+		$sem_options['statz_show_commenters'] = $_POST['statz_show_commenters'];
+		$sem_options['statz_show_topcommposts'] = $_POST['statz_show_topcommposts'];
+		$sem_options['statz_show_useronline'] = $_POST['statz_show_useronline'];
+		$sem_options['statz_online_time'] = $_POST['statz_online_time'];
+		$sem_options['statz_show_todayusers'] = $_POST['statz_show_todayusers'];
+		$sem_options['statz_on_dashboard'] = $_POST['statz_on_dashboard'];
+		$sem_options['statz_datarecs_limit'] = $_POST['statz_datarecs_limit'];
+  $sem_options['statz_use_img'] = $_POST['statz_use_img'];
+		update_option("semmelstatzR_options", $sem_options);
+		
+		echo '<div class="updated fade"><p>'.semr_i18n('Options saved').'</strong></p></div>';
+	}
+
+	if(isset($_POST['trunc_save'])) {
+        if (sem_truncateStatzTable()) {
+            echo "<div class='updated'><p>".semr_i18n('<i>statz</i>-table emptied succesfully.')."</p></div>";
+        }
+    }
+    
+    if(isset($_POST['limit_save'])) {
+		$sem_options["statz_recdays_limit"] = $_POST["statz_recdays_limit"];
+		
+        if($sem_options["statz_recdays_limit"] < 1 || (!is_numeric($sem_options["statz_recdays_limit"]))) $sem_options["statz_recdays_limit"] = 1;
+        update_option("semmelstatzR_options", $sem_options);
+		
+		echo "<div class='updated fade'><p>Der Wert f&uuml;r das Limit wurde erfolgreich gespeichert.</p></div>";
+    }
+    
+    if(isset($_POST['limit_execute'])) {
+		$days = $sem_options["statz_recdays_limit"];
+        if(($days >= sem_showStatzDays()) || (!is_numeric($days))) {
+            echo "<div class='error fade'><p>Der eingegebene Wert ist keine Zahl oder zu gro&szlig;!</p></div>";
+        }
+        else {
+            if ($result == sem_delOutOfLimit()) {
+                echo "<div class='updated fade'><p>Die <i>statz</i>-Tabelle wurde erfolgreich auf ".$days." Tage gek&uuml;rzt.</p></div>";
+            }
+        }
+    }
+    
+    if(isset($_POST['cron_save'])) {
+		if($sem_options['statz_do_cron'] == true) {
+            $sem_options['statz_do_cron'] = false;
+        }
+        else {
+            $sem_options['statz_do_cron'] = true;
+            $sem_options['statz_next_cron'] = time() + 86400;
+        }
+		update_option("semmelstatzR_options", $sem_options);
+    }
+	
+?>
+
+	<div class="wrap">
+		
+		<form method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>?page=<?php echo plugin_basename(__FILE__); ?>">
+		
+		<div id='icon-semmelstatzR' class='icon32'><br /></div>
+		<h2>SemmelstatzR &rsaquo; <?php echo semr_i18n('Options'); ?></h2>
+	   
+			<p><input type="submit" class="button-secondary" name="options_save" value="<?php echo semr_i18n('Save Changes'); ?>" /></p>
+			
+			<table class="form-table">
+       
+       <tr style="background:#eee;" valign="middle">
+         <th><?php echo semr_i18n('Use tracking image'); ?></th>
+         <td><input name="statz_use_img" type="checkbox" id="statz_write_admins" value="statz_use_img"
+          <?php if($sem_options["statz_use_img"] == TRUE) {?> checked="checked" <?php } ?> />
+         </td>
+         <td><?php echo semr_i18n('Use a pixelimage in the footer to track visitors. Only needed with some cache-plugins. - (Default: Off)'); ?></td>
+        </tr>
+				
+				<tr style="background:#eee;" valign="middle">
+					<th>Blog-Administratoren aufzeichnen</th>
+					<td><input name="statz_write_admins" type="checkbox" id="statz_write_admins" value="statz_write_admins"
+						<?php if($sem_options["statz_write_admins"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Trackt alle Zugriffe des/der Blog-Admins im Frontend des Blogs - (default: AUS)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Blog-User aufzeichnen</th>
+					<td><input name="statz_write_users" type="checkbox" id="statz_write_users" value="statz_write_users"
+						<?php if($sem_options["statz_write_users"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Trackt alle Zugriffe der registrierten Blog-User im Frontend des Blogs - (default: AUS)</td>
+				</tr>
+				
+				<tr style="background:#eee;"  valign="middle">
+					<th>IP-Adressen codiert aufzeichnen</th>
+					<td><input name="statz_encode_ip" type="checkbox" id="statz_encode_ip" value="statz_encode_ip"
+						<?php if($sem_options["statz_encode_ip"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Der Gesetzgeber verbietet die Aufzeichnung der IP-Adresse eines Besuchers &uuml;ber dessen
+                     zeitlichen Verbleib auf einer Webseite hinaus. Nach Aktivierung dieser Option rechnet SEMMELSTATZ
+                     die IP-Adresse des Besuchers nach einem simplen arithmetischen Verfahren um. Somit schreibt
+						SEMMELSTATZ keine IP-Adressen im Klartext in die <i>statz</i>-Tabelle - (default: AUS)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Statz der letzten <input name="statz_days_limit" type="text" id="statz_days_limit"
+						value="<?php echo $sem_options["statz_days_limit"]; ?>" style="text-align:center;" size="2" maxlength="2" />
+                     Tage anzeigen
+					</th>
+					<td><input name="statz_show_dailystatz" type="checkbox" id="statz_show_dailystatz" value="statz_show_dailystatz"
+						<?php if($sem_options["statz_show_dailystatz"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Tages&uuml;bersicht Besucher-Hits-Referer in absoluten Zahlen mit absteigendem Datum - (default: 7, AN)</td>
+				</tr>
+				
+				<tr  style="background:#eee;"  valign="middle">
+					<th><input name="statz_referer_limit" type="text" id="statz_referer_limit"
+						value="<?php echo $sem_options["statz_referer_limit"]; ?>" style="text-align:center;" size="2" maxlength="2" />
+                     Referer anzeigen
+					</th>
+					<td><input name="statz_show_referers" type="checkbox" id="statz_show_referers" value="statz_show_referers"
+						<?php if($sem_options["statz_show_referers"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Listet <?php echo $sem_options["statz_referer_limit"]; ?> Links auf Webseiten, die auf dieses Blog
+						verweisen - (default: 10, AN)</td>
+				</tr>
+				
+				<tr  valign="middle">
+					<th>Referer-Links via Google maskieren</th>
+					<td><input name="statz_mask_referer" type="checkbox" id="statz_mask_referer" value="statz_mask_referer"
+						<?php if($sem_options["statz_mask_referer"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Der Aufruf einer referenzierenden Webseite aus SEMMELSTATZ heraus w&uuml;rde die komplette URL
+					des Adminbereichs an den Webserver dieser Webseite &uuml;bermitteln. Die Maskierung der Referer-Links
+					als GOOGLE-Weiterleitung verhindert dies. Funktioniert nicht mit allen Links - (default: AUS)</td>
+				</tr>
+				
+				<tr  style="background:#eee;" valign="middle">
+					<th><input name="statz_keyword_limit" type="text" id="statz_keyword_limit"
+						value="<?php echo $sem_options["statz_keyword_limit"]; ?>" style="text-align:center;" size="2" maxlength="2" />
+                     Suchbegriffe anzeigen
+					</th>
+					<td><input name="statz_show_keywords" type="checkbox" id="statz_show_keywords" value="statz_show_keywords"
+						<?php if($sem_options["statz_show_keywords"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Listet <?php echo $sem_options["statz_keyword_limit"]; ?> Links zu Suchbegriffen, mit denen Besucher
+						das Blog gefunden haben. Der Name der entsprechenden Searchengine (soweit bekannt) ist dem
+						Suchbegriff vorangestellt. Der WP-internen Suche steht ein INTERN voraus	- (default: 10, AN)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Top<input name="statz_topreads_limit" type="text" id="statz_topreads_limit"
+						value="<?php echo $sem_options["statz_topreads_limit"]; ?>" style="text-align:center;" size="2" maxlength="2" />
+						Posts & Pages anzeigen
+					</th>
+					<td><input name="statz_show_reads" type="checkbox" id="statz_show_reads" value="statz_show_reads"
+						<?php if($sem_options["statz_show_reads"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Die <?php echo $sem_options["statz_topreads_limit"]; ?> meist gelesenen Posts & Pages, basierend
+					auf dem seit SEMMELSTATZ 3.2 neuen Z&auml;hler in der <i>posts</i>-Tabelle. Dieser Z&auml;hler ist, im Gegensatz
+					zur Ermittlung aus der <i>statz</i>-Tabelle, dauerhaft - (default: 10, AN)</td>
+				</tr>
+				
+				<tr  style="background:#eee;" valign="middle">
+					<th>Top10 Posts & Pages heute anzeigen</th>
+					<td><input name="statz_show_todayreads" type="checkbox" id="statz_show_todayreads" value="statz_show_todayreads"
+						<?php if($sem_options["statz_show_todayreads"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Die 10 meist gelesenen Posts & Pages des laufenden Tages mit Anzahl der Klicks - (default: AN)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Top<input name="statz_comment_limit" type="text" id="statz_comment_limit"
+						value="<?php echo $sem_options["statz_comment_limit"]; ?>" style="text-align:center;" size="2" maxlength="2" />
+                     Kommentierer anzeigen
+					</th>
+					<td><input name="statz_show_commenters" type="checkbox" id="statz_show_commenters" value="statz_show_commenters"
+						<?php if($sem_options["statz_show_commenters"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Die Top<?php echo $sem_options["statz_comment_limit"]; ?> der Kommentierer auf Basis der
+					<i>comments</i>-Tabelle mit Anzahl ihrer Kommentare - (default: 10, AN)</td>
+				</tr>
+				
+				<tr  style="background:#eee;" valign="middle">
+					<th>Top10 kommentierter Posts anzeigen</th>
+					<td><input name="statz_show_topcommposts" type="checkbox" id="statz_show_topcommposts" value="statz_show_topcommposts"
+						<?php if($sem_options["statz_show_topcommposts"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Die Top10 der kommentierten Posts mit Anzahl der Kommentare - (default: AN)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Online-User anzeigen</th>
+					<td><input name="statz_show_useronline" type="checkbox" id="statz_show_useronline" value="statz_show_useronline"
+						<?php if($sem_options["statz_show_useronline"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Zeigt einen Besucher an, sobald er das Blog 'betreten' hat. Ist er ein Administrator oder regsitrierter
+						User des Blogs oder kommt mit einem Kommentar-COOKIE, wird er mit seinem Login- bzw. Kommentierer-Namen und
+						nicht als GAST angezeigt - (default: AN)</td>
+				</tr>
+				
+				<tr  style="background:#eee;" valign="middle">
+					<th>Sekunden, die ein User als anwesend gilt</th>
+					<td><input name="statz_online_time" type="text" id="statz_onlinetime_time"
+						value="<?php echo $sem_options["statz_online_time"]; ?>" style="text-align:center;" size="3" maxlength="4" />
+					</td>
+					<td>Dieser Wert legt fest, dass ein Besucher <?php echo $sem_options["statz_online_time"]; ?> Sekunden als
+						anwesend gilt und so lange als ONLINE-Besucher angezeigt wird - (default: 180)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Heutige User anzeigen</th>
+					<td><input name="statz_show_todayusers" type="checkbox" id="statz_show_todayusers" value="statz_show_todayusers"
+						<?php if($sem_options["statz_show_todayusers"] == TRUE) {?> checked="checked" <?php } ?> /></td>
+					<td>(default: AN)</td>
+				</tr>
+				
+				<tr style="background:#eee;"  valign="middle">
+					<th>Mini-Statz im Dashboard anzeigen</th>
+					<td><input name="statz_on_dashboard" type="checkbox" id="statz_on_dashboard" value="statz_on_dashboard"
+						<?php if($sem_options["statz_on_dashboard"] == TRUE) {?> checked="checked" <?php } ?> />
+					</td>
+					<td>Aktiviert das SEMMELSTATZ-Widget im Dashboard - (default: AUS)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th>Anzahl Datens&auml;tze im <a href='admin.php?page=semmelstatzR/semmelstatzR-log.php'>Log</a></th>
+					<td><input name="statz_datarecs_limit" type="text" id="statz_datarecs_limit"
+						value="<?php echo $sem_options["statz_datarecs_limit"]; ?>" style="text-align:center;" size="3" maxlength="4" />
+					</td>
+					<td>Anzahl der kompletten Datens&auml;tze <i>DATUM-TCP/IP-REFERER-SUCHBEGRIFF-POST/PAGE-USERNAME</i>
+					im SEMMELSTATZ-Log - (default: 100)</td>
+				</tr>
+				
+				<tr valign="middle">
+					<th></th>
+					<td></td>
+				</tr>
+				
+			</table>
+			
+			<p><input type="submit" class="button-secondary" name="options_save" value="&Auml;nderungen &uuml;bernehmen" /></p>
+			
+       </form>
+
+       <div id='icon-semmelstatzR' class='icon32'><br /></div>
+	   <h2>SemmelstatzR &rsaquo; Statz-Tabellen</h2>
+
+			<table class="form-table">
+				
+				<tr valign="middle">
+					<td colspan="2">
+						<i>statz</i>-Tabelle: <?php echo sem_countDaysInStatzTable()-1; ?>,xx Tage (Der aktuelle Tag ist nat&uuml;rlich nie komplett!!!)<br />
+						<i>statzhist</i>-Tabelle: <?php echo sem_showStatzDays(); ?> Tage
+					</td>
+			   </tr>
+			   <tr style="background:#eee;"  valign="middle">
+					<form method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>?page=<?php echo plugin_basename(__FILE__); ?>">
+					<th><input name="statz_recdays_limit" type="input" id="statz_recdays_limit"
+						value="<?php echo $sem_options["statz_recdays_limit"]; ?>" style="text-align:center;"
+						size="2" maxlength="3" />-Tage-Limit f&uuml;r die <i>statz</i>-Tabelle festlegen.
+					</th>
+					<td>
+						<input type="submit" class="button-secondary" name="limit_save" value="Limit speichern" />
+					</td>
+					<td>
+						Um die <i>statz</i>-Tabelle nicht ins Unendliche anwachsen zu lassen, macht es Sinn sie zu limitieren,
+						egal, ob nun manuell oder automatisch. Links die Anzahl der Statistiktage (nicht der zu l&ouml;schenden Tage)
+						eintragen und speichern. Der Wert muss eine Ganzzahl <b>>= 1</b> (default: 20) sein, sonst werden falsche
+						Werte in die <i>statzhist</i>-Tabelle &uuml;bertragen. Der Wert gilt dann sowohl f&uuml;r das manuelle, wie
+						auch das automatische Limit.<br /><u>Dieser Schritt l&ouml;scht noch keine Daten, sondern speichert nur den Wert
+						f&uuml; das Limit!</u>
+					</td>
+					</form>
+				</tr>
+				<tr valign="middle">
+					<form  method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>?page=<?php echo plugin_basename(__FILE__); ?>">
+					<th><i>statz</i>-Tabelle manuell limitieren</th>
+					<td>
+						<input type="submit" class="button-secondary" name="limit_execute" value="statz-Tabelle k&uuml;rzen" />
+					</td>
+					<td>Es erfolgt <u>keine</u> R&uuml;ckfrage! Die <i>statz</i>-Tabelle wird <u>einmalig</u> auf
+						<b><?php echo $sem_options["statz_recdays_limit"]; ?></b> Tage gek&uuml;rzt. Alle Datens&auml;tze <u>&uuml;ber diesen
+						Zeitraum hinaus</u> werden unwiderruflich gel&ouml;scht. Dies gilt nicht f&uuml;r die historischen Daten.
+					</td>
+					</form>
+				</tr>
+				<tr style="background:#eee;"  valign="middle">
+					<form method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>?page=<?php echo plugin_basename(__FILE__); ?>">
+					<th><i>statz</i>-Tabelle automatisch limitieren</th>
+					<td>
+						<?php if($sem_options["statz_do_cron"] == true): ?>
+							<input type="submit" class="button-secondary" name="cron_save" value="Automatisches Limit deaktivieren" />
+						<?php else:?>
+							<input type="submit" class="button-secondary" name="cron_save" value="Automatisches Limit aktivieren" />
+						<?php endif ?>
+					</td>
+					<td>Das automatische Limitieren der statz-Tabelle ist <?php if ($sem_options["statz_do_cron"] == false): ?>
+						<span style="color:#fff;background:red;font-weight:bold;">&nbsp;deaktiviert&nbsp;</span>
+						<?php else: ?>
+						<span style="color:#fff;background:green;font-weight:bold;">&nbsp;aktiviert&nbsp;</span>
+						<?php endif ?>
+						<?php if ($sem_options["statz_do_cron"] == true): ?>
+						<br />N&auml;chster Lauf am <?php echo date("j.n.Y", $sem_options["statz_next_cron"]); ?>
+						gegen <?php echo date("G:i", $sem_options["statz_next_cron"]); ?> Uhr.
+						<?php else: ?>
+						<br />Es erfolgt keine automatische Limitierung
+						<?php endif ?>
+					</td>
+					</form>
+				</tr>
+				<tr valign="middle">
+					<form method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>?page=<?php echo plugin_basename(__FILE__); ?>">
+					<th><i>statz</i>-Tabelle leeren</th>
+					<td>
+						<input type="submit" class="button-secondary" name="trunc_save" value="statz-Tabelle leeren" />
+					</td>
+					<td>Die Datens&auml;tze der <b>statz</b>-Tabelle werden unwiderruflich geleert, und der Speicherplatz in der Datenbank mittels
+						<b>OPTIMIZE TABLE</b> freigegeben. ACHTUNG: Es erfolgt <u>keine</u> R&uuml;ckfrage! Die Aufzeichnung
+						l&auml;uft ohne Unterbrechung weiter. Die Daten der <i>statzhist</i>-Tabelle bleiben unber&uuml;hrt.
+					</td>
+					</form>
+				</tr>
+			</table>
+		<hr />
+		
+		<?php sem_showCopyright(); ?>
+
+	</div>

tags/semmelstatzR_1_0_0_beta/semmelstatzR-statz.php

@@ -0,0 +1,545 @@
+<?php
+/**
+ * file semmelstatzR_statz.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+ 
+if(!current_user_can('manage_statz')) {
+	die('Zugriff verweigert');
+}
+
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pData.class.php';
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pDraw.class.php';
+include_once plugin_dir_path(__FILE__).'includes/pChart/class/pImage.class.php';
+### AKTUELL - Funktionen
+
+	function sem_showWhoIsOnline() {
+        global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+		$onlinetime = $sem_options["statz_online_time"];
+		
+        $onlineusers = $wpdb->get_results("SELECT DISTINCT username, page, ip, time
+		FROM ".$wpdb->statz." WHERE time > Now() - INTERVAL ".$onlinetime." SECOND GROUP BY ip ORDER BY page DESC");
+        
+        print "<div class='statz'>".sem_showNumUsersOnline()." Besucher online - Heute: ".sem_showTodayStatz()."</div>";
+        
+        if (empty($onlineusers)) {
+            print "<small>... keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align:left;'>Username</th>";
+        print "<th style='text-align:left;'>Post/Page</th>";
+        print "<th style='text-align:left;'>TCP/IP</th>";
+        print "<th style='text-align:center;'>Zeit</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($onlineusers as $key=>$onlineuser) {
+                $username = $onlineuser->username;
+                $page = $onlineuser->page;
+                if ($page == 0) {
+                    $link = get_option('siteurl');
+                    $title = 'startseite'; //oder wie auch immer
+                    }
+                else {
+                    $link = get_permalink($page);
+                    $title = get_post($page); // muss so sein, da get_post = ARRAY
+                    $title = $title->post_title; // sonst könnte man gleich diese Zeile nehmen
+                }
+                
+                $ip = $onlineuser->ip;
+                if(sem_checkIfIPisEncoded($ip) == true) $ip = sem_decodeIP($ip);
+                $time = mysql2date("H:i",$onlineuser->time);
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align:left;'>".$username."</td>";
+                print "<td style='text-align:left;'><a target='_blank' href=".$link.">".$title."</td>";
+                print "<td style='white-space:nowrap;text-align:left;'>
+                <a target='_blank' style='border:none;' href='http://ws.arin.net/whois/?queryinput=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/arin.png' /></a>&nbsp;
+                <a target='_blank' style='border:none;' href='http://www.ripe.net/whois?searchtext=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/ripe.png' /></a>&nbsp;
+                <a target='_blank' style='border:none;' href='http://www.utrace.de/?query=".$ip."'>
+                <img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/utrace.png' /></a></td>";
+                print "<td style='text-align:center;'>$time</td>";
+                print "</tr>";
+            }
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+	}
+	
+	function sem_draw24HoursGoo() {
+		global $wpdb;
+		
+		$results = $wpdb->get_results("SELECT time as hours, COUNT(DISTINCT ip) as visitors
+		FROM ".$wpdb->statz." WHERE time >= NOW() - INTERVAL 23 HOUR GROUP BY HOUR(time) ORDER BY time ASC");
+		
+		print "<div class='statz'>Besucher: Die letzten 24 Stunden</div>";
+        print "<div align='left'>";
+		
+		if (empty($results)) {
+            print "<small>... noch keine Eintr&auml;ge</small></div>";
+			print "<hr />";
+            return;
+        }
+		
+    foreach ($results as $result) {
+        $visitors[] = $result->visitors;
+        $hours[] = mysql2date('H', $result->hours);
+    }
+
+    $MyData = new pData();  
+    $MyData->addPoints($visitors,"Visitors");
+    $MyData->setAxisName(0,"Visitors");
+    $MyData->addPoints($hours,"Hours");
+    $MyData->setAbscissa("Hours");
+   
+    $myPicture = new pImage(780,150,$MyData);    
+    $myPicture->Antialias = FALSE;    
+    $myPicture->drawRectangle(0,0,779,149,array("R"=>0,"G"=>0,"B"=>0));   
+    $myPicture->setFontProperties(array("FontName"=>plugin_dir_path(__FILE__)."includes/pChart/fonts/Bedizen.ttf","FontSize"=>8));    
+    $myPicture->setGraphArea(30,20,760,130);
+    $scaleSettings = array("GridR"=>200,"GridG"=>200,"GridB"=>200);
+    $myPicture->drawScale($scaleSettings);
+    $myPicture->drawBarChart();
+    @$myPicture->Render(WP_CONTENT_DIR."/cache/24HourGoo.png"); 
+  
+    print "<div class='chart'>";
+    
+    if(is_readable(WP_CONTENT_DIR."/cache/24HourGoo.png")) {
+        print '<img src="'.WP_CONTENT_URL.'/cache/24HourGoo.png" />';
+    } else if(!is_dir(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Cannot find cache-folder!');
+    } else if(!is_writable(WP_CONTENT_DIR."/cache")) {
+        print semr_i18n('No Chart: Missing rights for cache-folder!');
+    }
+    print "</div>";
+    print "</div>";
+    print "<hr />";
+}
+	
+	function sem_showDailyStatz() {
+        global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+		$limit = $sem_options["statz_days_limit"];
+		$daylimit = $limit - 1;
+		
+		$thedays = $wpdb->get_results("SELECT COUNT(ip) AS hits, COUNT(DISTINCT ip) AS visitors, COUNT(DISTINCT referer)
+		AS referers, substring(time,1,10) AS date FROM ".$wpdb->statz." WHERE time >= CURDATE() - INTERVAL ".$daylimit." DAY
+		GROUP BY date ORDER BY time DESC");
+        
+        print "<div class='statz'>".$limit."-Tage-Statistik</div>";
+        if (empty($thedays)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align:left;'>Datum</th>";
+        print "<th style='width: 15%;text-align:center;'>Besucher</th>";
+        print "<th style='width: 15%;text-align:center;'>Hits</th>";
+        print "<th style='width: 15%;text-align:center;'>Referer</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($thedays as $key=>$theday) {
+                $date = $theday->date;
+                $date = strtotime(substr($theday->date,1,10));
+                $today = time();
+                $difference = ceil(($today - $date) / (60*60*24))-1;
+                if($difference == 0) {
+                    $date = "Heute";
+                }
+                elseif($difference == 1) {
+                    $date = "Gestern";
+                }
+                elseif($difference == 2) {
+                    $date = "Vorgestern";
+                }
+                else {
+                    $date = mysql2date("d.m.Y",$theday->date);
+                }
+                $hits = $theday->hits;
+                $visitors = $theday->visitors;
+                $referers = $theday->referers;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align:left;'>$date</td>";
+                print "<td style='text-align:center;'>$visitors</td>";
+                print "<td style='text-align:center;'>$hits</td>";
+                print "<td style='text-align:center;'>$referers</td>";
+                print "</tr>";
+            }
+        print "<tr>";
+        print "<td style='text-align:left;'><a href='".get_option('siteurl')."/wp-admin/admin.php?page=semmelstatzR/semmelstatzR-history.php'>mehr...</a></td>";
+        print "</tr>";
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+	}
+    
+	function sem_showReferers() {
+        global $wpdb, $homehost;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+		$limit = $sem_options["statz_referer_limit"];
+        $mask = $sem_options["statz_mask_referer"];
+        
+		$lastreferers = $wpdb->get_results("SELECT DISTINCT referer, time FROM ".$wpdb->statz." WHERE referer
+        NOT LIKE '".$homehost."' ORDER BY time DESC  LIMIT 0, ".$limit);
+        
+        print "<div class='statz'>Die letzten ".$limit." Referer</div>";
+        if (empty($lastreferers)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+		print "<th style='text-align:center;width:12%;'>Zeit</th>";
+        print "<th style='text-align:left;'>Referer</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($lastreferers as $key=>$lastreferer) {
+                $referer = $lastreferer->referer;
+                if(strlen($referer) >= 120) {
+                    $printreferer = substr($referer, 0, 120)." ...";
+                }
+                else {
+                    $printreferer = $referer;
+                }
+                $time = mysql2date("d.m.Y - H:i",$lastreferer->time);
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+				print "<td style='text-align:center;'>".$time."</td>";
+                if($mask != true) {
+                    print "<td style='text-align:left;'><a target='_blank' href='".$referer."'>".$printreferer."</a></td>";
+                }
+                else {
+                    $referer = htmlspecialchars($referer, ENT_QUOTES);
+                    print "<td style='text-align:left;'><a target='_blank' href='http://www.google.com/url?sa=D&q=".$referer."'>".$printreferer."</a></td>";
+                }
+                print "</tr>";
+            }
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+	}
+	
+	function sem_showKeyword() {
+        global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $limit = $sem_options["statz_keyword_limit"];
+		
+        $results = $wpdb->get_results("SELECT referer, time, ip FROM $wpdb->statz WHERE referer != 'NULL' ORDER BY time DESC");
+		
+		print "<div class='statz'>Die letzten $limit Suchbegriffe</div>";
+        if (empty($results)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+		print "<th style='text-align: center;width:12%;'>Zeit</th>";
+        print "<th style='text-align:left;width:70%;'>Suchbegriff</th>";
+        print "<th style='text-align:left;'>TCP/IP</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+		$i=0;
+			foreach($results as $result) {
+				$referer = $result->referer;
+				$keyword = sem_getKeyword($referer);
+				$ip = $result->ip;
+				if(sem_checkIfIPisEncoded($ip) == true) $ip = sem_decodeIP($ip);
+				$time = mysql2date('d.m.Y - H:i',$result->time);
+					if($keyword) {
+						print "<tr"; if(1&$i) print " class='alternate'"; print ">";
+						print "<td style='text-align: center;'>".$time."</td>";
+						print "<td style='text-align: left;'><a target='_blank' href='".str_replace(' ','+',htmlspecialchars($referer, ENT_QUOTES))."'>".$keyword."</a></td>";
+						print "<td style='text-align: left;vertical-align:bottom;'>
+						<a target='_blank' href='http://ws.arin.net/whois/?queryinput=".$ip."'>
+						<img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/arin.png' /></a>&nbsp;
+						<a target='_blank' href='http://www.ripe.net/whois?searchtext=".$ip."'>
+						<img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/ripe.png' /></a>&nbsp;
+						<a target='_blank' href='http://www.utrace.de/?query=".$ip."'>
+						<img src='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/img/utrace.png' /></a></td>";
+						
+						print "</tr>";
+						$i++;
+					}
+				if($i == $limit) break;
+			}
+		print "</tbody>";
+        print "</table>";
+		print "<hr />";
+	}
+	
+	function sem_showTodayTopReads() {
+        global $wpdb;
+        $today = date("Y-m-d");
+        $topreads = $wpdb->get_results("SELECT post_title AS posttitle, post_name as postname, guid AS postid,
+        COUNT(".$wpdb->statz.".page) AS count FROM ".$wpdb->posts.", ".$wpdb->statz." WHERE
+        ".$wpdb->statz.".page = ".$wpdb->posts.".ID AND time >= '$today' GROUP BY postid ORDER BY count DESC LIMIT 10");
+        
+        print "<div class='statz'>Die Top10 aller Posts & Pages heute</div>";
+        if (empty($topreads)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align: left; width: 45%;'>Post/Page</th>";
+        print "<th style='text-align: left; width: 45%;'>Postname</th>";
+        print "<th style='text-align: center; width: 10%;'>Hits</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($topreads as $key=>$topread) {
+                $posttitle = $topread->posttitle;
+                $postname = $topread->postname;
+                $postid = $topread->postid;
+                $count = $topread->count;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align: left;'><a target='_blank' href='$postid'>".$posttitle."</a></td>";
+                print "<td style='text-align: left;'>".$postname."</td>";
+                print "<td style='text-align: center;'>".$count."</td>";
+                print "</tr>";
+            }
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+    }
+	
+	function sem_showTopReads() {
+        global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $limit = $sem_options["statz_topreads_limit"];
+		
+        $topreads = $wpdb->get_results("SELECT post_title AS posttitle, post_name as postname, guid AS postid,
+        hits AS count FROM ".$wpdb->posts." WHERE hits != '0' GROUP BY postid ORDER BY hits DESC LIMIT 0, ".$limit);
+        
+        print "<div class='statz'>Die Top".$limit." aller Posts & Pages</div>";
+        if (empty($topreads)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align: left; width: 45%;'>Post/Page</th>";
+        print "<th style='text-align: left; width: 45%;'>Postname</th>";
+        print "<th style='text-align: center; width: 10%;'>Hits</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($topreads as $key=>$topread) {
+                $posttitle = $topread->posttitle;
+                $postname = $topread->postname;
+                $postid = $topread->postid;
+                $count = $topread->count;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align: left;'><a target='_blank' href='".$postid."'>".$posttitle."</a></td>";
+                print "<td style='text-align: left;'>".$postname."</td>";
+                print "<td style='text-align: center;'>".$count."</td>";
+                print "</tr>";
+            }
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+    }
+	
+    function sem_showWhoWasOnlineToday() {
+        global $wpdb;
+        $today = date("Y-m-d");
+        $todaysonlineusers = $wpdb->get_results("SELECT DISTINCT username, COUNT(username) as num FROM ".$wpdb->statz." WHERE
+        time >= '$today' AND username != 'Gast' GROUP BY username ORDER BY num DESC");
+        
+        print "<div class='statz'>Bekannte Besucher heute</div>";
+        if (empty($todaysonlineusers)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align: left; width: 80%;'>Besucher (Hits)</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+            foreach ($todaysonlineusers as $key=>$todayonlineuser) {
+                $username = $todayonlineuser->username;
+                $num = $todayonlineuser->num;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align: left;'>".$username." (".$num.")</td>";
+                print "</tr>";
+            }
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+    }
+	
+	function sem_showTopCommented() {
+        global $wpdb;
+        $topcommentedposts = $wpdb->get_results("SELECT guid, id, post_title, COUNT(*) AS count FROM
+        ".$wpdb->comments.",". $wpdb->posts." WHERE comment_approved = '1' AND comment_post_id = id
+        GROUP BY guid ORDER BY count DESC LIMIT 0, 10");
+        
+        print "<div class='statz'>Die Top10 aller kommentierter Posts</div>";
+        if (empty($topcommentedposts)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align: left; width: 80%;'>Post/Page</th>";
+        print "<th style='text-align: center; width: 20%;'>Kommentare</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+        
+            foreach ($topcommentedposts as $key => $topcommentedpost) {
+                $posttitle = $topcommentedpost->post_title;
+                $count = $topcommentedpost->count;
+                $postid = $topcommentedpost->guid;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align: left;'><a target='_blank' href='".$postid."'>&nbsp;".$posttitle."</a></td>";
+                print "<td style='text-align: center;'>".$count."</td>";
+                print "</tr>";
+            }
+            
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+    }
+
+    function sem_showCommenters() {
+        global $wpdb;
+		
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+        $limit = $sem_options["statz_comment_limit"];
+		
+        $topcommenters = $wpdb->get_results("SELECT comment_author AS commenter, COUNT(comment_ID) AS count,
+        comment_author_email AS email, comment_author_url AS homepage FROM " .$wpdb->comments . " WHERE
+        comment_approved = '1' GROUP BY comment_author ORDER BY count DESC LIMIT 0, ".$limit);
+        
+        print "<div class='statz'>Die Top".$limit." aller Kommentierer</div>";
+        if (empty($topcommenters)) {
+            print "<small>... noch keine Eintr&auml;ge</small>";
+			print "<hr />";
+            return;
+        }
+        
+        print "<table class='statzelement'>";
+        print "<thead>";
+        print "<tr>";
+        print "<th style='text-align: left; width: 20%;'>User</th>";
+        print "<th style='text-align: left; width: 30%;'>Email</th>";
+        print "<th style='text-align: left; width: 40%;'>Homepage</th>";
+        print "<th style='text-align: center; width: 10%;'>Kommentare</th>";
+        print "</tr>";
+        print "</thead>";
+        print "<tbody>";
+        
+            foreach ($topcommenters as $key=>$topcommenter) {
+                $commenter = $topcommenter->commenter;
+                $email = $topcommenter->email;
+                $homepage = $topcommenter->homepage;
+                    if($homepage=="http://") $homepage="";
+                    $url=parse_url($homepage);
+                    $homepage = $url['host'];
+                $count = $topcommenter->count;
+                print "<tr"; if(1&$key) print " class='alternate'"; print ">";
+                print "<td style='text-align: left;'>".$commenter."</td>";
+                print "<td style='text-align: left;'><a href='mailto:".$email."'>".$email."</a></td>";
+                print "<td style='text-align: left;'><a target='_blank' href='http://".$homepage."'>".$homepage."</a></td>";
+                print "<td style='text-align: center;'>".$count."</td>";
+                print "</tr>";
+            }
+        
+        print "</tbody>";
+        print "</table>";
+		print "<hr />";
+    }
+    
+### AKTUELL Anzeige
+
+	print "<div class='wrap'>";
+		print "<div><a name='top'></a></div>";
+		print "<div id='icon-semmelstatzR' class='icon32'><br /></div>";
+		print "<h2>SemmelstatzR &rsaquo; Aktuell</h2>";
+		$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+		if ($sem_options["statz_show_useronline"]) sem_showWhoIsOnline();
+		sem_draw24HoursGoo();
+		if ($sem_options["statz_show_todayusers"]) sem_showWhoWasOnlineToday();
+		if ($sem_options["statz_show_dailystatz"]) sem_showDailyStatz();
+		if ($sem_options["statz_show_referers"]) sem_showReferers();
+		if ($sem_options["statz_show_keywords"]) sem_showKeyword();
+		if ($sem_options["statz_show_todayreads"]) sem_showTodayTopReads();
+		if ($sem_options["statz_show_reads"]) sem_showTopReads();
+		if ($sem_options["statz_show_topcommposts"]) sem_showTopCommented();
+		if ($sem_options["statz_show_commenters"]) sem_showCommenters();
+		sem_showCopyright();
+	print "</div>";
+		
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR-templates.php

@@ -0,0 +1,255 @@
+<?php
+/**
+ * file semmelstatzR_templates.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+ 
+if(!current_user_can('manage_statz')) {
+	die('Zugriff verweigert');
+}
+
+### TEMPLATES
+
+		$totalposts = sem_showTotalPosts();
+		$totalcomments = sem_showTotalComments();
+		$totalusers = sem_showTotalUsers();
+		$averageuserperday = sem_showAverageUserPerDay();
+		$firstpostdate = sem_showFirstPostDate();
+		$postdays =	sem_showPostDays();
+		$firstcommentdate =	sem_showFirstCommentDate();
+		$commentdays = sem_showCommentDays();
+		$postsperday = sem_showPostsPerDay();
+		$commentsperday = sem_showCommentsPerDay();
+		$numcommenters = sem_showNumCommenters();
+		$statzstartdate = sem_showStatzStartDate();
+		$statzdays = sem_showStatzDays();
+		$numusersonline = sem_showNumUsersOnline();
+
+	### DIE ANZEIGE
+
+		print "<form>";
+		print "<div class='wrap'>";
+		print "<div id='icon-template' class='icon32'><br /></div>";
+		print "<h2>SemmelstatzR &rsaquo; Template-Funktionen</h2>";
+		print "<br />";
+		print "<table class='statzelement'>";
+		print "<thead>";
+		print "<tr>";
+		print "<th style='text-align:left;'>Funktion</th>";
+		print "<th style='text-align:left;width:26em;'>Syntax</th>";
+		print "<th style='text-align:left;'>R&uuml;ckgabewert</th>";
+		print "<th style='text-align:left;'>Hier</th>";
+		print "<th style='text-align:left;'>Bemerkung</th>";
+		print "</tr>";
+		print "</thead>";
+		print "<tbody>";
+
+		print "<tr>";
+		print "<td>sem_showTotalPosts</td>";
+		print "<td><input type='text' value='<?php sem_showTotalPosts(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$totalposts</td>";
+		print "<td>Anzahl aller Beitr&auml;ge</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showTotalComments</td>";
+		print "<td><input type='text' value='<?php sem_showTotalComments(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$totalcomments</td>";
+		print "<td>Anzahl aller Kommentare</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showTotalUsers</td>";
+		print "<td><input type='text' value='<?php sem_showTotalUsers(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$totalusers</td>";
+		print "<td>Gesamtzahl aller Besucher seit Statistikaufzeichnung</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showAverageUserPerDay</td>";
+		print "<td><input type='text' value='<?php sem_showAverageUserPerDay(); ?>' class='regular-text' /></td>";
+		print "<td>Dezimal</td>";
+		print "<td>$averageuserperday</td>";
+		print "<td>Durchschnittliche Anzahl der t&auml;glichen Besucher</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showFirstPostDate</td>";
+		print "<td><input type='text' value='<?php sem_showFirstPostDate(); ?>' class='regular-text' /></td>";
+		print "<td>Datum (d.m.y)</td>";
+		print "<td>$firstpostdate</td>";
+		print "<td>Datum des 1. Posts</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showPostDays</td>";
+		print "<td><input type='text' value='<?php sem_showPostDays(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$postdays</td>";
+		print "<td>Zeitraum in Tagen seit 1. Beitrag</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>em_showFirstCommentDate</td>";
+		print "<td><input type='text' value='<?php sem_showFirstCommentDate(); ?>' class='regular-text' /></td>";
+		print "<td>Datum (d.m.y)</td>";
+		print "<td>$firstcommentdate</td>";
+		print "<td>Datum des 1. Kommentars</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showCommentDays</td>";
+		print "<td><input type='text' value='<?php sem_showCommentDays(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$commentdays</td>";
+		print "<td>Zeitraum in Tagen seit 1. Kommentar</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showPostsPerDay</td>";
+		print "<td><input type='text' value='<?php sem_showPostsPerDay(); ?>' class='regular-text' /></td>";
+		print "<td>Dezimal</td>";
+		print "<td>$postsperday</td>";
+		print "<td>Durchschnittliche Anzahl der Beitr&auml;ge pro Tag</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showCommentsPerDay</td>";
+		print "<td><input type='text' value='<?php sem_showCommentsPerDay(); ?>' class='regular-text' /></td>";
+		print "<td>Dezimal</td>";
+		print "<td>$commentsperday</td>";
+		print "<td>Durchschnittliche Anzahl der Kommentare pro Tag</td>";
+		print "</tr>";
+		
+		print "<td>sem_showNumCommenters</td>";
+		print "<td><input type='text' value='<?php sem_showNumCommenters(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$numcommenters</td>";
+		print "<td>Gesamtzahl aller Kommentierer</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showStatzStartDate</td>";
+		print "<td><input type='text' value='<?php sem_showStatzStartDate(); ?>' class='regular-text' /></td>";
+		print "<td>Datum (d.m.y)</td>";
+		print "<td>$statzstartdate</td>";
+		print "<td>Beginn der Statistik</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showStatzDays</td>";
+		print "<td><input type='text' value='<?php sem_showStatzDays(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$statzdays</td>";
+		print "<td>Zeitraum der Statistik in Tagen</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showNumUsersOnline</td>";
+		print "<td><input type='text' value='<?php sem_showNumUsersOnline(); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>$numusersonline</td>";
+		print "<td>User Online</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showLastComments</td>";
+		print "<td><input type='text' value='<?php sem_showLastComments(10); ?>' class='regular-text' /></td>";
+		print "<td>Formatierte Liste</td>";
+		print "<td>n/a</td>";
+		print "<td>Die neusten 'n' Kommentare mit Autor, Post, abw&auml;rts sortiert nach Datum<br />CSS-ID: #lastcomments</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showLastPosts</td>";
+		print "<td><input type='text' value='<?php sem_showLastPosts(10); ?>' class='regular-text' /></td>";
+		print "<td>Formatierte Liste</td>";
+		print "<td>n/a</td>";
+		print "<td>Die neusten 'n' Posts mit Titel, abw&auml;rts sortiert nach Datum<br />CSS-ID: #lastposts</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showMostReads</td>";
+		print "<td><input type='text' value='<?php sem_showMostReads(10); ?>' class='regular-text' /></td>";
+		print "<td>Formatierte Liste</td>";
+		print "<td>n/a</td>";
+		print "<td>Die 'n' meist gelesenen Post/Pages mit Hits in Klammern<br />CSS-ID: #mostreads</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>sem_showPostHitsInLoop</td>";
+		print "<td><input type='text' value='<?php sem_showPostHitsInLoop(get_the_ID()); ?>' class='regular-text' /></td>";
+		print "<td>Ganzzahl</td>";
+		print "<td>Nur im Loop</td>";
+		print "<td>Zeigt die Anzahl der Hits eines Posts an. Funktioniert nur im LOOP.</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td colspan='5'>";
+		print "S&auml;mtliche Funktionen (bis auf die letzte) sind au&szlig;erhalb des LOOPS zu verwenden. Wird
+				SEMMELSTATZ deaktiviert, und die Verf&uuml;gbarkeit der Templatefunktion ist nicht mittels
+				<code>if (function_exists...</code> sichergestellt, wird die Indexseite des Blogs fehlerhaft bzw.
+				&uuml;berhaupt nicht dargestellt.";
+		print "</td>";
+		print "</tr>";
+		
+		print "<tr>";
+		print "<td>";
+		print "</td>";
+		print "</tr>";
+		
+		print "</tbody>";
+		print "</table>";
+		print "<hr />";
+		
+		if (function_exists('sem_showCopyright')) sem_showCopyright();
+		
+		print "</div>";
+		
+		print "</form>";
+	
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR.css

@@ -0,0 +1,132 @@
+/**
+ * file semmelstatzR.css
+ *
+ * @package SemmelstatzR
+ * @version $Rev$
+ * @author Ortwin Pinke <info@php-backoffice.de>
+ * @author Andreas 'Redunzl' Mueller
+ * @copyright (c)2011 PHP-Backoffice
+ * @copyright (c)2005-2009 kopfhoch-studio
+ * @link http://www.php-backoffice.de/projects/semmelstatzR
+ * @link http://sourceforge.net/projects/semmelstatz/
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ *
+ * $Id$
+*/
+
+p.statz, div.statz {
+	/* font-family: tahoma,verdana,arial,helvetica; */
+	font-size: 17px;
+	font-weight: normal;
+	color: #344964;
+	text-align: left;
+	padding: 10px 0 5px 5px;
+	margin-top: 10px;
+}
+
+hr {
+	color: #ddd;
+	background-color: #ddd;
+	height: 2px;
+	border: none;
+}
+
+.statz a {
+	border: none;
+}
+
+.statz a img {
+	border: none;
+	padding-top: 0px;	
+}
+
+table.statzelement {
+	width: 100%;
+}
+
+.statzelement th, .statzelement td {
+	/* font-family: tahoma,verdana,arial,helvetica; */
+	font-size: 11px;
+	color: #344964;
+	padding: 3px 0 3px 5px;
+}
+
+.statzelement th {
+	font-weight: bold;
+	background: #eee;
+}
+
+.statzelement td {
+	font-weight: normal;
+}
+
+.statzelement td a {
+	text-decoration: none;
+}
+
+.statzelement p {
+	/* font-family: tahoma,verdana,arial,helvetica; */
+	font-size: 11px;
+}
+
+.optionstable {
+	border:none;
+}
+
+.optioncell {
+	border:1px solid #ccc;
+	padding:5px;
+	font-size:11px;
+	vertical-align:top;
+	width:20%;
+}
+
+div.chart {
+	margin: 10px 0px 20px 30px;
+}
+
+table.chartelement {
+	border: none;
+	border-collapse: collapse;
+}
+
+.chartelement td {
+	vertical-align: bottom;
+	text-align: center;
+}
+
+.chartelement td div {
+	border-top: 2px solid #dedede;
+	border-left: 2px solid #dedede;
+	border-right: 2px solid #999;
+	border-bottom: 2px solid #999;
+}
+
+.chartelement th {
+	vertical-align: middle;
+	text-align: right;
+}
+
+.copyright {
+	/* font-family: tahoma,verdana,arial,helvetica; */
+	font-size: 11px;
+	text-align:center;
+	margin-top: 20px
+}
+
+.alternate {
+	background: #eee;
+}
+
+#icon-semmelstatzR {
+	background: transparent url(img/icon_observe.png);
+}
+
+#icon-template {
+	background: transparent url(img/icon_template.png);
+}
+
+input.regular-text {
+	font-size: 11px;
+	width: 28em;
+}

tags/semmelstatzR_1_0_0_beta/semmelstatzR.php

@@ -0,0 +1,333 @@
+<?php
+/*
+Plugin Name: semmelstatzR
+Plugin URI: http://sourceforge.net/projects/semmelstatz/
+Description: Visitorstatistic for Wordpress, based upon the original wp-plugin semmelstatz by Andreas 'Redunzl' Mueller (http://www.kopfhoch-studio.de)
+Version: 1.0.0 Beta
+Author: SEM-Team
+Author URI: http://semmelstatz.sf.net
+License: GPLv3
+License URI: http://www.gnu.org/licenses/gpl-3.0.html
+*/
+/**
+ * file semmelstatzR.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+
+require_once dirname(__FILE__).DIRECTORY_SEPARATOR.'semmelstatzR_startup.php';
+
+
+if(is_admin() == true) {
+
+    /**
+     * add CSS
+     *
+     * @return void
+     */
+    function semmelstatzR_css() {
+        print "<link rel='stylesheet' href='".get_option('siteurl')."/wp-content/plugins/semmelstatzR/semmelstatzR.css' type='text/css' media='screen' />\n";
+    }
+    add_action('admin_head', 'semmelstatzR_css');
+    ### End add CSS
+
+    /**
+     * add toplevel menu into admin
+     *
+     * @todo localization
+     *
+     * @return void
+     */
+    function semmelstatzR_menu() {
+    if (function_exists('add_menu_page')) {
+    add_menu_page('SemmelstatzR','SemmelstatzR', 'manage_statz', 'semmelstatzR/semmelstatzR-statz.php', '', plugins_url('semmelstatzR/img/statz_small.png'));
+    }
+    if (function_exists('add_submenu_page')) {
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('Current Statz'), semr_i18n('Current Statz'), 'manage_statz', 'semmelstatzR/semmelstatzR-statz.php');
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('History'), semr_i18n('History'), 'manage_statz', 'semmelstatzR/semmelstatzR-history.php');
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('Log'), semr_i18n('Log'), 'manage_statz', 'semmelstatzR/semmelstatzR-log.php');
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('Database'), semr_i18n('Database'), 'manage_statz', 'semmelstatzR/semmelstatzR-database.php');
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('Templates'), semr_i18n('Templates'), 'manage_statz', 'semmelstatzR/semmelstatzR-templates.php');
+    add_submenu_page('semmelstatzR/semmelstatzR-statz.php', semr_i18n('Options'), semr_i18n('Options'), 'manage_statz', 'semmelstatzR/semmelstatzR-options.php');
+    }
+    }
+    add_action('admin_menu', 'semmelstatzR_menu');
+    ### end add toplevel adminmenu
+
+
+
+    /**
+     * write defaults to options-array
+     *
+     * @return void
+     */
+    function sem_init_options() {
+        global $wpdb;
+
+        if(get_option('statz_options')) {
+            $wpdb->query("DELETE FROM $wpdb->options WHERE option_name LIKE 'statz%';"); // Löschen der alten Optionen
+        }
+
+        if(!get_option('semmelstatzR_options')) {
+            $sem_options = array(
+                "statz_comment_limit" => 10,
+                "statz_datarecs_limit" => 100,
+                "statz_days_limit" => 7,
+                "statz_do_cron" => false,
+                "statz_encode_ip" => false,
+                "statz_keyword_limit" =>10,
+                "statz_referer_limit" => 10,
+                "statz_mask_referer" => false,
+                "statz_on_dashboard" => false,
+                "statz_online_time" => 180,
+                "statz_recdays_limit" => 20,
+                "statz_show_commenters" => true,
+                "statz_show_dailystatz" => true,
+                "statz_show_keywords" => true,
+                "statz_show_reads" => true,
+                "statz_show_referers" => true,
+                "statz_show_todayreads" => true,
+                "statz_show_todayusers" => true,
+                "statz_show_topcommposts" => true,
+                "statz_show_useronline" => true,
+                "statz_topreads_limit" => 10,
+                "statz_write_admins" => false,
+                "statz_write_users" => false,
+                "statz_use_img" => true
+            );
+            add_option( 'semmelstatzR_options', $sem_options );
+        }
+    }
+    add_action('init', 'sem_init_options');
+    ### End write defaults to options-array
+
+}
+
+    
+### Anlegen der Tabellen, Optionen schreiben   
+add_action('activate_semmelstatzR/semmelstatzR.php', 'sem_statzsetup');
+function sem_statzsetup() {
+    global $wpdb;
+    if(@is_file(ABSPATH.'/wp-admin/upgrade-functions.php')) {
+        include_once(ABSPATH.'/wp-admin/upgrade-functions.php');
+    } elseif(@is_file(ABSPATH.'/wp-admin/includes/upgrade.php')) {
+        include_once(ABSPATH.'/wp-admin/includes/upgrade.php');
+    } else {
+        die('Kann <i>wp-admin/upgrade-functions.php</i> und <i>wp-admin/includes/upgrade.php</i> nicht finden!');
+    }
+
+    $create_table = array();
+    $create_table['statz'] = "CREATE TABLE $wpdb->statz (
+        id int(11) unsigned NOT NULL auto_increment,
+        ip varchar(39) default NULL,
+        time datetime NOT NULL default '0000-00-00 00:00:00',
+        referer varchar(255) default NULL,
+        page int(11) unsigned NOT NULL default '0',
+        username varchar(255) default NULL,
+        PRIMARY KEY  (`id`))";
+    $create_table['statzhist'] = "CREATE TABLE $wpdb->statzhist (
+        id int(10) unsigned NOT NULL auto_increment,
+        date datetime NOT NULL default '0000-00-00 00:00:00',
+        visitors int(10) unsigned NOT NULL default '0',
+        hits int(10) unsigned NOT NULL default '0',
+        referers int(10) unsigned NOT NULL default '0',
+        PRIMARY KEY  (`id`))";
+
+    maybe_create_table($wpdb->statz, $create_table['statz']);
+    maybe_create_table($wpdb->statzhist, $create_table['statzhist']);
+
+    $sql = $wpdb->query("SELECT host FROM $wpdb->statz");
+    if($sql) { $wpdb->query("ALTER TABLE $wpdb->statz DROP host"); }
+
+    $sql = $wpdb->query("SELECT keyword FROM $wpdb->statz");
+    if($sql) { $wpdb->query("ALTER TABLE $wpdb->statz DROP keyword"); }
+
+    maybe_add_column($wpdb->posts, 'hits', "ALTER TABLE $wpdb->posts ADD hits bigint(20) NOT NULL DEFAULT '0';"); // ab 3.2
+
+    $wpdb->query("ALTER TABLE $wpdb->statz CHANGE ip ip VARCHAR(39) NULL DEFAULT NULL;");
+
+    sem_init_options();
+    sem_writeOldDaysToHist();
+
+    $role = get_role('administrator');
+    if(!$role->has_cap('manage_statz')) {
+    $role->add_cap('manage_statz');
+    }
+}
+
+### Zugriff analysieren und in statz-Tabelle schreiben
+add_action('wp_footer', 'sem_writeStatz');
+function sem_writeStatz() {
+    global $wpdb, $wp_query, $isBot, $isAdmin, $page;
+    $plugin_dir = basename(dirname(__FILE__));
+    $sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+
+    // true === $sem_options['statz_use_img'] && 
+    if(true == $sem_options['statz_use_img'] && !defined('SEMMELSTATZR_STATZIMG')) {        
+        print '<img src="'.SEMMELSTATZR_HTML_RELPATH.'semr_image.php" alt="" />';
+        return; ### nothing todo if stat image is used
+    }
+
+    sem_writeYesterdayToHist();
+    $useragent = $wpdb->escape($_SERVER['HTTP_USER_AGENT']);
+    $isBot = sem_AreYouBot($useragent);
+    $username = sem_getUsername();
+
+    if(($isBot == true)
+    || ($isAdmin == 0 && $sem_options['statz_write_users'] == false)
+    || ($isAdmin == 1 && $sem_options['statz_write_admins'] == false)
+    || is_404()
+    ) return;
+
+    $userip = $wpdb->escape($_SERVER['REMOTE_ADDR']);
+    if($sem_options['statz_encode_ip'] == true) $userip = sem_encodeIP($userip);
+
+$referer = $wpdb->escape(urldecode($_SERVER['HTTP_REFERER']));
+    $blogtime = gmdate('Y-m-d H:i:s', current_time('timestamp'));
+
+    if (!empty($referer)) {
+        if(get_option('blog_charset') == 'iso-8859-1') $referer = utf8_decode($referer);
+$referer = "'".$referer."'";
+    }
+else {
+$referer = 'NULL';
+}
+
+    $readingnow = wp_title('', false);
+    if(empty($readingnow)) {
+        $page = 0;
+    } else {
+        $page = $wp_query->post->ID;
+    }
+
+$wpdb->query("INSERT INTO $wpdb->statz (ip, time, referer, page, username)
+    VALUES('$userip', '$blogtime', $referer, $page, '$username')");
+
+    if($wpdb->query("SELECT COUNT(hits) FROM $wpdb->posts")) {
+        $wpdb->query("UPDATE $wpdb->posts SET hits = hits + 1 WHERE ID = $page"); // neu ab 3.2
+    }
+}
+    
+### Zeitgesteuertes Limitieren der statz-Tabelle
+    // Wenn semmelKron JA UND statz_next_cron älter JETZT, dann...
+	$sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+	if($sem_options['statz_do_cron'] == true && $sem_options['statz_next_cron'] < time()) { 
+        add_action('shutdown', 'sem_doCronStatzLimit'); // ...limitiere statz-Tabelle auf vorgegebenen Wert
+    }
+	
+### Rendert eine Mini-STATZ. Idee: René Tauchnitz
+function sem_dashboardStatz_show() {
+
+    $widgets = get_option( 'dashboard_widget_options' );
+    echo '<p>';
+    printf(_n("%d Visitor online", "%d Visitors online", sem_showNumUsersOnline(), "semmelstatzR"), sem_showNumUsersOnline());
+    echo ' - ';
+    printf(__("Today: %s", "semmelstatzR"),sem_showTodayStatz());
+    echo ' <a title="'.__("more...", "semmelstatzR").'" href="'.get_option('siteurl').'/wp-admin/admin.php?page=semmelstatzR/semmelstatzR-statz.php">&raquo;&raquo;</a>';
+    echo '</p>';
+}
+
+function sem_dashboardStatz_control() {
+    if ( !$widget_options = get_option( 'dashboard_widget_options' ) )
+        $widget_options = array();
+
+    if ( !isset($widget_options['dashboard_sem_dashboardStatz']) )
+        $widget_options['dashboard_sem_dashboardStatz'] = array();
+
+    if ( 'POST' == $_SERVER['REQUEST_METHOD'] && isset($_POST['dashboard-sem-dashboardStatz']) ) {
+        $number = absint( $_POST['dashboard-sem-dashboardStatz']['items'] );
+        $number = ($number > 20)?20:$number;
+        $widget_options['dashboard_sem_dashboardStatz']['items'] = $number;
+        update_option( 'dashboard_widget_options', $widget_options );
+    }
+
+	$number = isset( $widget_options['dashboard_sem_dashboardStatz']['items'] ) ? (int) $widget_options['dashboard_sem_dashboardStatz']['items'] : '';
+
+	echo '<p><label for="sem-number">' . semr_i18n('Number of Items (max. 10):') . '</label>';
+	echo '<input id="sem-number" name="dashboard-sem-dashboardStatz[items]" type="text" value="' . $number . '" size="3" /></p>';
+
+    //print_r($widget_options['dashboard_sem_dashboardStatz']);
+}
+	
+/**
+ * Callback generating a small dashboard widget
+ * 
+ * @uses sem_showTodayStatz() to generate the content
+ * @uses wp_add_dashboard_widget() to generate widget
+ * 
+ * @return void 
+ */
+function sem_dashboardStatz_setup() {
+    $sem_options = get_option('semmelstatzR_options'); ### optionsarray auslesen
+    if(!current_user_can('manage_statz')) return;
+    if($sem_options['statz_on_dashboard'] != true) return;
+    wp_add_dashboard_widget( 'sem_dashboardStatz', 'SemmelstatzR', 'sem_dashboardStatz_show', 'sem_dashboardStatz_control' );
+}
+
+add_action('wp_dashboard_setup', 'sem_dashboardStatz_setup');
+
+/**
+ * generates and returns content for a small dashboard widget
+ * 
+ * @global wpdb $wpdb
+ * @return string formated string/html for dashboard 
+ */ 
+	function sem_showTodayStatz() {
+        global $wpdb;
+        $thedays = $wpdb->get_results("SELECT COUNT(ip) AS hits, COUNT(DISTINCT ip) AS visitors, COUNT(DISTINCT referer)
+        AS referers, substring(time,1,10) AS date FROM ".$wpdb->statz." WHERE time >= CURDATE() GROUP BY date");
+        //$thedays = array(array('hits' => 33));
+        if (empty($thedays)) {
+            return "<small>".semr_i18n("... no entries")."</small>";
+        }
+        foreach($thedays as $key=>$theday) {
+            $date = mysql2date("l",$theday->date);
+            $hits = $theday->hits;
+            $visitors = $theday->visitors;
+            $referers = $theday->referers;
+        }
+        return sprintf(semr_i18np("%d Visitor","%d Visitors",$visitors),$visitors)." - "
+               .sprintf(semr_i18np("%d Hit","%d Hits",$hits),$hits)." -  "
+               .sprintf(semr_i18np("%d Referer","%d Referers",$referers),$referers);
+	}
+?>

tags/semmelstatzR_1_0_0_beta/semmelstatzR_startup.php

@@ -0,0 +1,81 @@
+<?php
+/**
+ * file semmelstatzR_startup.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+### constants
+define('SEMMELSTATZR_VERSION', '1.0.0 Beta');
+define('SEMMELSTATZR_SRVPATH', dirname(__FILE__));
+define('SEMMELSTATZR_HTML_RELPATH', WP_PLUGIN_URL.'/'.str_replace(basename( __FILE__),"",plugin_basename(__FILE__)));
+	
+### Deklaration der Tabellennamen
+global $wpdb;
+$wpdb->statz = $wpdb->prefix . 'statz';
+$wpdb->statzhist = $wpdb->prefix . 'statzhist';
+    
+### Auslesen des Domainnamens
+global $homehost;
+if(substr($_SERVER['SERVER_NAME'],0,4) == 'www.') {
+    $homehost = '%' . substr($_SERVER['SERVER_NAME'],4) . '%';
+} else {
+    $homehost = '%' . $_SERVER['SERVER_NAME'] . '%';
+}
+
+### localization
+if(!load_plugin_textdomain('semmelstatzR')) {
+    $plugin_dir = basename(dirname(__FILE__));
+    load_plugin_textdomain('semmelstatzR',null,$plugin_dir.'/locale/');
+}
+
+include_once SEMMELSTATZR_SRVPATH.'/includes/functions.semr.php';
+include_once SEMMELSTATZR_SRVPATH.'/includes/functions.semr_template.php';
+include_once SEMMELSTATZR_SRVPATH.'/includes/class.upgrademe.php';
+if(class_exists("Upgrademe")) {
+    function semmelstatzR_upgrademe() {
+        // will be changed to sf.net soon as website is ready
+        //return 'http://semmelstatz.sourceforge.net/semr_update.php'; 
+        return 'http://www.php-backoffice.de/updates/semr_update.php';
+    }
+}
+?>

tags/semmelstatzR_1_0_0_beta/semr_image.php

@@ -0,0 +1,69 @@
+<?php
+/**
+ * file semr_image.php
+ *
+ * @package     SemmelstatzR
+ * @version     $Rev$
+ * @since       1.0.0 Beta
+ * @author      SEM-Team
+ * @copyright   (c)2011 SEM-Team
+ * @link        http://sourceforge.net/projects/semmelstatz/
+ * @license     http://www.gnu.org/licenses/gpl-3.0.html
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.  
+ *
+ * $Id$
+ * 
+ */
+/**  
+ * based upon semmelstatz
+ * Copyright (c) 2005-2009 Andreas 'Redunzl' Mueller (redunzl@gmx.de)
+ *    
+ * @license http://www.gnu.org/licenses/gpl-2.0.html
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License (version 2) as
+ * published by the Free Software Foundation.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with this program; if not, write to the Free Software Foundation, Inc.,
+ * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+*/
+/**
+ * security fix
+ */
+define('SEMMELSTATZR_STATZIMG', true);
+/*
+echo "<pre>";
+print_r($_SERVER);
+echo "</pre>";
+*/
+header('Cache-Control: no-cache');
+header("X-Robots-Tag: noindex, nofollow", true);
+
+require '../../../wp-load.php';
+sem_writeStatz();
+
+
+// Output transparent gif
+
+header('Content-type: image/gif');
+header('Content-length: 43');
+
+echo base64_decode('R0lGODlhAQABAIAAAP///wAAACH5BAEAAAAALAAAAAABAAEAAAICRAEAOw==');
+?>

tags/semmelstatzR_1_0_0_beta/test/agents.php

@@ -0,0 +1,5 @@
+<?php
+require '../includes/class.agents.php';
+
+$oAgents = new Agents($_SERVER['HTTP_USER_AGENT']);
+?>

tags/semmelstatzR_1_0_0_beta/test/semr_update.php

@@ -0,0 +1,26 @@
+{
+"new_version": "1.0.0 RC1",
+"url": "http://sourceforge.net/projects/semmelstatz",
+"package": "http://sourceforge.net/projects/semmelstatz/files",
+"info": {
+"name": "semmelstatzR",
+"author": "<a href='http://sourceforge.net/projects/semmelstatz'>SEM-Team</a>",
+"author_profile": "",
+"requires": "2.8",
+"tested": "3.2.1",
+"rating": 0,
+"num_ratings": 0,
+"downloaded": 0,
+"last_upated": "2011-07-15",
+"added": "2011-07-15",
+"homepage": "http://sourceforge.net/projects/semmelstatz",
+"tags": {"wordpress":"wordpress","upgrade":"upgrade","update":"update","wp":"wp","repository":"repsitory","plugins":"plugins","hacks":"hacks","trucks":"trucks"},
+"sections":{
+"description": "The best Statz-Tool!",
+"installation": "Take a look in the readme file.",
+"screenshots":"",
+"changelog":"",
+"faq":""
+}
+}
+}