Extension ext-user for sub id tracking continued:
[mailer.git] / inc / libs / user_functions.php
index 6e8ebaf67d4dde3256c31e7b761960139faf401d..06d621c0a877b29488a5ceaab649235c502666d0 100644 (file)
  * $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 - 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 *
@@ -43,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--}'
@@ -124,97 +125,91 @@ function addSortLinks ($letter, $sortby, $colspan, $return=false) {
                }
        } // END - foreach
 
-       // Add list and colspan
-       $content['list'] = substr($OUT, 0, -13);
-       $content['colspan2'] = $colspan;
+       // Add output
+       $content['list'] = substr($OUT, 0, -1);
 
        // 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
-function generateUserEmailLink($email, $mod = 'admin') {
+function generateUserEmailLink ($email, $mod = 'admin') {
        // Show contact link only if user is confirmed by default
        $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);
@@ -230,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 = '0';
+       $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 this user's counter
-                               SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `rand_confirmed`=0 WHERE `userid`=%s LIMIT 1",
-                                       array($refid), __FUNCTION__, __LINE__);
+                               // Debug message
+                               /* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'refid=' . $refid . ' - choosen!');
                        } // END - if
 
                        // Free result
@@ -276,6 +269,7 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
        $add = '';
        $errorCode = '0';
        $ext = '';
+       $isFound = false;
 
        // Init array
        $content = array(
@@ -289,25 +283,30 @@ 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');
                $ext = 'nickname';
        } else {
                // Direct userid entered
-               fetchUserData($userid);
+               $isFound = fetchUserData($userid);
        }
 
        // No error found?
-       if ($errorCode == '0') {
+       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... :)
@@ -330,17 +329,26 @@ 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');
-
-                       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;
-
-                               // Subtract login bonus from userid's account or jackpot
-                               if ((isExtensionInstalledAndNewer('bonus', '0.3.5')) && (getConfig('bonus_mode') != 'ADD')) handleBonusPoints('login_bonus');
+                       // 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
+
+                               // 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', $userid);
+                                       } // END - if
+                               } // END - if
                        } // END - if
 
                        // @TODO Make this filter working: $url = runFilterChain('do_login', array('content' => $content, 'addon' => $ADDON));
@@ -354,16 +362,16 @@ function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.p
                                // Update database records
                                SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `total_logins`=`total_logins`+1" . $add . " WHERE `userid`=%s LIMIT 1",
                                        array($userid), __FUNCTION__, __LINE__);
-                               if (SQL_AFFECTEDROWS() == 1) {
+                               if (!SQL_HASZEROAFFECTED()) {
                                        // Is a success URL set?
                                        if (empty($successUrl)) {
                                                // 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
@@ -378,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__);
 
@@ -390,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
@@ -405,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
@@ -414,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__);
-       } elseif (($userid > 0) && (empty($email))) {
+               $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="guest_failed">{--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
@@ -521,20 +532,541 @@ 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(bigintval($userid), $statsType, $statsData), __FUNCTION__, __LINE__);
+                       array(
+                               bigintval($userid),
+                               $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!");
+               logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',type=' . $statsType . ',data=' . gettype($statsData) . ': Invalid statistics data type!');
+       }
+
+       // Return status
+       return $return;
+}
+
+// Confirms a user account
+function doConfirmUserAccount ($hash) {
+       // Init content
+       $content = array(
+               'message' => '{--GUEST_CONFIRMED_FAILED--}',
+               'userid'  => 0,
+       );
+
+       // Initialize the user id
+       $userid = NULL;
+
+       // Search for an unconfirmed or confirmed account
+       $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, $refid) = SQL_FETCHROW($result);
+
+               // Fetch user data
+               if (!fetchUserData($userid)) {
+                       // Not found, should not happen
+                       reportBug(__FILE__, __LINE__, 'User account ' . $userid . ' not found.');
+               } // END - if
+
+               // Load all data and add points
+               $content = getUserDataArray();
+
+               // Unlock his account (but only when it is on UNCONFIRMED!)
+               SQL_QUERY_ESC("UPDATE
+       `{?_MYSQL_PREFIX?}_user_data`
+SET
+       `status`='CONFIRMED',
+       `user_hash`=NULL
+WHERE
+       `user_hash`='%s' AND
+       `status`='UNCONFIRMED'
+LIMIT 1",
+                       array($hash), __FILE__, __LINE__);
+
+               // Was it updated?
+               if (!SQL_HASZEROAFFECTED()) {
+                       // Send email if updated
+                       $message = loadEmailTemplate('guest_user_confirmed', $content, bigintval($userid));
+
+                       // And send him right away the confirmation mail
+                       sendEmail($userid, '{--GUEST_THANX_CONFIRM--}', $message);
+
+                       // Maybe he got "referraled"?
+                       if ((isValidUserId($refid)) && ($refid != $userid)) {
+                               // Select the referral userid
+                               if (fetchUserData($refid)) {
+                                       // Update ref counter...
+                                       updateReferralCounter($refid);
+
+                                       // If version matches add ref bonus to refid's account
+                                       if ((isExtensionInstalledAndNewer('bonus', '0.4.4')) && (isBonusRallyeActive())) {
+                                               // Add points (directly only!)
+                                               SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `bonus_ref`=`bonus_ref`+{?bonus_ref?} WHERE `userid`=%s LIMIT 1",
+                                                       array(bigintval($refid)), __FILE__, __LINE__);
+
+                                               // Subtract points from system
+                                               handleBonusPoints(getConfig('bonus_ref'), $refid);
+                                       } // END - if
+
+                                       // 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?)
+                               addUserToReferralRallye(bigintval($userid));
+                       } // END - if
+
+                       // Account confirmed!
+                       if (isExtensionActive('lead')) {
+                               // Set special lead cookie
+                               setSession('lead_userid', bigintval($userid));
+
+                               // Lead-Code mode enabled
+                               redirectToUrl('lead-confirm.php');
+                       } else {
+                               $content['message'] = '{--GUEST_CONFIRMED_DONE--}';
+                               $content['userid']  = bigintval($userid);
+                       }
+               } elseif (isExtensionActive('lead')) {
+                       // Set special lead cookie
+                       setSession('lead_userid', bigintval($userid));
+
+                       // Lead-Code mode enabled
+                       redirectToUrl('lead-confirm.php');
+               } else {
+                       // Nobody was found unter this hash key... or our new member want's to confirm twice?
+                       $content['message'] = '{--GUEST_CONFIRMED_TWICE--}';
+               }
+       } else {
+               // Nobody was found unter this hash key... or our new member want's to confirm twice?
+               $content['message'] = '{--GUEST_CONFIRMED_TWICE--}';
+       }
+
+       // Load template
+       displayMessage($content['message']);
+}
+
+// Does resend the user's confirmation link for given email address
+function doResendUserConfirmationLink ($email) {
+       // Email address not registered is default message
+       $message = '{--EMAIL_404--}';
+
+       // Confirmation link requested
+       if (fetchUserData($email, 'email')) {
+               // Email address found
+               $content = getUserDataArray();
+
+               // Is the account unconfirmed?
+               if ($content['status'] == 'UNCONFIRMED') {
+                       // Load email template
+                       $message = loadEmailTemplate('guest_request_confirm', array(), $content['userid']);
+
+                       // Send email
+                       sendEmail($content['userid'], '{--GUEST_REQUEST_CONFIRM_LINK_SUBJECT--}', $message);
+               } // END - if
+
+               // Create message based on the status
+               $message = getConfirmationMessageFromUserStatus($content['status']);
+       } // END - if
+
+       // Output 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 = '{%message,GUEST_LOGIN_ID_UNKNOWN_STATUS=' . $status . '%}';
+
+       // Which status is it?
+       switch ($status) {
+               case 'UNCONFIRMED': // Account is unconfirmed
+                       // And set message
+                       $message = '{--GUEST_CONFIRM_LINK_SENT--}';
+                       break;
+
+               case 'CONFIRMED': // Account already confirmed
+                       $message = '{--GUEST_LOGIN_ID_CONFIRMED--}';
+                       break;
+
+               case 'LOCKED': // Account is locked
+                       $message = '{--GUEST_LOGIN_ID_LOCKED--}';
+                       break;
+
+               default: // This should not happen
+                       reportBug(__FUNCTION__, __LINE__, 'Unknown user status ' . $status . ' detected.');
+                       break;
+       } // END - switch
+
+       // Return message
+       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
+       $functionName = 'getMemberId()';
+
+       // User-related data, so is there a userid?
+       if (!empty($data['matches'][4][$data['key']])) {
+               // Is there a userid or $userid?
+               if (substr($data['matches'][4][$data['key']], 0, 1) == '$') {
+                       // Use dynamic call
+                       $functionName = "getFetchedUserData('userid', " . $data['matches'][4][$data['key']] . ", '" . $data['callback'] . "')";
+               } elseif (!empty($data['matches'][4][$data['key']])) {
+                       // 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())) {
+               // "Call-back" alias column for current logged in user's data
+               $functionName = "getUserData('" . $data['callback'] . "')";
+       }
+
+       // 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}';
+
+       // Now replace the code
+       $code = replaceExpressionCode($data, $replacer);
+
+       // Return replaced code
+       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]