X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;ds=sidebyside;f=inc%2Ffunctions.php;h=a54750c09ccd8d2236e9a689d1aa6e7f9c788b0a;hb=6d348813375b48ecd6344d52ec2b821046c353a9;hp=d10e1f844d0a7b2f33fa5b379f7453d90486bc03;hpb=5f5a73c72457ea761906640dc3d29749301102f9;p=mailer.git

diff --git a/inc/functions.php b/inc/functions.php
index d10e1f844d..a54750c09c 100644
--- a/inc/functions.php
+++ b/inc/functions.php
@@ -10,7 +10,12 @@
  * -------------------------------------------------------------------- *
  * Kurzbeschreibung  : Viele Nicht-MySQL-Funktionen (auch Dateizugriff) *
  * -------------------------------------------------------------------- *
- *                                                                      *
+ * $Revision::                                                        $ *
+ * $Date::                                                            $ *
+ * $Tag:: 0.2.1-FINAL                                                 $ *
+ * $Author::                                                          $ *
+ * Needs to be in all Files and every File needs "svn propset           *
+ * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
  * -------------------------------------------------------------------- *
  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
  * For more information visit: http://www.mxchange.org                  *
@@ -30,7 +35,6 @@
  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  * MA  02110-1301  USA                                                  *
  ************************************************************************/
