X-Git-Url: https://git.mxchange.org/?p=mailer.git;a=blobdiff_plain;f=inc%2Flibs%2Fuser_functions.php;h=06d621c0a877b29488a5ceaab649235c502666d0;hp=1e5bfa4d529be10ee504c66e164bd3ad8894e741;hb=e937b6540b932d537f72e827de76dd5be4aefe48;hpb=c9b17a86f4d62b50b8b1fbe6f9d88e6092430526

diff --git a/inc/libs/user_functions.php b/inc/libs/user_functions.php
index 1e5bfa4d52..06d621c0a8 100644
--- a/inc/libs/user_functions.php
+++ b/inc/libs/user_functions.php
@@ -16,8 +16,8 @@
  * $Author::                                                          $ *
  * -------------------------------------------------------------------- *
  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
- * Copyright (c) 2009, 2010 by Mailer Developer Team                    *
- * For more information visit: http://www.mxchange.org                  *
+ * Copyright (c) 2009 - 2012 by Mailer Developer Team                   *
+ * For more information visit: http://mxchange.org                      *
  *                                                                      *
  * 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 *
@@ -41,69 +41,72 @@ if (!defined('__SECURITY')) {
 } // END - if
 
 // Add links for selecting some users
-function alpha ($sortby, $colspan, $return=false) {
-	if (!isGetRequestParameterSet('offset')) setGetRequestParameter('offset', 0);
-	$add = '&page='.getRequestParameter('page').'&offset='.getRequestParameter('offset');
-	if (isGetRequestParameterSet('mode')) $add .= '&mode='.getRequestParameter('mode');
+function addAlphabeticalSorting ($sortby) {
+	$add = '';
+	foreach (array('page', 'offset', 'do', 'status') as $param) {
+		if (isGetRequestElementSet($param)) {
+			$add .= '&' . $param . '=' . getRequestElement($param);
+		} // END - if
+	} // END - foreach
 
-	/* Creates the list of letters and makes them a link. */
+	// Creates the list of letters and makes them a link.
 	$alphabet = explode(',', 'A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,');
 	$num = count($alphabet) - 1;
+
+	// Add all letter links
 	$OUT = '';
 	while (list($counter, $ltr) = each($alphabet)) {
-		if (getRequestParameter('letter') == $ltr) {
+		if (getRequestElement('letter') == $ltr) {
 			// Current letter is letter from URL
 			$OUT .= '<strong>' . $ltr . '</strong>';
 		} else {
 			// Output link to letter
-			$OUT .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat();
-			if (isGetRequestParameterSet('mode')) $OUT .= '&amp;mode=' . getRequestParameter('mode');
-			$OUT .= '&amp;letter=' . $ltr . '&amp;sortby=' . $sortby . $add . '%}">' . $ltr . '</a>';
+			$OUT .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat() . '&amp;letter=' . $ltr . '&amp;sortby=' . $sortby . $add . '%}">' . $ltr . '</a>';
 		}
 
-		if ((($counter / getConfig('user_alpha')) == round($counter / getConfig('user_alpha'))) && ($counter > 0)) {
+		if ((($counter / getUserAlpha()) == round($counter / getUserAlpha())) && ($counter > 0)) {
 			$OUT .= ']<br />[';
-		} elseif ( $counter != $num ) {
+		} elseif ($counter != $num) {
 			$OUT .= '|';
 		}
 	} // END - while
 
 	// Prepare content
 	$content = array (
-		'colspan2'        => $colspan,
-		'alpha_selection' => $OUT
+		'alpha_selection' => $OUT,
 	);
 
 	// Load template
 	$OUT = loadTemplate('admin_list_user_alpha', true, $content);
-	if ($return === true) {
-		// Return generated code
-		return $OUT;
-	} else {
-		// Output generated code
-		outputHtml($OUT);
-	}
+
+	// Return generated code
+	return $OUT;
 }
 
 // Add links for sorting
-function addSortLinks ($letter, $sortby, $colspan, $return=false) {
+function addSortLinks ($letter, $sortby) {
 	$OUT = '';
-	if (!isGetRequestParameterSet('offset')) setGetRequestParameter('offset', 0);
-	if (!isGetRequestParameterSet('page'))   setGetRequestParameter('page'  , 0);
+	if (!isGetRequestElementSet('offset')) setGetRequestElement('offset', 0);
+	if (!isGetRequestElementSet('page'))   setGetRequestElement('page'  , 0);
 
 	// Add page and offset
-	$add = '&amp;page=' . getRequestParameter('page') . '&amp;offset=' . getRequestParameter('offset');
+	$add = '&amp;page=' . getRequestElement('page') . '&amp;offset=' . getRequestElement('offset');
 
-	// Add status or mode
-	if (isGetRequestParameterSet('status'))   $add .= '&amp;mode=' . getRequestParameter('status');
-	elseif (isGetRequestParameterSet('mode')) $add .= '&amp;mode=' . getRequestParameter('mode');
+	// Add status/ mode
+	foreach (array('do','status') as $param) {
+		if (isGetRequestElementSet($param)) {
+			$add .= '&amp;' . $param . '=' . getRequestElement($param);
+		} // END - if
+	} // END - foreach
 
 	// Makes order by links..
-	if ($letter == 'front') $letter = '';
+	if ($letter == 'front') {
+		$letter = '';
+	} // END - if
 
 	// Prepare array with all possible sorters
 	$list = array(
-		'userid'      => '{--_UID--}',
+		'userid'      => '{--_USERID--}',
 		'family'      => '{--FAMILY--}',
 		'email'       => '{--EMAIL--}',
 		'REMOTE_ADDR' => '{--REMOTE_IP--}'
@@ -122,79 +125,67 @@ function addSortLinks ($letter, $sortby, $colspan, $return=false) {
 		}
 	} // END - foreach
 
-	// Add list and colspan
+	// Add output
 	$content['list'] = substr($OUT, 0, -1);
-	$content['colspan2'] = $colspan;
 
 	// Load template
 	$OUT = loadTemplate('admin_list_user_sort', true, $content);
 
-	// Should we return or output?
-	if ($return === true) {
-		// Return code
-		return $OUT;
-	} else {
-		// Output code
-		outputHtml($OUT);
-	}
+	// Return code
+	return $OUT;
 }
 
 // Add page navigation
-function addPageNavigation ($numPages, $offset, $showForm, $colspan, $return=false) {
-	// @TODO These two constants are no longer used, maybe we reactivate this code?
-	//if ($showForm === true) {
-	//	// Load form for changing number of lines
-	//	define('__FORM_HEADER', loadTemplate('admin_list_user_sort_form', true));
-	//	define('__FORM_FOOTER', '<tr><td colspan="'.$colspan.'" class="seperator bottom">&nbsp;</td></tr>');
-	//} else {
-	//	// Empty row
-	//	define('__FORM_HEADER', '<tr><td colspan="' . $colspan . '" class="seperator">&nbsp;</td></tr>');
-	//	define('__FORM_FOOTER', '<tr><td colspan="' . $colspan . '" class="seperator bottom">&nbsp;</td></tr>');
-	//}
-
+function addPageNavigation ($numPages) {
+	// Start with empty content
 	$OUT = '';
-	for ($page = 1; $page <= $numPages; $page++) {
-		if (($page == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
-			$OUT .= '<strong>-';
-		} else {
-			if (!isGetRequestParameterSet('letter')) setGetRequestParameter('letter', '');
-			if (!isGetRequestParameterSet('sortby')) setGetRequestParameter('sortby', 'userid');
 
-			// Base link
-			$OUT .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat();
+	// Create only the navigation if page count > 1
+	if ($numPages > 1) {
+		// Create navigation links for every page
+		for ($page = 1; $page <= $numPages; $page++) {
+			if (($page == getRequestElement('page')) || ((!isGetRequestElementSet('page')) && ($page == 1))) {
+				$OUT .= '<strong>-';
+			} else {
+				if (!isGetRequestElementSet('letter')) setGetRequestElement('letter', '');
+				if (!isGetRequestElementSet('sortby')) setGetRequestElement('sortby', 'userid');
 
-			// Add status or mode
-			if (isGetRequestParameterSet('status'))    $OUT .= '&amp;mode=' . getRequestParameter('status');
-			 elseif (isGetRequestParameterSet('mode')) $OUT .= '&amp;mode=' . getRequestParameter('mode');
+				// Base link
+				$OUT .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat();
 
-			// Letter and so on
-			$OUT .= '&amp;letter=' . getRequestParameter('letter') . '&amp;sortby=' . getRequestParameter('sortby') . '&amp;page=' . $page . '&amp;offset=' . $offset . '%}">';
-		}
+				// Add status/mode
+				foreach (array('do','status') as $param) {
+					if (isGetRequestElementSet($param)) {
+						$OUT .= '&amp;' . $param . '=' . getRequestElement($param);
+					} // END - if
+				} // END - foreach
 
-		$OUT .= $page;
+				// Letter and so on
+				$OUT .= '&amp;letter=' . getRequestElement('letter') . '&amp;sortby=' . getRequestElement('sortby') . '&amp;page=' . $page . '&amp;offset=' . getUserLimit() . '%}">';
+			}
 
-		if (($page == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
-			$OUT .= '-</strong>';
-		} else 	{
-			$OUT .= '</a>';
-		}
+			$OUT .= $page;
 
-		if ($page < $numPages) $OUT .= '|';
-	} // END - for
+			if (($page == getRequestElement('page')) || ((!isGetRequestElementSet('page')) && ($page == 1))) {
+				$OUT .= '-</strong>';
+			} else 	{
+				$OUT .= '</a>';
+			}
 
-	// Remember the list and colspan
-	$content['list']     = $OUT;
-	$content['colspan2'] = $colspan;
+			if ($page < $numPages) {
+				$OUT .= '|';
+			} // END - if
+		} // END - for
 
-	// Load template
-	$OUT = loadTemplate('admin_list_user_pagenav', true, $content);
-	if ($return === true) {
-		// Return code
-		return $OUT;
-	} else {
-		// Output code
-		outputHtml($OUT);
-	}
+		// Add list output
+		$content['list'] = $OUT;
+
+		// Load template
+		$OUT = loadTemplate('admin_list_user_pagenav', true, $content);
+	} // END - if
+
+	// Return code
+	return $OUT;
 }
 
 // Create email link to user's account
@@ -203,16 +194,22 @@ function generateUserEmailLink ($email, $mod = 'admin') {
 	$locked = " AND `status`='CONFIRMED'";
 
 	// But admins shall always see it
-	if (isAdmin()) $locked = '';
+	if (isAdmin()) {
+		$locked = '';
+	} // END - if
 
+	// Search for the email address
 	$result = SQL_QUERY_ESC("SELECT
 	`userid`
 FROM
 	`{?_MYSQL_PREFIX?}_user_data`
 WHERE
-	`email`='%s'" . $locked."
+	'%s' REGEXP `email`
+	" . $locked . "
 LIMIT 1",
 		array($email), __FUNCTION__, __LINE__);
+
+	// Is there an entry?
 	if (SQL_NUMROWS($result) == 1) {
 		// Load userid
 		list($userid) = SQL_FETCHROW($result);
@@ -228,34 +225,32 @@ LIMIT 1",
 	return $email;
 }
 
-// Selects a random user id as the new referal id if they have at least X confirmed mails in this run
-// @TODO Double-check configuration entry here
-function determineRandomReferalId () {
+// Selects a random user id as the new referral id if they have at least X confirmed mails in this run
+function determineRandomReferralId () {
 	// Default is zero refid
-	$refid = null;
+	$refid = NULL;
 
 	// Is the extension version fine?
-	if (isExtensionInstalledAndNewer('user', '0.3.4')) {
+	if ((isRandomReferralIdEnabled()) && (isExtensionInstalledAndNewer('user', '0.3.4'))) {
 		// Get all user ids
-		$totalUsers = countSumTotalData('CONFIRMED', 'user_data', 'userid', 'status', true, " AND `rand_confirmed` >= {?user_min_confirmed?}");
+		$totalUsers = countSumTotalData('CONFIRMED', 'user_data', 'userid', 'status', true, runFilterChain('user_exclusion_sql', ' AND `rand_confirmed` >= {?user_min_confirmed?}'));
 
-		// Do we have at least one?
+		// Is there at least one?
 		if ($totalUsers > 0) {
-			// Then choose random number
-			$randNum = mt_rand(0, ($totalUsers - 1));
+			// Then choose random userid
+			$randUserid = mt_rand(0, ($totalUsers - 1));
 
 			// Look for random user
-			$result = SQL_QUERY_ESC("SELECT `userid` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `status`='CONFIRMED' AND `rand_confirmed` >= {?user_min_confirmed?} ORDER BY `rand_confirmed` DESC LIMIT %s, 1",
-				array($randNum), __FUNCTION__, __LINE__);
+			$result = SQL_QUERY_ESC("SELECT `userid` FROM `{?_MYSQL_PREFIX?}_user_data` " . runFilterChain('user_exclusion_sql', "WHERE `status`='CONFIRMED'") . ' AND `rand_confirmed` >= {?user_min_confirmed?} ORDER BY `rand_confirmed` DESC LIMIT %s, 1',
+				array($randUserid), __FUNCTION__, __LINE__);
 
-			// Do we have one entry there?
+			// Is there one entry there?
 			if (SQL_NUMROWS($result) == 1) {
-				// Use that userid as new referal id
+				// Use that userid as new referral id
 				list($refid) = SQL_FETCHROW($result);
 
-				// Reset all users, this makes this random referal id more challenging
-				SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `rand_confirmed`=0",
-					array($refid), __FUNCTION__, __LINE__);
+				// Debug message
+				/* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'refid=' . $refid . ' - choosen!');
 			} // END - if
 
 			// Free result
@@ -288,7 +283,7 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 	// Check login data
 	if ((isExtensionActive('nickname')) && (isNicknameUsed($userid))) {
 		// Nickname entered
-		fetchUserData($userid, 'nickname');
+		$isFound = fetchUserData($userid, 'nickname');
 	} elseif (isNicknameUsed($userid)) {
 		// No nickname installed
 		$errorCode = getCode('EXTENSION_PROBLEM');
@@ -302,11 +297,16 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 	if (($errorCode == '0') && ($isFound === true)) {
 		// Get user data array and set userid (e.g. important if we login with nickname)
 		$content = getUserDataArray();
-		if (!empty($content['userid'])) $userid = bigintval($content['userid']);
+		if (!empty($content['userid'])) {
+			$userid = bigintval($content['userid']);
+		} // END - if
 	} // END - if
 
+	// Debug message
+	//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',isUserDataValid()=' . intval(isUserDataValid()) . ',userStatus=' . getUserData('status') . ',errorCode=' . $errorCode . ',ext=' . $ext . ',isFound=' . intval($isFound));
+
 	// Is there an entry?
-	if ((isUserDataValid()) && (getUserData('status') == 'CONFIRMED') && (!empty($content['userid']))) {
+	if (($errorCode == '0') && (isUserDataValid()) && (getUserData('status') == 'CONFIRMED') && (!empty($content['userid']))) {
 		// Check for old MD5 passwords
 		if ((strlen(getUserData('password')) == 32) && (md5($passwd) == getUserData('password'))) {
 			// Just set the hash to the password from DB... :)
@@ -329,18 +329,25 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 			// No login bonus by default
 			$GLOBALS['bonus_payed'] = false;
 
-			// Probe for last online timemark
-			$probe = time() -  getUserData('last_online');
-			if (getUserData('last_login') > 0) $probe = time() - getUserData('last_login');
+			// Is bonus up-to-date?
+			if (isExtensionInstalledAndNewer('bonus', '0.2.2')) {
+				// Probe for last online timemark
+				$probe = time() -  getUserData('last_online');
+				if (getUserData('last_login') > 0) {
+					// Use timestamp from last login
+					$probe = time() - getUserData('last_login');
+				} // END - if
 
-			if ((isExtensionInstalledAndNewer('bonus', '0.2.2')) && ($probe >= getConfig('login_timeout'))) {
-				// Add login bonus to user's account
-				$add = ', `login_bonus`=`login_bonus`+{?login_bonus?}';
-				$GLOBALS['bonus_payed'] = true;
+				// Is the timeout reached?
+				if ($probe >= getConfig('login_timeout')) {
+					// Add login bonus to user's account
+					$add = ',`login_bonus`=`login_bonus`+{?login_bonus?}';
+					$GLOBALS['bonus_payed'] = true;
 
-				// Subtract login bonus from userid's account or jackpot
-				if ((isExtensionInstalledAndNewer('bonus', '0.3.5')) && (getBonusMode() != 'ADD')) {
-					handleBonusPoints('login_bonus');
+					// Subtract login bonus from userid's account or jackpot
+					if ((isExtensionInstalledAndNewer('bonus', '0.3.5')) && (getBonusMode() != 'ADD')) {
+						handleBonusPoints('login_bonus', $userid);
+					} // END - if
 				} // END - if
 			} // END - if
 
@@ -361,10 +368,10 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 						// Procedure to checking for login data
 						if (($GLOBALS['bonus_payed'] === true) && (isExtensionActive('bonus'))) {
 							// Bonus added (just displaying!)
-							$url = 'modules.php?module=chk_login&amp;mode=bonus';
+							$url = 'modules.php?module=chk_login&amp;do=bonus';
 						} else {
 							// Bonus not added
-							$url = 'modules.php?module=chk_login&amp;mode=login';
+							$url = 'modules.php?module=chk_login&amp;do=login';
 						}
 					} else {
 						// Use this URL
@@ -379,7 +386,7 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 				$errorCode = getCode('COOKIES_DISABLED');
 			}
 		} elseif (isExtensionInstalledAndNewer('sql_patches', '0.6.1')) {
-			// Update failture counter
+			// Update failure counter
 			SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `login_failures`=`login_failures`+1,`last_failure`=NOW() WHERE `userid`=%s LIMIT 1",
 				array($userid), __FUNCTION__, __LINE__);
 
@@ -391,9 +398,9 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 		$errorCode = generateErrorCodeFromUserStatus(getUserData('status'));
 
 		// Set userid in session
-		setSession('current_userid', getUserData('userid'));
+		setSession('userid', getUserData('userid'));
 	} elseif (!isUserDataValid()) {
-		// User id not found!
+		// User id not found
 		$errorCode = getCode('WRONG_ID');
 	} else {
 		// Unknown error
@@ -406,7 +413,9 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 		$url = $errorUrl . $errorCode;
 
 		// Extension set? Then add it as well.
-		if (!empty($ext)) $url .= '&amp;ext=' . $ext;
+		if (!empty($ext)) {
+			$url .= '&amp;ext=' . $ext;
+		} // END - if
 	} // END - if
 
 	// Return URL
@@ -415,77 +424,78 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
 
 // Try to send a new password for the given user account
 function doNewUserPassword ($email, $userid) {
-	// Init result and error
+	//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'email=' . $email . ',userid=' . $userid . ' - ENTERED!');
+	// Init found-status and error
 	$errorCode = '';
-	$result = false;
+	$accountFound = false;
 
 	// Probe userid/nickname
-	// @TODO We should try to rewrite this to fetchUserData() somehow
 	if (!empty($email)) {
 		// Email entered
-		$result = SQL_QUERY_ESC("SELECT `userid`, `status` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `email`='%s' OR `email`='%s' LIMIT 1",
-			array($email, str_replace('.', '{DOT}', $email)), __FUNCTION__, __LINE__);
+		$accountFound = fetchUserData($email, 'email');
 	} elseif ((isExtensionActive('nickname')) && (isNicknameOrUserid($userid))) {
 		// Nickname entered
-		$result = SQL_QUERY_ESC("SELECT `userid`, `status` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `nickname`='%s' OR `userid`='%s' OR `email`='%s' LIMIT 1",
-			array($userid, $userid, $email), __FUNCTION__, __LINE__);
+		$accountFound = fetchUserData($userid, 'nickname');
 	} elseif ((isValidUserId($userid)) && (empty($email))) {
 		// Direct userid entered
-		$result = SQL_QUERY_ESC("SELECT `userid`, `status` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `userid`=%s LIMIT 1",
-			array(bigintval($userid)), __FUNCTION__, __LINE__);
+		$accountFound = fetchUserData($userid);
 	} else {
 		// Userid not set!
-		logDebugMessage(__FUNCTION__, __LINE__, 'Userid is not set! BUG!');
-		$errorCode = getCode('WRONG_ID');
+		logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',email=' . $email . ': Important variables are empty.');
 	}
 
 	// Any entry found?
-	if (SQL_NUMROWS($result) == 1) {
-		// This data is valid, so we create a new pass... :-)
-		list($userid, $status) = SQL_FETCHROW($result);
-
-		if ($status == 'CONFIRMED') {
-			// Ooppps, this was missing! ;-) We should update the database...
+	if ($accountFound === true) {
+		// Is the account confirmed
+		if (getUserData('status') == 'CONFIRMED') {
+			// Generate new password
 			$NEW_PASS = generatePassword();
+
+			// Update database
 			SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `password`='%s' WHERE `userid`=%s LIMIT 1",
-				array(generateHash($NEW_PASS), $userid), __FUNCTION__, __LINE__);
+				array(generateHash($NEW_PASS), getUserData('userid')), __FUNCTION__, __LINE__);
 
 			// Prepare data and message for email
-			$message = loadEmailTemplate('new-pass', array('new_pass' => $NEW_PASS, 'nickname' => $userid), $userid);
+			$message = loadEmailTemplate('guest_new_password',
+				array(
+					'new_pass' => $NEW_PASS,
+					'nickname' => $userid
+				), bigintval(getUserData('userid')));
 
 			// ... and send it away
-			sendEmail($userid, '{--GUEST_NEW_PASSWORD--}', $message);
+			sendEmail(bigintval(getUserData('userid')), '{--GUEST_NEW_PASSWORD--}', $message);
 
 			// Output note to user
-			loadTemplate('admin_settings_saved', false, '{--GUEST_NEW_PASSWORD_SEND--}');
+			displayMessage('{--GUEST_NEW_PASSWORD_SEND--}');
 		} else {
 			// Account is locked or unconfirmed
-			$errorCode = generateErrorCodeFromUserStatus($status);
+			$errorCode = generateErrorCodeFromUserStatus(getUserData('status'));
 
 			// Load URL
-			redirectToUrl('modules.php?module=index&amp;what=login&amp;login='.$errorCode);
+			redirectToUrl('modules.php?module=index&amp;what=login&amp;login=' . $errorCode);
 		}
 	} else {
-		// id or email is wrong
-		loadTemplate('admin_settings_saved', false, '<span class="notice">{--GUEST_WRONG_ID_EMAIL--}</span>');
+		// Id or email is wrong
+		displayMessage('<span class="bad">{--GUEST_WRONG_ID_EMAIL--}</span>');
 	}
 
 	// Return the error code
+	//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'email=' . $email . ',userid=' . $userid . ',errorCode=' . $errorCode . ' - EXIT!');
 	return $errorCode;
 }
 
 // Get timestamp for given stats type and data
-function getTimestampFromUserStats ($statsType, $statsData, $userid = '0') {
+function getEpocheTimeFromUserStats ($statsType, $statsData, $userid = NULL) {
 	// Default timestamp is zero
 	$data['inserted'] = '0';
 
 	// User id set?
-	if ((isMemberIdSet()) && ($userid == '0')) {
+	if ((isMemberIdSet()) && (is_null($userid))) {
 		$userid = getMemberId();
 	} // END - if
 
 	// Is the extension installed and updated?
-	if ((!isExtensionActive('sql_patches')) || (isExtensionOlder('sql_patches', '0.5.6'))) {
+	if ((!isExtensionActive('sql_patches')) || (isExtensionInstalledAndOlder('sql_patches', '0.5.6'))) {
 		// Return zero here
 		return $data['inserted'];
 	} // END - if
@@ -522,13 +532,16 @@ LIMIT 1",
 // Inserts user stats
 function insertUserStatsRecord ($userid, $statsType, $statsData) {
 	// Is the extension installed and updated?
-	if ((!isExtensionActive('sql_patches')) || (isExtensionOlder('sql_patches', '0.5.6'))) {
+	if ((!isExtensionActive('sql_patches')) || (isExtensionInstalledAndOlder('sql_patches', '0.5.6'))) {
 		// Return zero here
 		return false;
 	} // END - if
 
+	// Default is not working
+	$return = false;
+
 	// Does it exist?
-	if ((!getTimestampFromUserStats($statsType, $statsData, $userid)) && (!is_array($statsData))) {
+	if ((!getEpocheTimeFromUserStats($statsType, $statsData, $userid)) && (!is_array($statsData))) {
 		// Then insert it!
 		SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_user_stats_data` (`userid`,`stats_type`,`stats_data`) VALUES (%s,'%s','%s')",
 			array(
@@ -536,10 +549,16 @@ function insertUserStatsRecord ($userid, $statsType, $statsData) {
 				$statsType,
 				$statsData
 			), __FUNCTION__, __LINE__);
+
+		// Does it have worked?
+		$return = (!SQL_HASZEROAFFECTED());
 	} elseif (is_array($statsData)) {
 		// Invalid data!
 		logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',type=' . $statsType . ',data=' . gettype($statsData) . ': Invalid statistics data type!');
 	}
+
+	// Return status
+	return $return;
 }
 
 // Confirms a user account
@@ -551,19 +570,19 @@ function doConfirmUserAccount ($hash) {
 	);
 
 	// Initialize the user id
-	$userid = '0';
+	$userid = NULL;
 
 	// Search for an unconfirmed or confirmed account
-	$result = SQL_QUERY_ESC("SELECT `userid`, `email`, `refid` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `user_hash`='%s' AND (`status`='UNCONFIRMED' OR `status`='CONFIRMED') LIMIT 1",
+	$result = SQL_QUERY_ESC("SELECT `userid`,`refid` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `user_hash`='%s' AND (`status`='UNCONFIRMED' OR `status`='CONFIRMED') LIMIT 1",
 		array($hash), __FILE__, __LINE__);
 	if (SQL_NUMROWS($result) == 1) {
 		// Ok, he want's to confirm now so we load some data
-		list($userid, $email, $refid) = SQL_FETCHROW($result);
+		list($userid, $refid) = SQL_FETCHROW($result);
 
 		// Fetch user data
 		if (!fetchUserData($userid)) {
 			// Not found, should not happen
-			debug_report_bug(__FILE__, __LINE__, 'User account ' . $userid . ' not found.');
+			reportBug(__FILE__, __LINE__, 'User account ' . $userid . ' not found.');
 		} // END - if
 
 		// Load all data and add points
@@ -574,7 +593,6 @@ function doConfirmUserAccount ($hash) {
 	`{?_MYSQL_PREFIX?}_user_data`
 SET
 	`status`='CONFIRMED',
-	`ref_payout`={?ref_payout?},
 	`user_hash`=NULL
 WHERE
 	`user_hash`='%s' AND
@@ -585,17 +603,17 @@ LIMIT 1",
 		// Was it updated?
 		if (!SQL_HASZEROAFFECTED()) {
 			// Send email if updated
-			$message = loadEmailTemplate('confirm-member', $content, bigintval($userid));
+			$message = loadEmailTemplate('guest_user_confirmed', $content, bigintval($userid));
 
 			// And send him right away the confirmation mail
-			sendEmail($email, '{--GUEST_THANX_CONFIRM--}', $message);
+			sendEmail($userid, '{--GUEST_THANX_CONFIRM--}', $message);
 
-			// Maybe he got "referaled"?
-			if (($refid > 0) && ($refid != $userid)) {
-				// Select the referal userid
+			// Maybe he got "referraled"?
+			if ((isValidUserId($refid)) && ($refid != $userid)) {
+				// Select the referral userid
 				if (fetchUserData($refid)) {
 					// Update ref counter...
-					updateReferalCounter($refid);
+					updateReferralCounter($refid);
 
 					// If version matches add ref bonus to refid's account
 					if ((isExtensionInstalledAndNewer('bonus', '0.4.4')) && (isBonusRallyeActive())) {
@@ -604,19 +622,18 @@ LIMIT 1",
 							array(bigintval($refid)), __FILE__, __LINE__);
 
 						// Subtract points from system
-						handleBonusPoints(getConfig('bonus_ref'));
+						handleBonusPoints(getConfig('bonus_ref'), $refid);
 					} // END - if
 
-					// Add one-time referal bonus over referal system or directly
-					// @TODO Try to rewrite the following unset()
-					unset($GLOBALS['ref_level']);
-					addPointsThroughReferalSystem('referal_bonus', $refid, getPointsRef(), true, bigintval($userid), getConfig('reg_points_mode'));
+					// Add one-time referral bonus over referral system or directly
+					initReferralSystem();
+					addPointsThroughReferralSystem('referral_bonus', $refid, getPointsRef(), bigintval($userid));
 				} // END - if
 			} // END - if
 
 			if (isExtensionActive('rallye')) {
 				// Add user to rallye (or not?)
-				addUserToReferalRallye(bigintval($userid));
+				addUserToReferralRallye(bigintval($userid));
 			} // END - if
 
 			// Account confirmed!
@@ -646,7 +663,7 @@ LIMIT 1",
 	}
 
 	// Load template
-	loadTemplate('admin_settings_saved', false, $content['message']);
+	displayMessage($content['message']);
 }
 
 // Does resend the user's confirmation link for given email address
@@ -662,10 +679,10 @@ function doResendUserConfirmationLink ($email) {
 		// Is the account unconfirmed?
 		if ($content['status'] == 'UNCONFIRMED') {
 			// Load email template
-			$message = loadEmailTemplate('guest_request_confirm', array('hash' => $content['user_hash']), $content['userid']);
+			$message = loadEmailTemplate('guest_request_confirm', array(), $content['userid']);
 
 			// Send email
-			sendEmail($email, '{--GUEST_REQUEST_CONFIRM_LINK_SUBJECT--}', $message);
+			sendEmail($content['userid'], '{--GUEST_REQUEST_CONFIRM_LINK_SUBJECT--}', $message);
 		} // END - if
 
 		// Create message based on the status
@@ -673,14 +690,14 @@ function doResendUserConfirmationLink ($email) {
 	} // END - if
 
 	// Output message
-	loadTemplate('admin_settings_saved', false, $message);
+	displayMessage($message);
 }
 
 // Get a message (somewhat translation) from user status for confirmation link.
 // This is different to translateUserStatus() in text messages.
 function getConfirmationMessageFromUserStatus ($status) {
 	// Default is 'UNKNOWN'
-	$message = getMaskedMessage('GUEST_LOGIN_ID_UNKNOWN_STATUS', $status);
+	$message = '{%message,GUEST_LOGIN_ID_UNKNOWN_STATUS=' . $status . '%}';
 
 	// Which status is it?
 	switch ($status) {
@@ -698,7 +715,7 @@ function getConfirmationMessageFromUserStatus ($status) {
 			break;
 
 		default: // This should not happen
-			debug_report_bug(__FUNCTION__, __LINE__, 'Unknown user status ' . $status . ' detected.');
+			reportBug(__FUNCTION__, __LINE__, 'Unknown user status ' . $status . ' detected.');
 			break;
 	} // END - switch
 
@@ -706,6 +723,110 @@ function getConfirmationMessageFromUserStatus ($status) {
 	return $message;
 }
 
+// "Getter" for total tester accounts
+function getTotalTesterUsers () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = countSumTotalData('', 'user_data', 'userid', '', true, runFilterChain('user_inclusion_sql'));
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Checks whether the admin is allowed to create more tester accounts
+function isNewUserTesterAllowed () {
+	// By default only admins are allowed
+	if (!isAdmin()) {
+		// This should not happen and must be fixed
+		reportBug(__FUNCTION__, __LINE__, 'isAdmin()=false - Not allowed.');
+	} // END - if
+
+	// Are more tester accounts allowed?
+	$isAllowed = (getTotalTesterUsers() < bigintval(getTesterUserMaximum() + 1));
+
+	// Return result
+	return $isAllowed;
+}
+
+// "Getter" for next free tester account number
+function getNextFreeTesterUserNumber () {
+	// Get current total amount because we start with zero
+	$nextTester = getTotalTesterUsers();
+
+	// Prepend zeros
+	$nextTester = prependZeros($nextTester, 6);
+
+	// Return it
+	return $nextTester;
+}
+
+// Wrapper function to return a selection box for tester user default referral id
+function addTesterUserDefaultRefidSelectionBox ($fieldName = 'tester_user_default_refid') {
+	// Return it
+	return addMemberSelectionBox(getConfig('tester_user_default_refid'), false, true, true, $fieldName, " WHERE `surname` LIKE '{?tester_user_surname_prefix?}%'");
+}
+
+// Checks whether given surname is a test user name
+function isTesterUserName ($surname) {
+	// Determine it
+	return (substr($surname, 0, strlen(getTesterUserSurnamePrefix())) == getTesterUserSurnamePrefix());
+}
+
+// Creates a tester account from given POST data
+function createTesterUserAccount () {
+	// Add generated surname
+	setPostRequestElement('surname', (getTesterUserSurnamePrefix() . getNextFreeTesterUserNumber()));
+
+	// Is the registration data complete?
+	if (!isRegistrationDataComplete()) {
+		// Then abort here
+		//* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'isRegistrationDataComplete()=false, please check if you e.g. have selected the required minimum of categories.');
+		return false;
+	} // END - if
+
+	// Do registration
+	$isCreated = doUserRegistration();
+
+	// Remove cache to force recalculation of total tester accounts
+	unset($GLOBALS['getTotalTesterUsers']);
+
+	// Return status
+	return $isCreated;
+}
+
+// Checks whether the given sub id is fused by current member
+function isMemberSubIdFree ($subId) {
+	// Check it
+	$isFree = (countSumTotalData(getMemberId(), 'user_subids', 'id', 'userid', true, sprintf(" AND `subid`='%s'", $subId)) == 0);
+
+	// Return result
+	return $isFree;
+}
+
+// Prepares given sub id for storage in database
+function prepareSubId ($subId) {
+	// First convert any spaces/dashes to underscores
+	$subId = str_replace(' ', '_', str_replace('-', '_', $subId));
+
+	// Then filter out any unwanted characters
+	$subId = preg_replace('/([^a-zA-Z0-9_])/', '', $subId);
+
+	// Then Check if it is available
+	if (!isMemberSubIdFree($subId)) {
+		// Is not free
+		$subId = false;
+	} // END - if
+
+	// Return prepared sub id
+	return $subId;
+}
+
+//-----------------------------------------------------------------------------
+//                                EL code functions
+//-----------------------------------------------------------------------------
+
 // Expression call-back function for fetching user data
 function doExpressionUser ($data) {
 	// Use current userid by default
@@ -713,12 +834,18 @@ function doExpressionUser ($data) {
 
 	// User-related data, so is there a userid?
 	if (!empty($data['matches'][4][$data['key']])) {
-		// Do we have a userid or $userid?
-		if ($data['matches'][4][$data['key']] == '$userid') {
+		// Is there a userid or $userid?
+		if (substr($data['matches'][4][$data['key']], 0, 1) == '$') {
 			// Use dynamic call
-			$functionName = "getFetchedUserData('userid', \$userid, '" . $data['callback'] . "')";
+			$functionName = "getFetchedUserData('userid', " . $data['matches'][4][$data['key']] . ", '" . $data['callback'] . "')";
 		} elseif (!empty($data['matches'][4][$data['key']])) {
-			// User data found
+			// Is there a number or a dollar sign in front of it?
+			if (preg_replace('/[^0123456789]/', '', $data['matches'][4][$data['key']]) != $data['matches'][4][$data['key']]) {
+				// Possible database column, so get it again
+				$data['matches'][4][$data['key']] = "getFetchedUserData('userid', getMemberId(), '" . $data['matches'][4][$data['key']] . "')";
+			} // END - if
+
+			// Fix all together
 			$functionName = "getFetchedUserData('userid', " . $data['matches'][4][$data['key']] . ", '" . $data['callback'] . "')";
 		}
 	} elseif ((!empty($data['callback'])) && (isUserDataValid())) {
@@ -726,11 +853,12 @@ function doExpressionUser ($data) {
 		$functionName = "getUserData('" . $data['callback'] . "')";
 	}
 
-	// Do we have another function to run (e.g. translations)
+	// Is there another function to run (e.g. translations)
 	if (!empty($data['extra_func'])) {
 		// Surround the original function call with it
 		$functionName = $data['extra_func'] . '(' . $functionName . ')';
 	} // END - if
+	//* NOISY-DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'functionName=' . $functionName);
 
 	// Generate replacer
 	$replacer = '{DQUOTE} . ' . $functionName . ' . {DQUOTE}';
@@ -742,5 +870,204 @@ function doExpressionUser ($data) {
 	return $code;
 }
 
+//-----------------------------------------------------------------------------
+//                             Template helper functions
+//-----------------------------------------------------------------------------
+
+// Template call-back function for list_user admin function
+function doTemplateAdminListUserTitle ($template, $clear = false) {
+	// Init title with "all accounts"
+	$code = '{--ADMIN_LIST_ALL_ACCOUNTS--}';
+
+	// Is there a 'status' or 'do' set?
+	if (isGetRequestElementSet('status')) {
+		// Set title according to the 'status'
+		$code = sprintf("{--ADMIN_LIST_STATUS_%s_ACCOUNTS--}", strtoupper(getRequestElement('status')));
+	} elseif (isGetRequestElementSet('do')) {
+		// Set title according to 'do'
+		$code = sprintf("{--ADMIN_LIST_DO_%s_ACCOUNTS--}", strtoupper(getRequestElement('do')));
+	}
+
+	// Return the code
+	return $code;
+}
+
+// Template call-back function for displaying "username"
+function doTemplateDisplayUsername ($template, $clear = false, $userid = NULL) {
+	// Is a userid set?
+	if (!isValidUserId($userid)) {
+		// Please don't call this without a valid userid
+		reportBug(__FUNCTION__, __LINE__, 'template=' . $template . ',clear=' . intval($clear) . ',userid[' . gettype($userid) . ']=' . intval($userid) . ' - Invalid userid provided.');
+	} // END - if
+
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__][$userid])) {
+		// Generate code
+		$GLOBALS[__FUNCTION__][$userid] = $userid . ' ({%user,nickname,fixEmptyContentToDashes=' . $userid . '%})';
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__][$userid];
+}
+
+// ----------------------------------------------------------------------------
+//                             XML call-back functions
+// ----------------------------------------------------------------------------
+
+// For 'doing' add subid, the column-index is required
+function addXmlSpecialMemberAddDoUserSubid () {
+	// So set it all here
+	$GLOBALS['__COLUMN_INDEX']['doXmlCallbackFunction']  = 'column';
+	$GLOBALS['__XML_ARGUMENTS']['doXmlCallbackFunction']['column_index'] = 'column';
+}
+
+// ----------------------------------------------------------------------------
+//                 Wrapper functions for configuration entries
+// ----------------------------------------------------------------------------
+
+// Getter for user_alpha
+function getUserAlpha () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('user_alpha');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for user_limit
+function getUserLimit () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('user_limit');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_surname_prefix
+function getTesterUserSurnamePrefix () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_surname_prefix');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_maximum
+function getTesterUserMaximum () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_maximum');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_check_cat
+function getTesterUserCheckCat () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_check_cat');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_gender
+function getTesterUserGender () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_gender');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_family
+function getTesterUserFamily () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_family');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_password
+function getTesterUserPassword () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_password');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_street_nr
+function getTesterUserStreetNr () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_street_nr');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_zip
+function getTesterUserZip () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_zip');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_city
+function getTesterUserCity () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_city');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
+// Getter for tester_user_email
+function getTesterUserEmail () {
+	// Is there cache?
+	if (!isset($GLOBALS[__FUNCTION__])) {
+		// Determine it
+		$GLOBALS[__FUNCTION__] = getConfig('tester_user_email');
+	} // END - if
+
+	// Return cache
+	return $GLOBALS[__FUNCTION__];
+}
+
 // [EOF]
 ?>