A lot has been rewritten, ext-teams added, ext-forced continued:
[mailer.git] / inc / libs / user_functions.php
index 0f4afe124c34f7038c065b1f8d4c0a4c64b69d91..029ab472ff5fbdb2c3f837c63051bc233ed405b2 100644 (file)
@@ -1,7 +1,7 @@
 <?php
 /************************************************************************
- * MXChange v0.2.1                                    Start: 07/16/2004 *
- * ===============                              Last change: 10/27/2004 *
+ * Mailer v0.2.1-FINAL                                Start: 07/16/2004 *
+ * ===================                          Last change: 10/27/2004 *
  *                                                                      *
  * -------------------------------------------------------------------- *
  * File              : user_functions.php                               *
  * $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                           *
+ * Copyright (c) 2003 - 2009 by Roland Haeder                           *
+ * Copyright (c) 2009 - 2011 by Mailer Developer Team                   *
  * For more information visit: http://www.mxchange.org                  *
  *                                                                      *
  * This program is free software; you can redistribute it and/or modify *
 
 // Some security stuff...
 if (!defined('__SECURITY')) {
-       $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), '/inc') + 4) . '/security.php';
-       require($INC);
-}
+       die();
+} // END - if
 
 // Add links for selecting some users
-function alpha ($sortby, $colspan, $return=false) {
-       if (!REQUEST_ISSET_GET('offset')) REQUEST_SET_GET('offset', 0);
-       $add = "&amp;page=".REQUEST_GET('page')."&amp;offset=".REQUEST_GET('offset');
-       if (REQUEST_ISSET_GET(('mode'))) $add .= "&amp;mode=".REQUEST_GET(('mode'));
+function alpha ($sortby) {
+       $add = '';
+       foreach (array('page','offset','mode','status') as $param) {
+               if (isGetRequestParameterSet($param)) {
+                       $add .= '&amp;' . $param . '=' . getRequestParameter($param);
+               } // END - if
+       } // END - foreach
 
        /* Creates the list of letters and makes them a link. */