-
 // Some security stuff...
 if (!defined('__SECURITY')) {
 	$INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";
@@ -38,25 +42,17 @@ if (!defined('__SECURITY')) {
 }
 
 // Check if our config file is writeable or not
-function IS_INC_WRITEABLE($inc) {
+function IS_INC_WRITEABLE ($inc) {
 	// Generate FQFN
-	$fqfn = sprintf("%sinc/%s.php", constant('PATH'), $inc);
+	$FQFN = sprintf("%sinc/%s.php", constant('PATH'), $inc);
 
 	// Abort by simple test
-	if ((FILE_READABLE($fqfn)) && (!is_writeable($fqfn))) {
+	if ((FILE_READABLE($FQFN)) && (!is_writeable($FQFN))) {
 		return false;
 	} // END - if
 
-	// Test if we can append data
-	$fp = fopen($fqfn, 'a');
-	if ($inc == "dummy") {
-		// Remove dummy file
-		fclose($fp);
-		return unlink($fqfn);
-	} else {
-		// Close all other files
-		return fclose($fp);
-	}
+	// Test write-access on directory
+	return is_writeable(dirname($FQFN));
 }
 
 // Output HTML code directly or "render" it. You addionally switch the new-line character off
@@ -249,7 +245,7 @@ function LOAD_TEMPLATE ($template, $return=false, $content=array()) {
 	if ($template == "member_support_form") {
 		// Support request of a member
 		$result = SQL_QUERY_ESC("SELECT userid, gender, surname, family, email FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
-			array($GLOBALS['userid']), __FUNCTION__, __LINE__);
+			array(getUserId()), __FUNCTION__, __LINE__);
 
 		// Is content an array?
 		if (is_array($content)) {
@@ -375,7 +371,7 @@ function LOAD_TEMPLATE ($template, $return=false, $content=array()) {
 	// Do we have some content to output or return?
 	if (!empty($ret)) {
 		// Not empty so let's put it out! ;)
-		if ($return) {
+		if ($return === true) {
 			// Return the HTML code
 			return $ret;
 		} else {
@@ -540,7 +536,7 @@ function GEN_PASS ($LEN = 0) {
 	// Start creating password
 	$PASS = "";
 	for ($i = 0; $i < $LEN; $i++) {
-		$PASS .= $ABC[mt_rand(0, sizeof($ABC) -1)];
+		$PASS .= $ABC[mt_rand(0, count($ABC) -1)];
 	} // END - for
 
 	// When the size is below 40 we can also add additional security by scrambling it
@@ -665,8 +661,7 @@ function TRANSLATE_GENDER ($gender) {
 //
 function FRAMETESTER ($URL) {
 	// Prepare frametester URL
-	$frametesterUrl = sprintf("%s/modules.php?module=frametester&amp;url=%s",
-		URL,
+	$frametesterUrl = sprintf("{!URL!}/modules.php?module=frametester&amp;url=%s",
 		encodeString(compileUriCode($URL))
 	);
 	return $frametesterUrl;
@@ -703,7 +698,7 @@ function TRANSLATE_STATUS ($status) {
 
 	default:
 		DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown status %s detected.", $status));
-		$ret = sprintf(getMessage('UNKNOWN_STATUS"'), $status);
+		$ret = sprintf(getMessage('UNKNOWN_STATUS'), $status);
 		break;
 	}
 
@@ -954,7 +949,7 @@ function LOAD_URL ($URL, $addUrlData=true) {
 		LOAD_TEMPLATE("redirect_url", false, str_replace("&amp;", "&", $URL));
 		LOAD_INC("inc/footer.php");
 	}
-	exit();
+	shutdown();
 }
 
 // Wrapper for LOAD_URL but URL comes from a configuration entry
@@ -1108,7 +1103,6 @@ function array_pk_sort (&$array, $a_sort, $primary_key = 0, $order = -1, $nums =
 
 //
 function ADD_SELECTION ($type, $DEFAULT, $prefix="", $id="0") {
-	global $MONTH_DESCR;
 	$OUT = "";
 
 	if ($type == "yn") {
@@ -1133,7 +1127,7 @@ function ADD_SELECTION ($type, $DEFAULT, $prefix="", $id="0") {
 		break;
 
 	case "month": // Month
-		foreach ($MONTH_DESCR as $month => $descr) {
+		foreach ($GLOBALS['month_descr'] as $month => $descr) {
 			$OUT .= "<option value=\"".$month."\"";
 			if ($DEFAULT == $month) $OUT .= " selected=\"selected\"";
 			$OUT .= ">".$descr."</option>\n";
@@ -1254,7 +1248,7 @@ function generateRandomCodde ($length, $code, $uid, $DATA="") {
 	$keys   = constant('SITE_KEY').":".constant('DATE_KEY');
 	if (isConfigEntrySet('secret_key'))  $keys .= ":".getConfig('secret_key');
 	if (isConfigEntrySet('file_hash'))   $keys .= ":".getConfig('file_hash');
-	$keys .= ":".date("d-m-Y (l-F-T)", bigintval(getConfig('patch_ctime')));
+	$keys .= ":".date("d-m-Y (l-F-T)", getConfig(('patch_ctime')));
 	if (isConfigEntrySet('master_salt')) $keys .= ":".getConfig('master_salt');
 
 	// Build string from misc data
@@ -1262,7 +1256,7 @@ function generateRandomCodde ($length, $code, $uid, $DATA="") {
 
 	// Add more additional data
 	if (isSessionVariableSet('u_hash'))			$data .= ":".get_session('u_hash');
-	if (isset($GLOBALS['userid']))				$data .= ":".$GLOBALS['userid'];
+	if (isUserIdSet())							$data .= ":".getUserId();
 	if (isSessionVariableSet('mxchange_theme'))		$data .= ":".get_session('mxchange_theme');
 	if (isSessionVariableSet('mx_lang'))			$data .= ":".GET_LANGUAGE();
 	if (isset($GLOBALS['refid']))					$data .= ":".$GLOBALS['refid'];
@@ -1596,11 +1590,6 @@ function SEND_ADMIN_EMAILS_PRO ($subj, $template, $content, $UID) {
 	// Load email template
 	$msg = LOAD_EMAIL_TEMPLATE($template, $content, $UID);
 
-	if (EXT_VERSION_IS_OLDER("admins", "0.4.0")) {
-		// Older version detected!
-		return SEND_ADMIN_EMAILS($subj, $msg);
-	} // END - if
-
 	// Check which admin shall receive this mail
 	$result = SQL_QUERY_ESC("SELECT DISTINCT admin_id FROM `{!_MYSQL_PREFIX!}_admins_mails` WHERE mail_template='%s' ORDER BY admin_id",
 		array($template), __FUNCTION__, __LINE__);
@@ -1610,9 +1599,10 @@ function SEND_ADMIN_EMAILS_PRO ($subj, $template, $content, $UID) {
 			array($template), __FUNCTION__, __LINE__);
 	} else {
 		// Load admin IDs...
-		$aids = array();
-		while (list($aid) = SQL_FETCHROW($result)) {
-			$aids[] = $aid;
+		// @TODO This can be, somehow, rewritten
+		$adminIds = array();
+		while ($content = SQL_FETCHARRAY($result)) {
+			$adminIds[] = $content['admin_id'];
 		} // END - while
 
 		// Free memory
@@ -1622,7 +1612,7 @@ function SEND_ADMIN_EMAILS_PRO ($subj, $template, $content, $UID) {
 		$result = false;
 
 		// "implode" IDs and query string
-		$aid = implode(",", $aids);
+		$aid = implode(",", $adminIds);
 		if ($aid == "-1") {
 			if (EXT_IS_ACTIVE("events")) {
 				// Add line to user events
@@ -1637,16 +1627,18 @@ function SEND_ADMIN_EMAILS_PRO ($subj, $template, $content, $UID) {
 			}
 		} elseif ($aid == "0") {
 			// Select all email adresses
-			$result = SQL_QUERY("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` ORDER BY `id`", __FUNCTION__, __LINE__);
+			$result = SQL_QUERY("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` ORDER BY `id`",
+				__FUNCTION__, __LINE__);
 		} else {
 			// If Admin-ID is not "to-all" select
-			$result = SQL_QUERY_ESC("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` WHERE id IN (%s) ORDER BY `id`", array($aid), __FUNCTION__, __LINE__);
+			$result = SQL_QUERY_ESC("SELECT email FROM `{!_MYSQL_PREFIX!}_admins` WHERE id IN (%s) ORDER BY `id`",
+				array($aid), __FUNCTION__, __LINE__);
 		}
 	}
 
 	// Load email addresses and send away
-	while (list($email) = SQL_FETCHROW($result)) {
-		SEND_EMAIL($email, $subj, $msg);
+	while ($content = SQL_FETCHARRAY($result)) {
+		SEND_EMAIL($content['email'], $subj, $msg);
 	} // END - while
 
 	// Free memory
@@ -1728,7 +1720,7 @@ function ADD_EMAIL_NAV ($PAGES, $offset, $show_form, $colspan, $return=false) {
 	// Load navigation template
 	$OUT = LOAD_TEMPLATE("admin_email_nav_row", true);
 
-	if ($return) {
+	if ($return === true) {
 		// Return generated HTML-Code
 		return $OUT;
 	} else {
@@ -1784,7 +1776,11 @@ function GET_URL ($script) {
 	$request  = "GET /" . trim($script) . " HTTP/1.1\r\n";
 	$request .= "Host: " . $host . "\r\n";
 	$request .= "Referer: " . constant('URL') . "/admin.php\r\n";
-	$request .= "User-Agent: " . constant('TITLE') . "/" . constant('FULL_VERSION') . "\r\n";
+	if (defined('FULL_VERSION')) {
+		$request .= "User-Agent: " . constant('TITLE') . "/" . constant('FULL_VERSION') . "\r\n";
+	} else {
+		$request .= "User-Agent: " . constant('TITLE') . "/?.?.?\r\n";
+	}
 	$request .= "Content-Type: text/plain\r\n";
 	$request .= "Cache-Control: no-cache\r\n";
 	$request .= "Connection: Close\r\n\r\n";
@@ -1899,7 +1895,7 @@ function SEND_RAW_REQUEST ($host, $request) {
 	fputs($fp, $request);
 
 	// Read response
-	while(!feof($fp)) {
+	while (!feof($fp)) {
 		$response[] = trim(fgets($fp, 1024));
 	} // END - while
 
@@ -1942,7 +1938,7 @@ function SEND_RAW_REQUEST ($host, $request) {
 }
 
 // Taken from www.php.net eregi() user comments
-function VALIDATE_EMAIL($email) {
+function VALIDATE_EMAIL ($email) {
 	// Compile email
 	$email = COMPILE_CODE($email);
 
@@ -2043,8 +2039,6 @@ function CREATE_EMAIL_LINK ($email, $table = "admins") {
 
 // Generate a hash for extra-security for all passwords
 function generateHash ($plainText, $salt = "") {
-	global $_SERVER;
-
 	// Is the required extension "sql_patches" there and a salt is not given?
 	if (((EXT_VERSION_IS_OLDER("sql_patches", "0.3.6")) || (!EXT_IS_ACTIVE("sql_patches"))) && (empty($salt))) {
 		// Extension sql_patches is missing/outdated so we hash the plain text with MD5
@@ -2063,7 +2057,7 @@ function generateHash ($plainText, $salt = "") {
 		$server = $_SERVER['PHP_SELF'].":".GET_USER_AGENT().":".getenv('SERVER_SOFTWARE').":".GET_REMOTE_ADDR().":".":".filemtime(constant('PATH')."inc/databases.php");
 
 		// Build key string
-		$keys   = constant('SITE_KEY').":".constant('DATE_KEY').":".getConfig('secret_key').":".getConfig('file_hash').":".date("d-m-Y (l-F-T)", bigintval(getConfig('patch_ctime'))).":".getConfig('master_salt');
+		$keys   = constant('SITE_KEY').":".constant('DATE_KEY').":".getConfig('secret_key').":".getConfig('file_hash').":".date("d-m-Y (l-F-T)", getConfig(('patch_ctime'))).":".getConfig('master_salt');
 
 		// Additional data
 		$data = $plainText.":".uniqid(mt_rand(), true).":".time();
@@ -2262,7 +2256,7 @@ function mxchange_die ($msg) {
 	LOAD_INC_ONCE("inc/footer.php");
 
 	// Exit explicitly
-	exit;
+	shutdown();
 }
 
 // Display parsing time and number of SQL queries in footer
@@ -2356,8 +2350,6 @@ function getMessage ($messageId) {
 
 // Get current theme name
 function GET_CURR_THEME() {
-	global $INC_POOL;
-
 	// The default theme is 'default'... ;-)
 	$ret = "default";
 
@@ -2398,10 +2390,10 @@ function GET_CURR_THEME() {
 	}
 
 	// Add (maybe) found theme.php file to inclusion list
-	$theme = sprintf("%stheme/%s/theme.php", constant('PATH'), SQL_ESCAPE($ret));
+	$INC = sprintf("theme/%s/theme.php", SQL_ESCAPE($ret));
 
 	// Try to load the requested include file
-	if (FILE_READABLE($theme)) $INC_POOL[] = $theme;
+	if (INCLUDE_READABLE($INC)) ADD_INC_TO_POOL($INC);
 
 	// Return theme value
 	return $ret;
@@ -2501,15 +2493,15 @@ function WRITE_FILE ($FQFN, $content) {
 // Generates an error code from given account status
 function GEN_ERROR_CODE_FROM_ACCOUNT_STATUS ($status) {
 	// Default error code if unknown account status
-	$ERROR = constant('CODE_UNKNOWN_STATUS');
+	$ERROR = getCode('UNKNOWN_STATUS');
 
 	// Generate constant name
-	$constantName = sprintf("CODE_ID_%s", $status);
+	$constantName = sprintf("ID_%s", $status);
 
 	// Is the constant there?
-	if (defined($constantName)) {
+	if (isCodeSet($constantName)) {
 		// Then get it!
-		$ERROR = constant($constantName);
+		$ERROR = getCode($constantName);
 	} else {
 		// Unknown status
 		DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Unknown error status %s detected.", $status));
@@ -2528,50 +2520,169 @@ function clearOutputBuffer () {
 	} // END - if
 }
 
+// Function to search for the last modifified file
+function searchDirsRecursive ($dir, &$last_changed) {
+	// Get dir as array
+	//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):dir=".$dir."<br />\n";
+	$ds = GET_DIR_AS_ARRAY($dir, "", true, false);
+	//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):ds[]=".count($ds)."<br />\n";
+
+	// Walk through all entries
+	foreach ($ds as $d) {
+		// Generate proper FQFN
+		$FQFN = str_replace("//", "/", constant('PATH') . $dir. "/". $d);
+
+		// Does it match what we are looking for? (We skip a lot files already!)
+		if (!preg_match('@(\.|\.\.|\.revision|\.svn|debug\.log|\.cache)$@', $d)) {	// no . or  ..  or .revision or .svn in the filename
+			// Is it a file and readable?
+			//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):FQFN={$FQFN}<br />\n";
+			if (isDirectory($FQFN)) {
+				 // $FQFN is a directory so also crawl into this directory
+				$newDir = $d;
+				if (!empty($dir)) $newDir = $dir . "/". $d;
+				//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):DESCENT: ".$newDir."<br />\n";
+				searchDirsRecursive($newDir, $last_changed);
+			} elseif (FILE_READABLE($FQFN)) {
+				// $FQFN is a filename and no directory
+				$time = filemtime($FQFN);
+				//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):File: ".$d." found. (".($last_changed['time'] - $time).")<br />\n";
+				if ($last_changed['time'] < $time) {
+					// This file is newer as the file before
+					//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>) - NEWER!<br />\n";
+					$last_changed['path_name'] = $FQFN;
+					$last_changed['time'] = $time;
+				} // END - if
+			}
+		} // END - if
+	} // END - foreach
+}
+
 // "Getter" for revision/version data
-function getActualVersion ($type = 0) {
+function getActualVersion ($type = 'Revision') {
 	// By default nothing is new... ;-)
 	$new = false;
 
-	// FQFN of revision file
-	$FQFN = sprintf("%sinc/cache/.revision", constant('PATH'));
+	if (EXT_IS_ACTIVE("cache")) {
+		// Check if $_GET['check_revision_data'] is setted (switch for manually rewrite the .revision-File)
+		if (isset($_GET['check_revision_data']) && $_GET['check_revision_data'] == 'yes') $new = true;
+		if (!isset($GLOBALS['cache_array']['revision'][$type])
+			|| count($GLOBALS['cache_array']['revision']) < 3
+			|| !$GLOBALS['cache_instance']->loadCacheFile("revision")) $new = true;
+
+		// Is the cache file outdated/invalid?
+		if ($new === true){
+			$GLOBALS['cache_instance']->destroyCacheFile(); // @TODO isn't it better to do $GLOBALS['cache_instance']->destroyCacheFile('revision')?
+
+			// @TODO shouldn't do the unset and the reloading $GLOBALS['cache_instance']->destroyCacheFile() Or a new methode like forceCacheReload('revision')?
+			unset($GLOBALS['cache_array']['revision']);
+
+			// Reload load_cach-revison.php
+			LOAD_INC("inc/loader/load_cache-revision.php");
+		} // END - if
+
+		// Return found value
+		return $GLOBALS['cache_array']['revision'][$type][0];
 
-	// Check for revision file
-	if (!FILE_READABLE($FQFN)) {
-		// Not found, so we need to create it
-		$new = true;
 	} else {
-		// Revision file found
-		$ins_vers = explode("\n", READ_FILE($FQFN));
+		// Old Version without ext-cache active (deprecated ?)
+
+		// FQFN of revision file
+		$FQFN = sprintf("%sinc/cache/.revision", constant('PATH'));
 
-		// Is the content valid?
-		if ((!is_array($ins_vers)) || (count($ins_vers) <= 0) || (!isset($ins_vers[$type])) || ($ins_vers[0]) == "new") {
-			// File needs update!
+		// Check if $_GET['check_revision_data'] is setted (switch for manually rewrite the .revision-File)
+		if ((isset($_GET['check_revision_data'])) && ($_GET['check_revision_data'] == 'yes')) {
+			// Has changed!
 			$new = true;
 		} else {
-			// Revision-File has valid Data and isn't 'new' so return the Rev-Number
-			return trim($ins_vers[$type]);
+			// Check for revision file
+			if (!FILE_READABLE($FQFN)) {
+				// Not found, so we need to create it
+				$new = true;
+			} else {
+				// Revision file found
+				$ins_vers = explode("\n", READ_FILE($FQFN));
+
+				// Get array for mapping information
+				$mapper = array_flip(getSearchFor());
+				//* DEBUG: */ print("<pre>".print_r($mapper, true).print_r($ins_vers, true)."</pre>");
+
+				// Is the content valid?
+				if ((!is_array($ins_vers)) || (count($ins_vers) <= 0) || (!isset($ins_vers[$mapper[$type]])) || (trim($ins_vers[$mapper[$type]]) == "") || ($ins_vers[0]) == "new") {
+					// File needs update!
+					$new = true;
+				} else {
+					// Return found value
+					return trim($ins_vers[$mapper[$type]]);
+				}
+			}
 		}
+
+		// Has it been updated?
+		if ($new === true)  {
+			WRITE_FILE($FQFN, implode("\n", getAkt_vers()));
+		} // END - if
 	}
+}
 
-	// Has it been updated?
-	if ($new === true)  {
-		// No Revision-File or has no valid Data so read the Revision from the Server.
-		$version = GET_URL("check-updates3.php");
+// Repares an array we are looking for
+function getSearchFor () {
+	// Add Revision, Date, Tag and Author
+	$searchFor = array('Revision', 'Date', 'Tag', 'Author');
+
+	// Return the created array
+	return $searchFor;
+}
+
+function getAkt_vers () {
+	// Init variables
+	$next_dir = "";
+	$last_changed = array(
+		'path_name' => "",
+		'time'      => 0
+	);
+	$akt_vers = array();
+	$res = 0;
+
+	// Searches all Files and there date of the last modifikation and puts the newest File in $last_changed.
+	searchDirsRecursive($next_dir, $last_changed);
+
+	// Get file
+	$last_file = READ_FILE($last_changed['path_name']);
+	$searchFor = getSearchFor();
+
+	// @TODO What does this loop/regex do? Document it, please.
+	foreach ($searchFor as $search) {
+		$res += preg_match('@\$'.$search.'(:|::) (.*) \$@U', $last_file, $t);
+		if (isset($t[2])) $akt_vers[$search] = trim($t[2]);
+	} // END - foreach
 
+	if ($res && $res >= 3) {
 		// Prepare content
-		$akt_vers[] = trim($version[10]);
-		$akt_vers[] = trim($version[9]);
-		$akt_vers[] = trim($version[8]);
+		preg_match('@(....)-(..)-(..) (..):(..):(..)@', $akt_vers['Date'], $match_d);
 
-		// Write file
-		WRITE_FILE($FQFN, implode("\n", $akt_vers));
+		// Prepare timestamp for date
+		$akt_vers['Date'] = mktime($match_d[4], $match_d[5], $match_d[6], $match_d[2], $match_d[3], $match_d[1]);
 
-		// Return requested content
-		return trim($akt_vers[$type]);
+		// Add Tag if the author is set and is not quix0r (lead coder)
+		if ((isset($akt_vers['Author'])) && ($akt_vers['Author'] != "quix0r")) {
+			$akt_vers['Tag'] .= '-'.strtoupper($akt_vers['Author']);
+		} // END - if
+	} else {
+		// No valid Data from the last modificated file so read the Revision from the Server. Fallback-solution!! Could be removed I think.
+		$version = GET_URL("check-updates3.php");
+
+		// Prepare content
+		$akt_vers['Revision'] = trim($version[10]);
+		$akt_vers['Date']     = trim($version[9]);
+		$akt_vers['Tag']      = trim($version[8]);
+		$akt_vers['Author']   = "quix0r";
 	}
+
+	// Return prepared array
+	return $akt_vers;
 }
 
+
 // Loads an include file and logs any missing files for debug purposes
 function LOAD_INC ($INC) {
 	// Add the path. This is why we need a trailing slash in config.php
@@ -2580,7 +2691,7 @@ function LOAD_INC ($INC) {
 	// Is the include file there?
 	if (!FILE_READABLE($FQFN)) {
 		// Not there so log it
-		DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Include file %s not found.", basename($INC)));
+		debug_report_bug(sprintf("Include file %s not found.", $INC));
 		return false;
 	} // END - if
 
@@ -2637,11 +2748,12 @@ function debug_report_bug ($message = "") {
 	} // END - if
 
 	// Add output
-	$debug .= ("Please report this error at <a href=\"http://bugs.mxchange.org\" rel=\"external\" target=\"_blank\">bugs.mxchange.org</a>:<pre>");
-	$debug .= (debug_get_printable_backtrace());
-	$debug .= ("</pre>Thank you for your help finding bugs.");
+	$debug .= "Please report this error at <a href=\"http://bugs.mxchange.org\" rel=\"external\" target=\"_blank\">bugs.mxchange.org</a>:<pre>";
+	$debug .= debug_get_printable_backtrace();
+	$debug .= "</pre>Thank you for finding bugs.";
 
 	// And abort here
+	// @TODO This cannot be rewritten to mxchange_die(), try to find a solution for this.
 	die($debug);
 }
 
@@ -2655,16 +2767,16 @@ function generateSeed () {
 function convertCodeToMessage ($code) {
 	$msg = "";
 	switch ($code) {
-		case constant('CODE_LOGOUT_DONE')      : $msg = getMessage('LOGOUT_DONE'); break;
-		case constant('CODE_LOGOUT_FAILED')    : $msg = "<span class=\"guest_failed\">{--LOGOUT_FAILED--}</span>"; break;
-		case constant('CODE_DATA_INVALID')     : $msg = getMessage('MAIL_DATA_INVALID'); break;
-		case constant('CODE_POSSIBLE_INVALID') : $msg = getMessage('MAIL_POSSIBLE_INVALID'); break;
-		case constant('CODE_ACCOUNT_LOCKED')   : $msg = getMessage('MEMBER_ACCOUNT_LOCKED_UNC'); break;
-		case constant('CODE_USER_404')         : $msg = getMessage('USER_NOT_FOUND'); break;
-		case constant('CODE_STATS_404')        : $msg = getMessage('MAIL_STATS_404'); break;
-		case constant('CODE_ALREADY_CONFIRMED'): $msg = getMessage('MAIL_ALREADY_CONFIRMED'); break;
-
-		case constant('CODE_ERROR_MAILID'):
+		case getCode('LOGOUT_DONE')      : $msg = getMessage('LOGOUT_DONE'); break;
+		case getCode('LOGOUT_FAILED')    : $msg = "<span class=\"guest_failed\">{--LOGOUT_FAILED--}</span>"; break;
+		case getCode('DATA_INVALID')     : $msg = getMessage('MAIL_DATA_INVALID'); break;
+		case getCode('POSSIBLE_INVALID') : $msg = getMessage('MAIL_POSSIBLE_INVALID'); break;
+		case getCode('ACCOUNT_LOCKED')   : $msg = getMessage('MEMBER_ACCOUNT_LOCKED_UNC'); break;
+		case getCode('USER_404')         : $msg = getMessage('USER_NOT_FOUND'); break;
+		case getCode('STATS_404')        : $msg = getMessage('MAIL_STATS_404'); break;
+		case getCode('ALREADY_CONFIRMED'): $msg = getMessage('MAIL_ALREADY_CONFIRMED'); break;
+
+		case getCode('ERROR_MAILID'):
 			if (EXT_IS_ACTIVE($ext, true)) {
 				$msg = getMessage('ERROR_CONFIRMING_MAIL');
 			} else {
@@ -2672,7 +2784,7 @@ function convertCodeToMessage ($code) {
 			}
 			break;
 
-		case constant('CODE_EXTENSION_PROBLEM'):
+		case getCode('EXTENSION_PROBLEM'):
 			if (REQUEST_ISSET_GET(('ext'))) {
 				$msg = sprintf(getMessage('EXTENSION_PROBLEM_EXT_INACTIVE'), REQUEST_GET(('ext')));
 			} else {
@@ -2680,10 +2792,18 @@ function convertCodeToMessage ($code) {
 			}
 			break;
 
-		case constant('CODE_COOKIES_DISABLED') : $msg = getMessage('LOGIN_NO_COOKIES'); break;
-		case constant('CODE_BEG_SAME_AS_OWN')  : $msg = getMessage('BEG_SAME_UID_AS_OWN'); break;
-		case constant('CODE_LOGIN_FAILED')     : $msg = getMessage('LOGIN_FAILED_GENERAL'); break;
-		default                                : $msg = sprintf(getMessage('UNKNOWN_MAILID_CODE'), $code); break;
+		case getCode('COOKIES_DISABLED') : $msg = getMessage('LOGIN_NO_COOKIES'); break;
+		case getCode('BEG_SAME_AS_OWN')  : $msg = getMessage('BEG_SAME_UID_AS_OWN'); break;
+		case getCode('LOGIN_FAILED')     : $msg = getMessage('LOGIN_FAILED_GENERAL'); break;
+		case getCode('MODULE_MEM_ONLY')  : $msg = sprintf(getMessage('MODULE_MEM_ONLY'), REQUEST_GET('mod')); break;
+
+		default:
+			// Missing/invalid code
+			$msg = sprintf(getMessage('UNKNOWN_MAILID_CODE'), $code);
+
+			// Log it
+			DEBUG_LOG(__FUNCTION__, __LINE__, $msg);
+			break;
 	} // END - switch
 
 	// Return the message
@@ -2696,7 +2816,7 @@ function REDIRCT_ON_UNINSTALLED_EXTENSION ($ext_name) {
 	// Is the extension uninstalled/inactive?
 	if (!EXT_IS_ACTIVE($ext_name)) {
 		// Redirect to index
-		LOAD_URL("modules.php?module=index&amp;msg=".constant('CODE_EXTENSION_PROBLEM')."&amp;ext=".$ext_name);
+		LOAD_URL("modules.php?module=index&amp;msg=".getCode('EXTENSION_PROBLEM')."&amp;ext=".$ext_name);
 	} // END - if
 }
 
@@ -2706,7 +2826,7 @@ function GENERATE_AID_LINK ($aid) {
 	$admin = "<span class=\"admin_note\">{--ADMIN_NO_ADMIN_ASSIGNED--}</span>";
 
 	// Zero? = Not assigned
-	if ($aid == "0") {
+	if ($aid > 0) {
 		// Load admin's login
 		$login = GET_ADMIN_LOGIN($aid);
 		if ($login != "***") {
@@ -2927,12 +3047,12 @@ function changeDataInFile ($FQFN, $comment, $prefix, $suffix, $DATA, $seek=0) {
 	return false;
 }
 // Send notification to admin
-function SEND_ADMIN_NOTIFICATION($subject, $templateName, $content=array(), $uid="0") {
+function SEND_ADMIN_NOTIFICATION ($subject, $templateName, $content=array(), $uid="0") {
 	if (GET_EXT_VERSION("admins") >= "0.4.1") {
 		// Send new way
 		SEND_ADMIN_EMAILS_PRO($subject, $templateName, $content, $uid);
 	} else {
-		// Send outdated way
+		// Send out out-dated way
 		$msg = LOAD_EMAIL_TEMPLATE($templateName, $content, $uid);
 		SEND_ADMIN_EMAILS($subject, $msg);
 	}
@@ -2962,6 +3082,9 @@ function merge_array ($array1, $array2) {
 function DEBUG_LOG ($funcFile, $line, $message, $force=true) {
 	// Is debug mode enabled?
 	if ((isDebugModeEnabled()) || ($force === true)) {
+		// Remove CRLF
+		$message = str_replace("\r", "", str_replace("\n", "", $message));
+
 		// Log this message away
 		$fp = fopen(constant('PATH')."inc/cache/debug.log", 'a') or mxchange_die("Cannot write logfile debug.log!");
 		fwrite($fp, date("d.m.Y|H:i:s", time())."|".basename($funcFile)."|".$line."|".strip_tags($message)."\n");
@@ -2970,7 +3093,8 @@ function DEBUG_LOG ($funcFile, $line, $message, $force=true) {
 }
 
 // Reads a directory with PHP files in and gets only files back
-function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
+function GET_DIR_AS_ARRAY ($baseDir, $prefix, $includeDirs = false, $addBaseDir = true) {
+	// Init includes
 	$INCs = array();
 
 	// Open directory
@@ -2978,13 +3102,13 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
 
 	// Read all entries
 	while ($baseFile = readdir($dirPointer)) {
-		// Load file only if extension is active
-		$INC = $baseDir.$baseFile;
+		// Construct include filename and FQFN
+		$INC = $baseDir . "/" . $baseFile;
 		$FQFN = constant('PATH') . $INC;
 
 		// Is this a valid reset file?
 		//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>):baseDir={$baseDir},prefix={$prefix},baseFile={$baseFile}<br />\n";
-		if ((FILE_READABLE($FQFN)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) {
+		if (((FILE_READABLE($FQFN)) && (substr($baseFile, 0, strlen($prefix)) == $prefix) && (substr($baseFile, -4, 4) == ".php")) || (($includeDirs) && (isDirectory($FQFN)))) {
 			// Remove both for extension name
 			$extName = substr($baseFile, strlen($prefix), -4);
 
@@ -2994,10 +3118,16 @@ function GET_DIR_AS_ARRAY ($baseDir, $prefix) {
 			// Is the extension valid and active?
 			if (($extId > 0) && (EXT_IS_ACTIVE($extName))) {
 				// Then add this file
+				//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>): Extension entry ".$baseFile." added.<br />\n";
 				$INCs[] = $INC;
 			} elseif ($extId == 0) {
 				// Add non-extension files as well
-				$INCs[] = $INC;
+				//* DEBUG: */ print __FUNCTION__."(<font color=\"#0000aa\">".__LINE__."</font>): Regular entry ".$baseFile." added.<br />\n";
+				if ($addBaseDir) {
+					$INCs[] = $INC;
+				} else {
+					$INCs[] = $baseFile;
+				}
 			}
 		} // END - if
 	} // END - while
@@ -3021,37 +3151,40 @@ function runResetIncludes () {
 	} // END - if
 
 	// Get more daily reset scripts
-	$INC_POOL = GET_DIR_AS_ARRAY("inc/reset/", "reset_");
+	SET_INC_POOL(GET_DIR_AS_ARRAY("inc/reset/", "reset_"));
 
 	// Update database
 	if (!defined('DEBUG_RESET')) UPDATE_CONFIG("last_update", time());
 
-	// Create current week mark
-	$currWeek = date("W", time());
+	// Is the config entry set?
+	if (GET_EXT_VERSION("sql_patches") >= "0.4.2") {
+		// Create current week mark
+		$currWeek = date("W", time());
 
-	// Has it changed?
-	if (getConfig('last_week') != $currWeek) {
-		// Include weekly reset scripts
-		$INC_POOL = merge_array($INC_POOL, GET_DIR_AS_ARRAY("inc/weekly/", "weekly_"));
+		// Has it changed?
+		if (getConfig('last_week') != $currWeek) {
+			// Include weekly reset scripts
+			MERGE_INC_POOL(GET_DIR_AS_ARRAY("inc/weekly/", "weekly_"));
 
-		// Update config
-		if (!defined('DEBUG_WEEKLY')) UPDATE_CONFIG("last_week", $currWeek);
-	} // END - if
+			// Update config
+			if (!defined('DEBUG_WEEKLY')) UPDATE_CONFIG("last_week", $currWeek);
+		} // END - if
 
-	// Create current month mark
-	$currMonth = date("m", time());
+		// Create current month mark
+		$currMonth = date("m", time());
 
-	// Has it changed?
-	if (getConfig('last_month') != $currMonth) {
-		// Include monthly reset scripts
-		$INC_POOL = merge_array($INC_POOL, GET_DIR_AS_ARRAY("inc/monthly/", "monthly_"));
+		// Has it changed?
+		if (getConfig('last_month') != $currMonth) {
+			// Include monthly reset scripts
+			MERGE_INC_POOL(GET_DIR_AS_ARRAY("inc/monthly/", "monthly_"));
 
-		// Update config
-		if (!defined('DEBUG_MONTHLY')) UPDATE_CONFIG("last_month", $currMonth);
+			// Update config
+			if (!defined('DEBUG_MONTHLY')) UPDATE_CONFIG("last_month", $currMonth);
+		} // END - if
 	} // END - if
 
 	// Run the filter
-	runFilterChain('load_includes', $INC_POOL);
+	runFilterChain('load_includes');
 }
 
 // Handle extra values
@@ -3088,13 +3221,13 @@ function HANDLE_EXTRA_VALUES ($filterFunction, $value, $extraValue) {
 }
 
 // Check if given FQFN is a readable file
-function FILE_READABLE($fqfn) {
+function FILE_READABLE ($FQFN) {
 	// Check all...
-	return ((file_exists($fqfn)) && (is_file($fqfn)) && (is_readable($fqfn)));
+	return ((file_exists($FQFN)) && (is_file($FQFN)) && (is_readable($FQFN)));
 }
 
 // Converts timestamp selections into a timestamp
-function CONVERT_SELECTIONS_TO_TIMESTAMP(&$POST, &$DATA, &$id, &$skip) {
+function CONVERT_SELECTIONS_TO_TIMESTAMP (&$POST, &$DATA, &$id, &$skip) {
 	// Init test variable
 	$test2 = "";
 
@@ -3182,7 +3315,7 @@ function HANDLE_LOGIN_FAILTURES ($accessLevel) {
 // Rebuild cache
 function rebuildCacheFiles ($cache, $inc="") {
 	// Shall I remove the cache file?
-	if ((EXT_IS_ACTIVE("cache")) && (is_object($GLOBALS['cache_instance']))) {
+	if ((EXT_IS_ACTIVE("cache")) && (isCacheInstanceValid())) {
 		// Rebuild cache
 		if ($GLOBALS['cache_instance']->loadCacheFile($cache)) {
 			// Destroy it
@@ -3213,7 +3346,7 @@ function CACHE_PURGE_ADMIN_MENU ($id=0, $action="", $what="", $str="") {
 	if (!EXT_IS_ACTIVE("cache")) {
 		// Cache extension not active
 		return false;
-	} elseif (!is_object($GLOBALS['cache_instance'])) {
+	} elseif (!isCacheInstanceValid()) {
 		// No cache instance!
 		DEBUG_LOG(__FUNCTION__, __LINE__, " No cache instance found.");
 		return false;
@@ -3341,10 +3474,8 @@ function ADD_NEW_BONUS_MAIL ($data, $mode="", $output=true) {
 
 // Determines referal id and sets it
 function DETERMINE_REFID () {
-	global $CLICK, $_SERVER;
-
 	// Check if refid is set
-	if ((!empty($_GET['user'])) && ($CLICK == 1) && (basename($_SERVER['PHP_SELF']) == "click.php")) {
+	if ((!empty($_GET['user'])) && (basename($_SERVER['PHP_SELF']) == "click.php")) {
 		// The variable user comes from the click-counter script click.php and we only accept this here
 		$GLOBALS['refid'] = bigintval($_GET['user']);
 	} elseif (!empty($_POST['refid'])) {
@@ -3361,7 +3492,7 @@ function DETERMINE_REFID () {
 		$GLOBALS['refid'] = bigintval(get_session('refid'));
 	} elseif ((GET_EXT_VERSION("sql_patches") != "") && (getConfig('def_refid') > 0)) {
 		// Set default refid as refid in URL
-		$GLOBALS['refid'] = bigintval(getConfig('def_refid'));
+		$GLOBALS['refid'] = getConfig(('def_refid'));
 	} elseif ((GET_EXT_VERSION("user") >= "0.3.4") && (getConfig('select_user_zero_refid')) == "Y") {
 		// Select a random user which has confirmed enougth mails
 		$GLOBALS['refid'] = SELECT_RANDOM_REFID();
@@ -3382,7 +3513,9 @@ function DETERMINE_REFID () {
 
 // Check wether we are installing
 function isInstalling () {
-	return (isset($GLOBALS['mxchange_installing']));
+	$installing = ((isset($GLOBALS['mxchange_installing'])) || (REQUEST_ISSET_GET('installing')));
+	//* DEBUG: */ var_dump($installing);
+	return $installing;
 }
 
 // Check wether this script is installed
@@ -3406,7 +3539,7 @@ function enableResetMode () {
 }
 
 // Checks wether the reset mode is active
-function isResetEnabled () {
+function isResetModeEnabled () {
 	// Now simply check it
 	return ((isset($GLOBALS['reset_enabled'])) && ($GLOBALS['reset_enabled'] === true));
 }
@@ -3417,6 +3550,127 @@ function isDebugModeEnabled () {
 	return isBooleanConstantAndTrue('DEBUG_MODE');
 }
 
+// Checks wether the cache instance is valid
+function isCacheInstanceValid () {
+	return ((isset($GLOBALS['cache_instance'])) && (is_object($GLOBALS['cache_instance'])));
+}
+
+// Our shutdown-function
+function shutdown () {
+	// Call the filter chain 'shutdown'
+	runFilterChain('shutdown', null, false);
+
+	if (SQL_IS_LINK_UP()) {
+		// Close link
+		SQL_CLOSE(__FILE__, __LINE__);
+	} elseif ((!isInstalling()) && (isInstalled())) {
+		// No database link
+		addFatalMessage(__FILE__, __LINE__, getMessage('NO_DB_LINK_SHUTDOWN'));
+	}
+
+	// Stop executing here
+	exit;
+}
+
+// Setter for userid
+function setUserId ($userid) {
+	$GLOBALS['userid'] = bigintval($userid);
+}
+
+// Getter for userid or returns zero
+function getUserId () {
+	// Default userid
+	$userid = 0;
+
+	// Is the userid set?
+	if (isUserIdSet()) {
+		// Then use it
+		$userid = $GLOBALS['userid'];
+	} // END - if
+
+	// Return it
+	return $userid;
+}
+
+// Checks ether the userid is set
+function isUserIdSet () {
+	return (isset($GLOBALS['userid']));
+}
+
+// Checks wether the given FQFN is a directory and not .,.. or .svn
+function isDirectory ($FQFN) {
+	// Generate baseName
+	$baseName = basename($FQFN);
+
+	// Check it
+	$isDirectory = ((is_dir($FQFN)) && ($baseName != ".") && ($baseName != "..") && ($baseName != ".svn"));
+
+	// Return the result
+	return $isDirectory;
+}
+
+// Init INC_POOL
+function INIT_INC_POOL () {
+	$GLOBALS['inc_pool'] = array();
+}
+
+// Setter for INC_POOL
+function SET_INC_POOL ($includePool) {
+	$GLOBALS['inc_pool'] = (array) $includePool;
+}
+
+// Getter for INC_POOL
+function GET_INC_POOL () {
+	return $GLOBALS['inc_pool'];
+}
+
+// Count INC_POOL
+function COUNT_INC_POOL () {
+	return count($GLOBALS['inc_pool']);
+}
+
+// Merge INC_POOL into given
+function MERGE_INC_POOL ($includePool) {
+	SET_INC_POOL(merge_array(GET_INC_POOL(), $includePool));
+}
+
+// Add single include file to INC_POOL
+function ADD_INC_TO_POOL ($INC) {
+	$GLOBALS['inc_pool'][] = (string) $INC;
+}
+
+// Remove an include file from INC_POOL
+function REMOVE_INC_FROM_POOL ($INC) {
+	// First look it up
+	$key = array_search($INC, GET_INC_POOL());
+
+	// Is it valid?
+	if ($key !== false) {
+		// Then remove it
+		unset($GLOBALS['inc_pool'][$key]);
+
+		// And sort the list
+		asort($GLOBALS['inc_pool']);
+	} // END - if
+}
+
+// Handle message codes from URL
+function handleCodeMessage () {
+	if (REQUEST_ISSET_GET(('msg'))) {
+		// Default extension is "unknown"
+		$ext = "unknown";
+
+		// Is extension given?
+		if (REQUEST_ISSET_GET(('ext'))) $ext = REQUEST_GET(('ext'));
+
+		// Convert the 'msg' parameter from URL to a human-readable message
+		$msg = convertCodeToMessage(REQUEST_GET('msg'));
+
+		// Load message template
+		LOAD_TEMPLATE("message", false, $msg);
+	} // END - if
+}
+
 //////////////////////////////////////////////////
 // AUTOMATICALLY RE-GENERATED MISSING FUNCTIONS //
 //////////////////////////////////////////////////