-       $alphabet = array(getMessage('_ALL2'),"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",getMessage('_OTHERS'));
+       $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;
        $OUT = '';
        while (list($counter, $ltr) = each($alphabet)) {
-               if (REQUEST_GET('letter') == $ltr) {
+               if (getRequestParameter('letter') == $ltr) {
                        // Current letter is letter from URL
-                       $OUT .= "<strong>".$ltr."</strong>";
+                       $OUT .= '<strong>' . $ltr . '</strong>';
                } else {
                        // Output link to letter
-                       $OUT .= "<a href=\"{!URL!}/modules.php?module=admin&amp;what=".$GLOBALS['what'];
-                       if (REQUEST_ISSET_GET(('mode'))) $OUT .= "&amp;mode=".REQUEST_GET(('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)) {
-                       $OUT .= "&nbsp;]<br />[&nbsp;";
+                       $OUT .= ']<br />[';
                } elseif ( $counter != $num ) {
-                       $OUT .= "&nbsp;|&nbsp;";
+                       $OUT .= '|';
                }
        } // END - while
 
-       define('__ALPHA_LIST', $OUT);
+       // Prepare content
+       $content = array (
+               'alpha_selection' => $OUT
+       );
 
        // Load template
-       $OUT = LOAD_TEMPLATE("admin_list_user_alpha", true);
-       if ($return === true) {
-               // Return generated code
-               return $OUT;
-       } else {
-               // Output generated code
-               OUTPUT_HTML($OUT);
-       }
+       $OUT = loadTemplate('admin_list_user_alpha', true, $content);
+
+       // Return generated code
+       return $OUT;
 }
 
 // Add links for sorting
-function SortLinks ($letter, $sortby, $colspan, $return=false) {
+function addSortLinks ($letter, $sortby) {
        $OUT = '';
-       if (!REQUEST_ISSET_GET('offset')) REQUEST_SET_GET('offset', 0);
-       if (!REQUEST_ISSET_GET('page'))   REQUEST_SET_GET('page'  , 0);
+       if (!isGetRequestParameterSet('offset')) setGetRequestParameter('offset', 0);
+       if (!isGetRequestParameterSet('page'))   setGetRequestParameter('page'  , 0);
 
        // Add page and offset
-       $add = "&amp;page=".REQUEST_GET('page')."&amp;offset=".REQUEST_GET('offset');
+       $add = '&amp;page=' . getRequestParameter('page') . '&amp;offset=' . getRequestParameter('offset');
 
-       // Add status or mode
-       if (REQUEST_ISSET_GET(('status'))) $add .= "&amp;mode=".REQUEST_GET(('status'));
-        elseif (REQUEST_ISSET_GET(('mode'))) $add .= "&amp;mode=".REQUEST_GET(('mode'));
+       // Add status/ mode
+       foreach (array('mode','status') as $param) {
+               if (isGetRequestParameterSet($param)) {
+                       $add .= '&amp;' . $param . '=' . getRequestParameter($param);
+               } // END - if
+       } // END - foreach
 
        // Makes order by links..
-       if ($letter == "front") $letter = getMessage('_ALL2');
+       if ($letter == 'front') {
+               $letter = '';
+       } // END - if
 
        // Prepare array with all possible sorters
        $list = array(
-               'userid'                => getMessage('_UID'),
-               'family'                => getMessage('FAMILY_NAME'),
-               'email'         => getMessage('ADDY'),
-               'REMOTE_ADDR'   => getMessage('REMOTE_IP')
+               'userid'      => '{--_USERID--}',
+               'family'      => '{--FAMILY--}',
+               'email'       => '{--EMAIL--}',
+               'REMOTE_ADDR' => '{--REMOTE_IP--}'
        );
 
        // Add nickname if extension is installed
-       if (EXT_IS_ACTIVE('nickname')) {
-               $list['nickname'] = getMessage('NICKNAME');
+       if (isExtensionActive('nickname')) {
+               $list['nickname'] = '{--NICKNAME--}';
        } // END - if
 
        foreach ($list as $sort => $title) {
                if ($sortby == $sort) {
-                       $OUT .= "<strong>".$title."</strong>&nbsp;|&nbsp;";
+                       $OUT .= '<strong>' . $title . '</strong>|';
                } else {
-                       $OUT .= "<a href=\"{!URL!}/modules.php?module=admin&amp;what=list_user&amp;letter=".$letter."&amp;sortby=".$sort.$add."\">".$title."</a>&nbsp;|&nbsp;";
+                       $OUT .= '<a href="{%url=modules.php?module=admin&amp;what=list_user&amp;letter=' . $letter . '&amp;sortby=' . $sort . $add . '%}">' . $title . '</a>|';
                }
        } // END - foreach
 
-       define('__SORT_LIST', substr($OUT, 0, -13));
+       // Add output
+       $content['list'] = substr($OUT, 0, -1);
 
        // Load template
-       $OUT = LOAD_TEMPLATE("admin_list_user_sort", true);
-       if ($return === true) {
-               // Return code
-               return $OUT;
-       } else {
-               // Output code
-               OUTPUT_HTML($OUT);
-       }
+       $OUT = loadTemplate('admin_list_user_sort', true, $content);
+
+       // Return code
+       return $OUT;
 }
 
 // Add page navigation
-function ADD_PAGENAV ($PAGES, $offset, $show_form, $colspan,$return=false) {
-       if (!$show_form) {
-               // Empty row
-               define('__FORM_HEADER', "<tr><td colspan=\"".$colspan."\" class=\"seperator\">&nbsp;</td></tr>");
-       } else {
-               // Load form for changing number of lines
-               define('__FORM_HEADER', LOAD_TEMPLATE("admin_list_user_sort_form", true));
-       }
+function addPageNavigation ($numPages) {
+       // Start with empty content
+       $OUT = '';
 
-       if (!$show_form) {
-               // Add line with bottom border
-               define('__FORM_FOOTER', "<tr><td colspan=\"{!__COLSPAN2!}\" class=\"seperator bottom2\">&nbsp;</td></tr>");
-       } else {
-               // Add line without bottom border
-               define('__FORM_FOOTER', "<tr><td colspan=\"{!__COLSPAN2!}\" class=\"seperator bottom2\">&nbsp;</td></tr>");
-       }
+       // 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 == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
+                               $OUT .= '<strong>-';
+                       } else {
+                               if (!isGetRequestParameterSet('letter')) setGetRequestParameter('letter', '');
+                               if (!isGetRequestParameterSet('sortby')) setGetRequestParameter('sortby', 'userid');
 
-       $OUT = '';
-       for ($page = 1; $page <= $PAGES; $page++) {
-               if (($page == REQUEST_GET('page')) || ((!REQUEST_ISSET_GET('page')) && ($page == "1"))) {
-                       $OUT .= "<strong>-";
-               } else {
-                       if (!REQUEST_ISSET_GET(('letter'))) REQUEST_SET_GET('letter', getMessage('_ALL2'));
-                       if (!REQUEST_ISSET_GET(('sortby'))) REQUEST_SET_GET('sortby', 'userid');
+                               // Base link
+                               $OUT .= '<a href="{%url=modules.php?module=admin&amp;what=' . getWhat();
 
-                       // Base link
-                       $OUT .= "<a href=\"{!URL!}/modules.php?module=admin&amp;what=".$GLOBALS['what'];
+                               // Add status/mode
+                               foreach (array('mode','status') as $param) {
+                                       if (isGetRequestParameterSet($param)) {
+                                               $OUT .= '&amp;' . $param . '=' . getRequestParameter($param);
+                                       } // END - if
+                               } // END - foreach
 
-                       // Add status or mode
-                       if (REQUEST_ISSET_GET(('status'))) $OUT .= "&amp;mode=".REQUEST_GET(('status'));
-                        elseif (REQUEST_ISSET_GET(('mode'))) $OUT .= "&amp;mode=".REQUEST_GET(('mode'));
+                               // Letter and so on
+                               $OUT .= '&amp;letter=' . getRequestParameter('letter') . '&amp;sortby=' . getRequestParameter('sortby') . '&amp;page=' . $page . '&amp;offset=' . getConfig('user_limit') . '%}">';
+                       }
 
-                        // Letter and so on
-                       $OUT .= "&amp;letter=".REQUEST_GET(('letter'))."&amp;sortby=".REQUEST_GET(('sortby'))."&amp;page=".$page."&amp;offset=".$offset."\">";
-               }
+                       $OUT .= $page;
 
-               $OUT .= $page;
+                       if (($page == getRequestParameter('page')) || ((!isGetRequestParameterSet('page')) && ($page == 1))) {
+                               $OUT .= '-</strong>';
+                       } else  {
+                               $OUT .= '</a>';
+                       }
 
-               if (($page == REQUEST_GET('page')) || ((!REQUEST_ISSET_GET('page')) && ($page == "1"))) {
-                       $OUT .= "-</strong>";
-               } else  {
-                       $OUT .= "</a>";
-               }
+                       if ($page < $numPages) {
+                               $OUT .= '|';
+                       } // END - if
+               } // END - for
 
-               if ($page < $PAGES) $OUT .= "&nbsp;|&nbsp;";
-       } // END - for
+               // Add list output
+               $content['list'] = $OUT;
 
-       define('__PAGENAV_LIST', $OUT);
+               // Load template
+               $OUT = loadTemplate('admin_list_user_pagenav', true, $content);
+       } // END - if
 
-       // Load template
-       $OUT = LOAD_TEMPLATE("admin_list_user_pagenav", true);
-       if ($return === true) {
-               // Return code
-               return $OUT;
-       } else {
-               // Output code
-               OUTPUT_HTML($OUT);
-       }
+       // Return code
+       return $OUT;
 }
 
 // Create email link to user's account
-function USER_CREATE_EMAIL_LINK($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 (IS_ADMIN()) $locked = '';
-
-       $result = SQL_QUERY_ESC("SELECT userid
-FROM `{!_MYSQL_PREFIX!}_user_data`
-WHERE `email`='%s'".$locked." LIMIT 1",
-        array($email), __FUNCTION__, __LINE__);
+       if (isAdmin()) $locked = '';
+
+       $result = SQL_QUERY_ESC("SELECT
+       `userid`
+FROM
+       `{?_MYSQL_PREFIX?}_user_data`
+WHERE
+       `email`='%s'" . $locked."
+LIMIT 1",
+               array($email), __FUNCTION__, __LINE__);
        if (SQL_NUMROWS($result) == 1) {
                // Load userid
-               list($uid) = SQL_FETCHROW($result);
+               list($userid) = SQL_FETCHROW($result);
 
                // Rewrite email address to contact link
-               $email = "{!URL!}/modules.php?module=".$mod."&amp;what=user_contct&amp;uid=".bigintval($uid);
+               $email = '{%url=modules.php?module=' . $mod . '&amp;what=user_contct&amp;userid=' . bigintval($userid) . '%}';
        } // END - if
 
        // Free memory
@@ -222,14 +218,15 @@ WHERE `email`='%s'".$locked." LIMIT 1",
 }
 
 // Selects a random user id as the new referal id if they have at least X confirmed mails in this run
-function SELECT_RANDOM_REFID () {
+// @TODO Double-check configuration entry here
+function determineRandomReferalId () {
        // Default is zero refid
-       $refid = 0;
+       $refid = NULL;
 
        // Is the extension version fine?
-       if (GET_EXT_VERSION('user') >= "0.3.4") {
+       if (isExtensionInstalledAndNewer('user', '0.3.4')) {
                // Get all user ids
-               $totalUsers = GET_TOTAL_DATA("CONFIRMED", "user_data", 'userid', "status", true, " AND `rand_confirmed` >= ".getConfig('user_min_confirmed')."");
+               $totalUsers = countSumTotalData('CONFIRMED', 'user_data', 'userid', 'status', true, " AND `rand_confirmed` >= {?user_min_confirmed?}");
 
                // Do we have at least one?
                if ($totalUsers > 0) {
@@ -237,17 +234,13 @@ function SELECT_RANDOM_REFID () {
                        $randNum = 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` >= %s ORDER BY `rand_confirmed` DESC LIMIT %s, 1",
-                               array(getConfig('user_min_confirmed'), $randNum), __FUNCTION__, __LINE__);
+                       $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__);
 
                        // Do we have one entry there?
                        if (SQL_NUMROWS($result) == 1) {
                                // Use that userid as new referal 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__);
                        } // END - if
 
                        // Free result
@@ -260,209 +253,514 @@ function SELECT_RANDOM_REFID () {
 }
 
 // Do the user login
-function USER_DO_LOGIN ($uid, $passwd) {
+function doUserLogin ($userid, $passwd, $successUrl = '', $errorUrl = 'modules.php?module=index&amp;what=login&amp;login=') {
        // Init variables
        $dmy = '';
-
-       // Add last_login if available
-       $lastOnline = ''; 
-       if (GET_EXT_VERSION('sql_patches') >= '0.2.8') {
-               $lastOnline = ", last_login";
-       } // END - if
+       $add = '';
+       $errorCode = '0';
+       $ext = '';
+       $isFound = false;
 
        // Init array
        $content = array(
-               'password'    => "",
-               'userid'      => "",
+               'password'    => '',
+               'userid'      => '',
                'last_online' => 0,
                'last_login'  => 0,
-               'hash'        => ""
+               'hash'        => ''
        );
 
        // Check login data
-       if ((EXT_IS_ACTIVE('nickname')) && (NICKNAME_PROBE_ON_USERID($uid))) {
+       if ((isExtensionActive('nickname')) && (isNicknameUsed($userid))) {
                // Nickname entered
-               $result = SQL_QUERY_ESC("SELECT userid, password, last_online".$lastOnline." FROM `{!_MYSQL_PREFIX!}_user_data` WHERE nickname='%s' AND `status`='CONFIRMED' LIMIT 1",
-                       array($uid), __FUNCTION__, __LINE__);
+               fetchUserData($userid, 'nickname');
+       } elseif (isNicknameUsed($userid)) {
+               // No nickname installed
+               $errorCode = getCode('EXTENSION_PROBLEM');
+               $ext = 'nickname';
        } else {
                // Direct userid entered
-               $result = SQL_QUERY_ESC("SELECT userid, password, last_online".$lastOnline." FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s AND `status`='CONFIRMED' LIMIT 1",
-                       array($uid, $content['hash']), __FUNCTION__, __LINE__);
+               $isFound = fetchUserData($userid);
        }
 
-       // Load entry
-       $content = SQL_FETCHARRAY($result);
-       if (!empty($content['userid'])) $uid = bigintval($content['userid']);
+       // No error found?
+       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']);
+               } // END - if
+       } // END - if
 
        // Is there an entry?
-       if ((SQL_NUMROWS($result) == 1) && ((($probe_nickname) && (!empty($content['userid']))) || ($content['userid'] == $uid))) {
-               // Free result
-               SQL_FREERESULT($result);
-
+       if (($errorCode == '0') && (isUserDataValid()) && (getUserData('status') == 'CONFIRMED') && (!empty($content['userid']))) {
                // Check for old MD5 passwords
-               if ((strlen($content['password']) == 32) && (md5($passwd) == $content['password'])) {
+               if ((strlen(getUserData('password')) == 32) && (md5($passwd) == getUserData('password'))) {
                        // Just set the hash to the password from DB... :)
-                       $content['hash'] = $content['password'];
+                       $content['hash'] = getUserData('password');
                } else {
                        // Hash password with improved way for comparsion
-                       $content['hash'] = generateHash($passwd, substr($content['password'], 0, -40));
+                       $content['hash'] = generateHash($passwd, substr(getUserData('password'), 0, -40));
                }
 
                // Does the password match the hash?
-               if ($content['hash'] == $content['password']) {
+               if ($content['hash'] == getUserData('password')) {
                        // New hashed password found so let's generate a new one
                        $content['hash'] = generateHash($passwd);
 
                        // ... and update database
                        // @TODO Make this filter working: $ADDON = runFilterChain('post_login_update', $content);
-                       SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET password='%s' WHERE userid=%s AND `status`='CONFIRMED' LIMIT 1",
-                               array($content['hash'], $uid), __FUNCTION__, __LINE__);
+                       SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `password`='%s' WHERE `userid`=%s AND `status`='CONFIRMED' LIMIT 1",
+                               array($content['hash'], $userid), __FUNCTION__, __LINE__);
 
                        // No login bonus by default
                        $GLOBALS['bonus_payed'] = false;
 
-                       // Probe for last online timemark
-                       $probe = time() -  $content['last_online'];
-                       if (!empty($content['last_login'])) $probe = time() - $content['last_login'];
-                       if ((GET_EXT_VERSION('bonus') >= '0.2.2') && ($probe >= getConfig('login_timeout'))) {
-                               // Add login bonus to user's account
-                               $add = sprintf(", login_bonus=login_bonus+%s",
-                                       (float)getConfig('login_bonus')
-                               );
-                               $GLOBALS['bonus_payed'] = true;
-
-                               // Subtract login bonus from userid's account or jackpot
-                               if ((GET_EXT_VERSION('bonus') >= '0.3.5') && (getConfig('bonus_mode') != "ADD")) BONUS_POINTS_HANDLER('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');
+                                       } // END - if
+                               } // END - if
                        } // END - if
 
-                       // Calculate new hash with the secret key and master salt together
-                       $content['hash'] = generatePassString($content['hash']);
+                       // @TODO Make this filter working: $url = runFilterChain('do_login', array('content' => $content, 'addon' => $ADDON));
 
-                       // Update global array
-                       // @TODO Make this filter working: $URL = runFilterChain('do_login', array('content' => $content, 'addon' => $ADDON));
-                       setUserId($uid);
+                       // Set member id
+                       setMemberId($userid);
 
                        // Try to set session data (which shall normally always work!)
-                       if ((set_session('userid', $uid )) && (set_session('u_hash', $content['hash']))) {
+                       //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',hash=' . $content['hash'] . '(' . strlen($content['hash']) . ')');
+                       if ((setSession('userid', $userid )) && (setSession('u_hash', encodeHashForCookie($content['hash'])))) {
                                // Update database records
-                               SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET total_logins=total_logins+1".$add." WHERE userid=%s LIMIT 1",
-                                       array($uid), __FUNCTION__, __LINE__);
-                               if (SQL_AFFECTEDROWS() == 1) {
-                                       // Procedure to checking for login data
-                                       if (($GLOBALS['bonus_payed']) && (EXT_IS_ACTIVE('bonus'))) {
-                                               // Bonus added (just displaying!)
-                                               $URL = "modules.php?module=chk_login&amp;mode=bonus";
+                               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_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';
+                                               } else {
+                                                       // Bonus not added
+                                                       $url = 'modules.php?module=chk_login&amp;mode=login';
+                                               }
                                        } else {
-                                               // Bonus not added
-                                               $URL = "modules.php?module=chk_login&amp;mode=login";
+                                               // Use this URL
+                                               $url = $successUrl;
                                        }
                                } else {
                                        // Cannot update counter!
-                                       $URL = "modules.php?module=index&amp;what=login&amp;login=".getCode('CNTR_FAILED');
+                                       $errorCode = getCode('CNTR_FAILED');
                                }
                        } else {
                                // Cookies not setable!
-                               $URL = "modules.php?module=index&amp;what=login&amp;login=".getCode('NO_COOKIES');
+                               $errorCode = getCode('COOKIES_DISABLED');
                        }
-               } elseif (GET_EXT_VERSION('sql_patches') >= '0.6.1') {
-                       // Update failture counter
-                       SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET login_failures=login_failures+1,last_failure=NOW() WHERE userid=%s LIMIT 1",
-                               array($uid), __FUNCTION__, __LINE__);
+               } elseif (isExtensionInstalledAndNewer('sql_patches', '0.6.1')) {
+                       // 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__);
 
                        // Wrong password!
-                       $URL = "modules.php?module=index&amp;what=login&amp;login=".getCode('WRONG_PASS');
+                       $errorCode = getCode('WRONG_PASS');
                }
-       } elseif ((($probe_nickname) && (!empty($content['userid']))) || ($content['userid'] == $uid)) {
-               // Other account status?
-               // @TODO Can this query be merged with above query?
-               $result = SQL_QUERY_ESC("SELECT status FROM `{!_MYSQL_PREFIX!}_user_data` WHERE userid=%s LIMIT 1",
-                       array($uid), __FUNCTION__, __LINE__);
-
-               // Entry found?
-               if (SQL_NUMROWS($result) == 1) {
-                       // Load status
-                       list($status) = SQL_FETCHROW($result);
-
-                       // Create an error code from given status
-                       $errorCode = GEN_ERROR_CODE_FROM_ACCOUNT_STATUS($status);
-               } else {
-                       // ID not found!
-                       $errorCode = getCode('WRONG_ID');
-               }
-
-               // Construct URL
-               $URL = "modules.php?module=index&amp;what=login&amp;login=".$errorCode;
+       } elseif ((isUserDataValid()) && (getUserData('status') != 'CONFIRMED')) {
+               // Create an error code from given status
+               $errorCode = generateErrorCodeFromUserStatus(getUserData('status'));
+
+               // Set userid in session
+               setSession('current_userid', getUserData('userid'));
+       } elseif (!isUserDataValid()) {
+               // User id not found
+               $errorCode = getCode('WRONG_ID');
        } else {
-               // ID not found!
-               $URL = "modules.php?module=index&amp;what=login&amp;login=".getCode('WRONG_ID');
+               // Unknown error
+               $errorCode = getCode('UNKNOWN_ERROR');
        }
 
+       // Error code provided?
+       if ($errorCode > 0) {
+               // Then reconstruct the URL
+               $url = $errorUrl . $errorCode;
+
+               // Extension set? Then add it as well.
+               if (!empty($ext)) {
+                       $url .= '&amp;ext=' . $ext;
+               } // END - if
+       } // END - if
+
        // Return URL
-       return $URL;
+       return $url;
 }
 
 // Try to send a new password for the given user account
-function USER_DO_NEW_PASSWORD ($email, $uid) {
-       // Compile email when found in address (only secure chars!)
-       if (!empty($email)) $email = str_replace("{DOT}", '.', $email);
-
-       // Init result and error
+function doNewUserPassword ($email, $userid) {
+       //* DEBUG: */ logDebugMessage(__FUNCTION__, __LINE__, 'email=' . $email . ',userid=' . $userid . ' - ENTERED!');
+       // Init found-status and error
        $errorCode = '';
-       $result = false;
+       $accountFound = false;
 
        // Probe userid/nickname
-       if ((EXT_IS_ACTIVE('nickname')) && (NICKNAME_PROBE_ON_USERID($uid))) {
+       if (!empty($email)) {
+               // Email entered
+               $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 email='%s' LIMIT 1",
-                       array($uid, $email), __FUNCTION__, __LINE__);
-       } elseif (($uid > 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($uid)), __FUNCTION__, __LINE__);
-       } elseif (!empty($email)) {
-               // Email entered
-               $result = SQL_QUERY_ESC("SELECT userid, status FROM `{!_MYSQL_PREFIX!}_user_data` WHERE email='%s' LIMIT 1",
-                       array($email), __FUNCTION__, __LINE__);
+               $accountFound = fetchUserData($userid);
        } else {
                // Userid not set!
-               DEBUG_LOG(__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($uid, $status) = SQL_FETCHROW($result);
+       if ($accountFound === true) {
+               // Is the account confirmed
+               if (getUserData('status') == 'CONFIRMED') {
+                       // Generate new password
+                       $NEW_PASS = generatePassword();
 
-               if ($status == "CONFIRMED") {
-                       // Ooppps, this was missing! ;-) We should update the database...
-                       $NEW_PASS = GEN_PASS();
-                       SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET password='%s' WHERE userid=%s LIMIT 1",
-                               array(generateHash($NEW_PASS), $uid), __FUNCTION__, __LINE__);
+                       // Update database
+                       SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `password`='%s' WHERE `userid`=%s LIMIT 1",
+                               array(generateHash($NEW_PASS), getUserData('userid')), __FUNCTION__, __LINE__);
 
                        // Prepare data and message for email
-                       $msg = LOAD_EMAIL_TEMPLATE("new-pass", array('new_pass' => $NEW_PASS), $uid);
+                       $message = loadEmailTemplate('guest_new_password',
+                               array(
+                                       'new_pass' => $NEW_PASS,
+                                       'nickname' => $userid
+                               ), bigintval(getUserData('userid')));
 
                        // ... and send it away
-                       SEND_EMAIL($uid, getMessage('GUEST_NEW_PASSWORD'), $msg);
+                       sendEmail(bigintval(getUserData('userid')), '{--GUEST_NEW_PASSWORD--}', $message);
 
                        // Output note to user
-                       LOAD_TEMPLATE('admin_settings_saved', false, getMessage('GUEST_NEW_PASSWORD_SEND'));
+                       displayMessage('{--GUEST_NEW_PASSWORD_SEND--}');
                } else {
                        // Account is locked or unconfirmed
-                       $errorCode = GEN_ERROR_CODE_FROM_ACCOUNT_STATUS($status);
+                       $errorCode = generateErrorCodeFromUserStatus(getUserData('status'));
 
                        // Load URL
-                       LOAD_URL("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
-               LOAD_TEMPLATE('admin_settings_saved', false, "<span class=\"guest_failed\">{--GUEST_WRONG_ID_EMAIL--}</span>");
+               // id or email is wrong
+               displayMessage('<span class="notice">{--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 getEpocheTimeFromUserStats ($statsType, $statsData, $userid = NULL) {
+       // Default timestamp is zero
+       $data['inserted'] = '0';
+
+       // User id set?
+       if ((isMemberIdSet()) && ($userid == '0')) {
+               $userid = getMemberId();
+       } // END - if
+
+       // Is the extension installed and updated?
+       if ((!isExtensionActive('sql_patches')) || (isExtensionInstalledAndOlder('sql_patches', '0.5.6'))) {
+               // Return zero here
+               return $data['inserted'];
+       } // END - if
+
+       // Try to find the entry
+       $result = SQL_QUERY_ESC("SELECT
+       UNIX_TIMESTAMP(`inserted`) AS inserted
+FROM
+       `{?_MYSQL_PREFIX?}_user_stats_data`
+WHERE
+       `userid`=%s AND
+       `stats_type`='%s' AND
+       `stats_data`='%s'
+LIMIT 1",
+               array(
+                       bigintval($userid),
+                       $statsType,
+                       $statsData
+               ), __FUNCTION__, __LINE__);
+
+       // Is the entry there?
+       if (SQL_NUMROWS($result) == 1) {
+               // Get this stamp
+               $data = SQL_FETCHARRAY($result);
+       } // END - if
+
+       // Free result
+       SQL_FREERESULT($result);
+
+       // Return stamp
+       return $data['inserted'];
+}
+
+// Inserts user stats
+function insertUserStatsRecord ($userid, $statsType, $statsData) {
+       // Is the extension installed and updated?
+       if ((!isExtensionActive('sql_patches')) || (isExtensionInstalledAndOlder('sql_patches', '0.5.6'))) {
+               // Return zero here
+               return false;
+       } // END - if
+
+       // Does it exist?
+       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__);
+       } elseif (is_array($statsData)) {
+               // Invalid data!
+               logDebugMessage(__FUNCTION__, __LINE__, 'userid=' . $userid . ',type=' . $statsType . ',data=' . gettype($statsData) . ': Invalid statistics data type!');
+       }
+}
+
+// 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
+                       debug_report_bug(__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 "referaled"?
+                       if ((isValidUserId($refid)) && ($refid != $userid)) {
+                               // Select the referal userid
+                               if (fetchUserData($refid)) {
+                                       // Update ref counter...
+                                       updateReferalCounter($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'));
+                                       } // END - if
+
+                                       // Add one-time referal bonus over referal system or directly
+                                       initReferalSystem();
+                                       addPointsThroughReferalSystem('referal_bonus', $refid, getPointsRef(), bigintval($userid));
+                               } // END - if
+                       } // END - if
+
+                       if (isExtensionActive('rallye')) {
+                               // Add user to rallye (or not?)
+                               addUserToReferalRallye(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
+                       debug_report_bug(__FUNCTION__, __LINE__, 'Unknown user status ' . $status . ' detected.');
+                       break;
+       } // END - switch
+
+       // Return message
+       return $message;
+}
+
+// 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']])) {
+               // Do we have 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']])) {
+                       // Do we have 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'] . "')";
+       }
+
+       // Do we have 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 call-back function for list_user admin function
+function doTemplateAdminListUserTitle ($template, $clear = false) {
+       // Init title with "all accounts"
+       $code = '{--ADMIN_LIST_ALL_ACCOUNTS--}';
+
+       // Do we have a 'status' or 'mode' set?
+       if (isGetRequestParameterSet('status')) {
+               // Set title according to the 'status'
+               $code = sprintf("{--ADMIN_LIST_STATUS_%s_ACCOUNTS--}", strtoupper(getRequestParameter('status')));
+       } elseif (isGetRequestParameterSet('mode')) {
+               // Set title according to the "mode"
+               $code = sprintf("{--ADMIN_LIST_MODE_%s_ACCOUNTS--}", strtoupper(getRequestParameter('mode')));
+       }
+
+       // Return the code
+       return $code;
+}
+
 // [EOF]
 ?>