win32 to unix line delimiters changed
[mailer.git] / 0.2.1 / inc / libs / rallye_functions.php
index 5beddb3cadd6faf81697558918c39539330f154d..e55876b3eeed4e3fb0b07b07160492c9616509ca 100644 (file)
-<?php\r
-/************************************************************************\r
- * MXChange v0.2.1                                    Start: 08/22/2004 *\r
- * ===============                              Last change: 08/24/2004 *\r
- *                                                                      *\r
- * -------------------------------------------------------------------- *\r
- * File              : rallye_functions.php                             *\r
- * -------------------------------------------------------------------- *\r
- * Short description : Special functions for rallye extension           *\r
- * -------------------------------------------------------------------- *\r
- * Kurzbeschreibung  : Spezielle Funktion fuer rallye-Erweiterung       *\r
- * -------------------------------------------------------------------- *\r
- *                                                                      *\r
- * -------------------------------------------------------------------- *\r
- * Copyright (c) 2003 - 2008 by Roland Haeder                           *\r
- * For more information visit: http://www.mxchange.org                  *\r
- *                                                                      *\r
- * This program is free software; you can redistribute it and/or modify *\r
- * it under the terms of the GNU General Public License as published by *\r
- * the Free Software Foundation; either version 2 of the License, or    *\r
- * (at your option) any later version.                                  *\r
- *                                                                      *\r
- * This program is distributed in the hope that it will be useful,      *\r
- * but WITHOUT ANY WARRANTY; without even the implied warranty of       *\r
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *\r
- * GNU General Public License for more details.                         *\r
- *                                                                      *\r
- * You should have received a copy of the GNU General Public License    *\r
- * along with this program; if not, write to the Free Software          *\r
- * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *\r
- * MA  02110-1301  USA                                                  *\r
- ************************************************************************/\r
-\r
-// Some security stuff...\r
-if (ereg(basename(__FILE__), $_SERVER['PHP_SELF']))\r
-{\r
-       $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";\r
-       require($INC);\r
-}\r
-//\r
-function RALLYE_AUTOSTART_RALLYES($result)\r
-{\r
-       // Global data array for LOAD_EMAIL_TEMPLATE()\r
-       $DATA = array();\r
-       global $DATA, $CONFIG;\r
-\r
-       // Load all rallyes (usally we have only one rallye active per time!\r
-       list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);\r
-       SQL_FREERESULT($result);\r
-\r
-       // Set notified to Y\r
-       $result_notified = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_rallye_data SET notified='Y' WHERE id=%d LIMIT 1",\r
-        array(bigintval($id)), __FILE__, __LINE__);\r
-\r
-       // Do a snapshot off all user refs\r
-       $result_user = SQL_QUERY("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE status='CONFIRMED' ORDER BY userid", __FILE__, __LINE__);\r
-\r
-       // Transfer all neccessary data to the global $DATA array\r
-       $DATA['uid_cnt']    = SQL_NUMROWS($result_user);\r
-       $DATA['start']      = MAKE_DATETIME($start, "2");\r
-       $DATA['end']        = MAKE_DATETIME($end  , "2");\r
-       $DATA['now_t']      = MAKE_DATETIME(time(), "2");\r
-       $DATA['title']      = $title;\r
-       $DATA['id']         = $id;  // ID for the rallye details link\r
-\r
-       if ($min_users == 0)\r
-       {\r
-               // Rallye ends without user limitation\r
-               $DATA['min_users'] = RALLYE_END_NO_USER_LIMITATION;\r
-       }\r
-        else\r
-       {\r
-               // Rallye ends when X members are totally in your exchange\r
-               $DATA['min_users'] = RALLYE_END_USERS_1." ".$min_users." ".RALLYE_END_USERS_2;\r
-       }\r
-       if ($min_prices == 0)\r
-       {\r
-               // Rallye ends without user limitation\r
-               $DATA['min_prices'] = RALLYE_END_NO_PRICE_LIMITATION;\r
-       }\r
-        else\r
-       {\r
-               // Rallye ends when X members are totally in your exchange\r
-               $DATA['min_prices'] = RALLYE_END_PRICES_1." ".$min_prices." ".RALLYE_END_PRICES_2;\r
-       }\r
-\r
-       // Load prices\r
-       $prices = RALLYE_ADD_PRICES($id);\r
-\r
-       // Let's begin with the userids...\r
-       while (list($uid) = SQL_FETCHROW($result_user))\r
-       {\r
-               $un = false;\r
-\r
-               // Get refs by userid\r
-               $cnt = RALLYE_GET_REFCOUNT($uid);\r
-               if (empty($cnt)) $cnt = "0"; // Added prevent some unknown troubles... :-?\r
-\r
-               // Check if line is already included...\r
-               $result_ref = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d AND userid=%d LIMIT 1",\r
-                array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);\r
-               if (SQL_NUMROWS($result_ref) == 0)\r
-               {\r
-                       // Free memory\r
-                       SQL_FREERESULT($result_ref);\r
-\r
-                       // Add userid and his ref count to table\r
-                       $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(p.points)\r
-FROM "._MYSQL_PREFIX."_user_points AS p\r
-LEFT JOIN "._MYSQL_PREFIX."_user_data AS d\r
-ON p.userid=d.userid\r
-WHERE d.status='CONFIRMED' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND p.ref_depth='1' AND p.points > 0 AND d.userid=%d",\r
- array($CONFIG['ref_payout'], bigintval($uid)), __FILE__, __LINE__);\r
-                       list($cpoints) = SQL_FETCHROW($result_ref);\r
-                       SQL_FREERESULT($result_ref);\r
-\r
-                       if (empty($cpoints)) $cpoints = "0.00000";\r
-\r
-                       // Add info line\r
-                       $result_ref = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_rallye_users (rallye_id, userid, refs, curr_points)\r
-VALUES ('%s', '%s', '%s', '%s')",\r
- array(bigintval($id), bigintval($uid), bigintval($cnt), $cpoints), __FILE__, __LINE__);\r
-                       $un = true;\r
-               }\r
-\r
-               // Ignored but for the template required refs (made before start of rallye)\r
-               $DATA['refs']  = $cnt;\r
-\r
-               // Shall I notify this member?\r
-               if (($notify == "Y") && ($un))\r
-               {\r
-                       // Load email template and send it to the user\r
-                       $msg = LOAD_EMAIL_TEMPLATE("member_rallye_notify", $prices, $uid);\r
-                       SEND_EMAIL($uid, RALLYE_MEMBER_NOTIFY.$title, $msg);\r
-               }\r
-       }\r
-\r
-       // Send email to admin\r
-       $templ = "admin_rallye_no_notify";\r
-       if ($notify == "Y") $templ = "admin_rallye_notify";\r
-       if (GET_EXT_VERSION("admins") < "0.4.1")\r
-       {\r
-               // Use old method to send out\r
-               $msg = LOAD_EMAIL_TEMPLATE($templ, $prices, 0);\r
-               SEND_ADMIN_EMAILS(RALLYE_ADMIN_NOTIFY.$title, $msg);\r
-       }\r
-        else\r
-       {\r
-               // Use new system to send out\r
-               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_NOTIFY.$title, $templ, $prices, "0");\r
-       }\r
-\r
-       // Free memory\r
-       SQL_FREERESULT($result_user);\r
-}\r
-//\r
-function RALLYE_ADD_PRICES($rallye,$mode="email")\r
-{\r
-       // Output mode\r
-       switch($mode)\r
-       {\r
-               case "email": $mode = "\n";     break;\r
-               case "html" : $mode = "<BR>\n"; break;\r
-       }\r
-\r
-       // Load prices\r
-       $result_prices = SQL_QUERY("SELECT price_level, points, info FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id='".$rallye."' ORDER BY price_level", __FILE__, __LINE__);\r
-       if (SQL_NUMROWS($result_prices) > 0)\r
-       {\r
-               // Load prices\r
-               if ($mode == "\n") $prices = RALLYE_MEMBER_PRICES_ADDED.":".$mode."------------------------------".$mode;\r
-               $prices = "";\r
-               while (list($level, $points, $info) = SQL_FETCHROW($result_prices))\r
-               {\r
-                       $prices .= $level.RALLYE_PRICE.": ";\r
-                       if (!empty($info))\r
-                       {\r
-                               $prices .= $info;\r
-                       }\r
-                        else\r
-                       {\r
-                               $prices .= $points." ".POINTS;\r
-                       }\r
-                       $prices .= "".$mode;\r
-               }\r
-\r
-               // Free memory\r
-               SQL_FREERESULT($result_prices);\r
-       }\r
-        else\r
-       {\r
-               // No prices???\r
-               $prices = RALLYE_MEMBER_NO_PRICES.$mode;\r
-       }\r
-       // Add last line for email mode\r
-       if ($mode == "\n") $prices .= "------------------------------";\r
-\r
-       // Return price list\r
-       return $prices;\r
-}\r
-//\r
-function RALLYE_ADD_TOPUSERS($rallye,$default=0)\r
-{\r
-       global $CONFIG;\r
-       $since = (time() - $CONFIG['ap_in_since']);\r
-\r
-       // First check how many prices are set\r
-       $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",\r
-        array(bigintval($rallye)), __FILE__, __LINE__);\r
-       $prices = SQL_NUMROWS($result);\r
-       SQL_FREERESULT($result);\r
-\r
-       // And load only limited users\r
-       $result = SQL_QUERY_ESC("SELECT DISTINCT u.userid, u.refs, u.curr_points FROM "._MYSQL_PREFIX."_rallye_users AS u\r
-LEFT JOIN "._MYSQL_PREFIX."_refsystem AS r\r
-ON u.userid=r.userid\r
-WHERE u.rallye_id=%d AND r.counter > 0 ORDER BY u.refs DESC",\r
- array(bigintval($rallye)), __FILE__, __LINE__);\r
-\r
-       // Load users\r
-       $DATA = array(\r
-               'uid'      => array(),\r
-               'ref'      => array(),\r
-               'cpoints'  => array()\r
-       );\r
-\r
-       while(list($uid, $refs, $cpoints) = SQL_FETCHROW($result))\r
-       {\r
-               // Get current refs\r
-               $cnt = RALLYE_GET_REFCOUNT($uid, $refs);\r
-\r
-               // Points of ref's\r
-               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT p.points FROM "._MYSQL_PREFIX."_user_points AS p\r
-LEFT JOIN "._MYSQL_PREFIX."_user_data AS d\r
-ON p.userid=d.userid\r
-WHERE d.userid=%d AND d.status='CONFIRMED' AND p.ref_depth='1' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND d.last_online >= %s\r
-LIMIT 1", array(bigintval($uid), $CONFIG['ref_payout'], $since), __FILE__, __LINE__);\r
-               list($refpoints) = SQL_FETCHROW($result_ref);\r
-               SQL_FREERESULT($result_ref);\r
-\r
-               if (empty($refpoints)) $refpoints = "0";\r
-\r
-               // And subtract start refs\r
-               $cnt -= $refs;\r
-\r
-               $_uid = "---";\r
-               // List only users with at least one ref!\r
-               if (($cnt > 0) && ($refpoints > $cpoints)) { $_uid = $uid; } else { $cnt = ""; }\r
-\r
-               // Save values to array\r
-               $DATA['uid'][]     = $_uid;\r
-               $DATA['ref'][]     = $cnt;\r
-               $DATA['cpoints'][] = $cpoints;\r
-       }\r
-\r
-       // Free memory\r
-       SQL_FREERESULT($result);\r
-\r
-       // Sort whole array\r
-       array_pk_sort($DATA, array("ref", "cpoints"), 0, 1, true);\r
-\r
-       // Generate table\r
-       $OUT = LOAD_TEMPLATE("guest_rallye_header", true);\r
-       $SW = 2;\r
-       for ($idx = 0; $idx < $prices; $idx++)\r
-       {\r
-               if (empty($DATA['uid'][$idx])) $DATA['uid'][$idx] = "---";\r
-               if (empty($DATA['ref'][$idx])) $DATA['ref'][$idx] = "---";\r
-               // Add row\r
-               $OUT .= "<TR>\r
-  <TD class=\"switch_sw".$SW." bottom2\">&nbsp;&nbsp;".($idx+1).".</TD>\r
-  <TD align=\"center\" class=\"switch_sw".$SW." bottom2\">";\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";\r
-               $OUT .= $DATA['uid'][$idx];\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";\r
-               $OUT .= "</TD>\r
-  <TD align=\"center\" class=\"switch_sw".$SW." bottom2\">";\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";\r
-               $OUT .= $DATA['ref'][$idx];\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";\r
-               $OUT .= "</TD>\r
-</TR>\n";\r
-               $SW = 3 - $SW;\r
-       }\r
-       // Add footer\r
-       $OUT .= LOAD_TEMPLATE("guest_rallye_footer", true);\r
-\r
-       // And finnally return the output\r
-       return $OUT;\r
-}\r
-// Run this function only when a new member has confirmed his email address!\r
-function RALLYE_AUTOADD_USER($uid)\r
-{\r
-       global $DATA;\r
-       // Check for an auto-add rallye\r
-       $result = SQL_QUERY("SELECT id, title, start_time, end_time, send_notify FROM "._MYSQL_PREFIX."_rallye_data WHERE is_active='Y' AND notified='Y' AND auto_add_new_user='Y' AND expired='N' LIMIT 1", __FILE__, __LINE__);\r
-       if (SQL_NUMROWS($result) == 1)\r
-       {\r
-               // Load data\r
-               list($id, $title, $start, $end, $notify) = SQL_FETCHROW($result);\r
-               SQL_FREERESULT($result);\r
-\r
-               // Check if line is already included...\r
-               $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d AND userid=%d LIMIT 1",\r
-                array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);\r
-               if (SQL_NUMROWS($result) == 0)\r
-               {\r
-                       // Add userid and his ref count to table\r
-                       $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_rallye_users (rallye_id, userid, refs)\r
-VALUES ('%s', '%s', '0')",\r
- array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);\r
-               }\r
-                else\r
-               {\r
-                       // Free memory\r
-                       SQL_FREERESULT($result);\r
-               }\r
-\r
-               if ($notify == "Y")\r
-               {\r
-                       // Transfer all neccessary data to the global $DATA array\r
-                       $DATA['start'] = MAKE_DATETIME($start, "2");\r
-                       $DATA['end']   = MAKE_DATETIME($end  , "2");\r
-                       $DATA['now_t'] = MAKE_DATETIME(time(), "2");\r
-                       $DATA['title'] = $title;\r
-                       $DATA['id']    = $id;  // ID for the rallye details link\r
-                       $DATA['ref']   = "0";\r
-\r
-                       // Load prices\r
-                       $prices = RALLYE_ADD_PRICES($id);\r
-\r
-                       // Send notification to member\r
-                       $msg = LOAD_EMAIL_TEMPLATE("member_rallye_notify", $prices, $uid);\r
-                       SEND_EMAIL($uid, RALLYE_MEMBER_NOTIFY.$title, $msg);\r
-               }\r
-       }\r
-}\r
-//\r
-function RALLYE_EXPIRE_RALLYES($result)\r
-{\r
-       global $DATA, $CONFIG;\r
-\r
-       // Latest online time\r
-       $since = (time() - $CONFIG['ap_in_since']);\r
-\r
-       // Load rallye data\r
-       list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);\r
-       SQL_FREERESULT($result);\r
-\r
-       // Load users array (!) with assigned prices\r
-       $prices = RALLYE_LOAD_USERS_ARRAY($id);\r
-\r
-       // Init array\r
-       $DATA = array(); $cnt = 0;\r
-       $users = array();\r
-       $DATA['title']  = $title;\r
-       $DATA['start']  = MAKE_DATETIME($start, "1");\r
-       $DATA['end']    = MAKE_DATETIME($end  , "1");\r
-       $DATA['now_t']  = MAKE_DATETIME(time(), "1");\r
-\r
-       // Just count...\r
-       $TOTAL = 0;\r
-       foreach($prices['uid'] as $key=>$uid)\r
-       {\r
-               // Check status\r
-               //   active = 1: account is still confirmed\r
-               //   active = 0: account is deleted or locked\r
-               $result = SQL_QUERY_ESC("SELECT COUNT(userid) AS active\r
-FROM "._MYSQL_PREFIX."_user_data\r
-WHERE userid=%d AND status='CONFIRMED' AND last_online >= %s\r
-LIMIT 1", array(bigintval($uid), $since), __FILE__, __LINE__);\r
-               list($active) = SQL_FETCHROW($result);\r
-               SQL_FREERESULT($result);\r
-\r
-               $prices['active'][$key] = $active;\r
-\r
-               // Allow valid and active users with at least one ref to get points\r
-               if (($uid > 0) && ($prices['ref'][$key] > 0) && ($active == 1) && ($prices['cpoints'][$key] > 0))\r
-               {\r
-                       $TOTAL++;\r
-               }\r
-       }\r
-\r
-       if (($TOTAL < $min_prices) || ($TOTAL == 0))\r
-       {\r
-               // Do not end this rallye!\r
-               return;\r
-       }\r
-\r
-       // Expire rallye\r
-       $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_rallye_data SET expired='Y' WHERE id=%d LIMIT 1",\r
-        array(bigintval($id)), __FILE__, __LINE__);\r
-\r
-       // Run array through (by uid is the most important 2nd-level-array)\r
-       foreach($prices['uid'] as $key=>$uid)\r
-       {\r
-               // Allow valid and active users with at least one ref to get points\r
-               if (($uid > 0) && ($prices['ref'][$key] > 0) && ($prices['active'][$key] == 1) && ($prices['cpoints'][$key] > 0))\r
-               {\r
-                       // Transfer data to array for the mail template\r
-                       $DATA['level']  = $prices['level'][$key];\r
-                       $DATA['points'] = $prices['points'][$key];\r
-                       $DATA['info']   = $prices['info'][$key];\r
-                       $DATA['ref']    = $prices['ref'][$key];\r
-\r
-                       if ($DATA['points'] > 0)\r
-                       {\r
-                               // Add points directly to user's account\r
-                               $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_points SET points=points+%s WHERE userid=%d AND ref_depth='0' LIMIT 1",\r
-                                array($DATA['points'], bigintval($uid)), __FILE__, __LINE__);\r
-\r
-                               // Update mediadata as well\r
-                               if (GET_EXT_VERSION("mediadata") >= "0.0.4")\r
-                               {\r
-                                       // Update database\r
-                                       MEDIA_UPDATE_ENTRY(array("total_points"), "add", $DATA['points']);\r
-                               }\r
-                       }\r
-\r
-                       if ($notify == "Y")\r
-                       {\r
-                               // Prepare infos for the mail template\r
-                               if (!empty($DATA['info']))\r
-                               {\r
-                                       // Take direct infos\r
-                                       $DATA['infos'] = $DATA['info'];\r
-                               }\r
-                                else\r
-                               {\r
-                                       // Take points\r
-                                       $DATA['infos'] = $DATA['points']." ".POINTS;\r
-                               }\r
-\r
-                               // Add suffix to template name\r
-                               $template = "member_rallye_expired";\r
-                               if ($DATA['level'] == 1)\r
-                               {\r
-                                       // The winner!\r
-                                       $template .= "_gold";\r
-                               }\r
-                                elseif ($DATA['level'] == 2)\r
-                               {\r
-                                       // The vice winner!\r
-                                       $template .= "_silver";\r
-                               }\r
-                                elseif ($DATA['level'] == 3)\r
-                               {\r
-                                       // The bronce winner\r
-                                       $template .= "_bronce";\r
-                               }\r
-\r
-                               // Load template\r
-                               $msg = LOAD_EMAIL_TEMPLATE($template, $DATA, $uid);\r
-                               SEND_EMAIL($uid, RALLYE_MEMBER_EXPIRED.": ".$DATA['level']." "._RALLYE_PRICE, $msg);\r
-                       }\r
-\r
-                       // Count userid\r
-                       $cnt++;\r
-                       $users['uid'][$uid] = $uid;\r
-                       $users['poi'][$uid] = $DATA['infos'];\r
-               }\r
-       }\r
-\r
-       // Select template depending on notfication is switch on / off\r
-       if ($notify == "Y")\r
-       {\r
-               $templ = "admin_rallye_expired";\r
-       }\r
-        elseif (is_array($users['uid']))\r
-       {\r
-               $templ = "admin_rallye_expired_no";\r
-               $cnt = RALLYE_LOAD_USER_DATA($users);\r
-       }\r
-\r
-       // Send mail to admin\r
-       if (GET_EXT_VERSION("admins") < "0.4.1")\r
-       {\r
-               // Use old method to send out\r
-               $msg = LOAD_EMAIL_TEMPLATE($templ, $cnt, 0);\r
-               SEND_ADMIN_EMAILS(RALLYE_ADMIN_EXPIRED.": ".$title, $msg);\r
-       }\r
-        else\r
-       {\r
-               // Use new system to send out\r
-               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_EXPIRED.": ".$title, $templ, $cnt, 0);\r
-       }\r
-\r
-       // Add task\r
-       $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_task_system (status, task_type, subject, text, task_created)\r
-VALUES ('NEW', 'RALLYE_EXPIRED', '".RALLYE_ADMIN_EXPIRED.": %s', '".RALLYE_ADMIN_EXPIRED_TEXT."', UNIX_TIMESTAMP())",\r
- array($title), __FILE__, __LINE__);\r
-\r
-       // All work done here...\r
-}\r
-//\r
-function RALLYE_LOAD_USER_DATA($uids_array)\r
-{\r
-       // Implode user ids\r
-       $uid_string = implode(",", $uids_array['uid']);\r
-\r
-       // Load users\r
-       $result = SQL_QUERY_ESC("SELECT userid, sex, surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid IN(%s) AND status='CONFIRMED' ORDER BY userid LIMIT %s",\r
-        array($uid_string, count($uids_array)), __FILE__, __LINE__);\r
-       $ret = "";\r
-       while (list($u, $sex, $surname, $family, $email) = SQL_FETCHROW($result))\r
-       {\r
-               $ret .= TRANSLATE_SEX($sex)." ".$surname." ".$family." (".$email.") - ".$uids_array['poi'][$u]."\n";\r
-       }\r
-\r
-       // Return result\r
-       return substr($ret, 0, -1);\r
-}\r
-//\r
-function RALLYE_LOAD_PRICES_ARRAY($rallye)\r
-{\r
-       // Init multi array\r
-       $prices = array(\r
-               'level'  => array(),\r
-               'points' => array(),\r
-               'info'   => array()\r
-       );\r
-\r
-       // Load prices\r
-       $result = SQL_QUERY_ESC("SELECT price_level, points, info FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",\r
-        array(bigintval($rallye)), __FILE__, __LINE__);\r
-       while(list($level, $points, $info) = SQL_FETCHROW($result))\r
-       {\r
-               $prices['level'][]  = $level;\r
-               $prices['points'][] = $points;\r
-               $prices['info'][]   = $info;\r
-       }\r
-\r
-       // Free memory\r
-       SQL_FREERESULT($result);\r
-\r
-       // Return array\r
-       return $prices;\r
-}\r
-//\r
-function RALLYE_LOAD_USERS_ARRAY($rallye)\r
-{\r
-       global $CONFIG;\r
-\r
-       // Fix zero points to 0.00000\r
-       if ($CONFIG['ref_payout'] == "0") $CONFIG['ref_payout'] = "0.00000";\r
-\r
-       // Init multi array\r
-       $users = array(\r
-               'uid'     => array(),\r
-               'ref'     => array(),\r
-               'cpoints' => array(),\r
-       );\r
-\r
-       // Load users                    uid    old   points earned\r
-       $result_user = SQL_QUERY_ESC("SELECT userid, refs, curr_points FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d ORDER BY userid",\r
-        array(bigintval($rallye)), __FILE__, __LINE__);\r
-       while(list($uid, $refs, $cpoints) = SQL_FETCHROW($result_user))\r
-       {\r
-               // Load current ref count\r
-               $cnt = RALLYE_GET_REFCOUNT($uid, $refs);\r
-\r
-               // Points of ref's\r
-               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(p.points)\r
-FROM "._MYSQL_PREFIX."_user_points AS p\r
-LEFT JOIN "._MYSQL_PREFIX."_user_data AS d\r
-ON p.userid=d.userid\r
-WHERE d.status='CONFIRMED' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND p.ref_depth='1' AND p.points > 0 AND d.userid=%d",\r
- array($CONFIG['ref_payout'], bigintval($uid)), __FILE__, __LINE__);\r
-               list($refpoints) = SQL_FETCHROW($result_ref);\r
-               SQL_FREERESULT($result_ref);\r
-\r
-               if (empty($refpoints)) $refpoints = "0";\r
-\r
-               // Store calculated new refs to array\r
-               $users['uid'][]     = $uid;\r
-               $users['ref'][]     = abs($cnt - $refs);\r
-               $users['cpoints'][] = $refpoints - $cpoints;\r
-       }\r
-\r
-       // Free memory\r
-       SQL_FREERESULT($result_user);\r
-\r
-       // Sort array for refs (descending)\r
-       array_pk_sort($users, array("ref", "cpoints"), 0, 1, true);\r
-\r
-       // Load prices array (!)\r
-       $prices = RALLYE_LOAD_PRICES_ARRAY($rallye);\r
-\r
-       // Merge users into prices\r
-       foreach ($prices['level'] as $k=>$lvl)\r
-       {\r
-               $prices['uid'][$k]  = $users['uid'][$k];\r
-               if (empty($prices['uid'][$k])) $prices['uid'][$k]  = "---";\r
-               $prices['ref'][$k] = $users['ref'][$k];\r
-               if (empty($prices['ref'][$k])) $prices['ref'][$k] = "---";\r
-               $prices['cpoints'][$k] = $users['cpoints'][$k];\r
-       }\r
-\r
-       // Return completed array\r
-       return $prices;\r
-}\r
-//\r
-function RALLYE_LIST_WINNERS($rallye,$default=0)\r
-{\r
-       // First check how many prices are set\r
-       $result_prices = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",\r
-        array(bigintval($rallye)), __FILE__, __LINE__);\r
-       $prices = SQL_NUMROWS($result_prices);\r
-       SQL_FREERESULT($result_prices);\r
-\r
-       // Load data\r
-       $DATA = RALLYE_LOAD_USERS_ARRAY($rallye);\r
-\r
-       // Generate table\r
-       $OUT = LOAD_TEMPLATE("guest_rallye_expired_header", true);\r
-       $SW = 2;\r
-       for ($idx = 0; $idx < $prices; $idx++)\r
-       {\r
-               // Check status\r
-               //   active = 1: account is still confirmed\r
-               //   active = 0: account is deleted or locked\r
-               $result_active = SQL_QUERY_ESC("SELECT COUNT(userid) FROM "._MYSQL_PREFIX."_user_data WHERE userid=%d AND status='CONFIRMED' LIMIT 1",\r
-                array(bigintval($DATA['uid'][$idx])), __FILE__, __LINE__);\r
-               list($active) = SQL_FETCHROW($result_active);\r
-               SQL_FREERESULT($result_active);\r
-\r
-               if (empty($DATA['uid'][$idx])) $DATA['uid'][$idx] = "---";\r
-               if ((empty($DATA['ref'][$idx])) || ($DATA['ref'][$idx] == 0) || ($active == 0) || ("".round($DATA['cpoints'][$idx])."" == "0") || (empty($DATA['cpoints'][$idx])))\r
-               {\r
-                       // Allow valid and active users with at least one ref to get points\r
-                       $DATA['ref'][$idx]   = "---";\r
-                       $DATA['uid'][$idx]   = "---";\r
-               }\r
-               if (!empty($DATA['info'][$idx]))\r
-               {\r
-                       // Take direct infos\r
-                       $DATA['infos'][$idx] = $DATA['info'][$idx];\r
-               }\r
-                else\r
-               {\r
-                       // Take ppints\r
-                       $DATA['infos'][$idx] = $DATA['points'][$idx]." ".POINTS;\r
-               }\r
-\r
-               // Add row\r
-               $ADD = "";\r
-               $OUT .= "<TR>\r
-  <TD class=\"switch_sw".$SW." bottom2".$ADD."\">&nbsp;&nbsp;".($idx+1).".</TD>\r
-  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";\r
-               $OUT .= $DATA['uid'][$idx];\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";\r
-               $OUT .= "</TD>\r
-  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";\r
-               $OUT .= $DATA['ref'][$idx];\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";\r
-               $OUT .= "</TD>\r
-  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";\r
-               $OUT .= $DATA['infos'][$idx];\r
-               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";\r
-               $OUT .= "</TD>\r
-</TR>\n";\r
-               $SW = 3 - $SW;\r
-       }\r
-       // Add footer\r
-       $OUT .= LOAD_TEMPLATE("guest_rallye_expired_footer", true);\r
-\r
-       // And finnally return the output\r
-       return $OUT;\r
-}\r
-//\r
-function RALLYE_DELETE_EXPIRED_RALLYES()\r
-{\r
-       global $DATA, $CONFIG;\r
-       // Check for expired rallyes\r
-       $EXPIRE = time() - ONE_DAY * 3; // The hard-coded value...\r
-       $result_rallye = SQL_QUERY_ESC("SELECT id, title, start_time, end_time FROM "._MYSQL_PREFIX."_rallye_data WHERE end_time <= %s AND expired='Y'",\r
-        array($EXPIRE), __FILE__, __LINE__);\r
-\r
-       if (SQL_NUMROWS($result_rallye) > 0)\r
-       {\r
-               // Expire found rallyes and notify admin\r
-               while(list($id, $title, $start, $end) = SQL_FETCHROW($result_rallye))\r
-               {\r
-                       // Prepare data for mail template\r
-                       $DATA['title']  = $title;\r
-                       $DATA['start']  = MAKE_DATETIME($start, "1");\r
-                       $DATA['end']    = MAKE_DATETIME($end  , "1");\r
-                       $DATA['now_t']  = MAKE_DATETIME(time(), "1");\r
-\r
-                       // Send mail to admin\r
-                       if (GET_EXT_VERSION("admins") < "0.4.1")\r
-                       {\r
-                               // Use old method to send out\r
-                               $msg = LOAD_EMAIL_TEMPLATE("admin_rallye_purged", "", 0);\r
-                               SEND_ADMIN_EMAILS(RALLYE_ADMIN_PURGED.": ".$title, $msg);\r
-                       }\r
-                        else\r
-                       {\r
-                               // Use new system to send out\r
-                               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_PURGED.": ".$title, "admin_rallye_purged", "", 0);\r
-                       }\r
-\r
-                       // Purge whole rallye\r
-                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_data WHERE id=%d LIMIT 1",\r
-                        array(bigintval($id)), __FILE__, __LINE__);\r
-                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d LIMIT 1",\r
-                        array(bigintval($id)), __FILE__, __LINE__);\r
-                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d LIMIT 1",\r
-                        array(bigintval($id)), __FILE__, __LINE__);\r
-               }\r
-\r
-               // Add task\r
-               $result_task = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_task_system (status, task_type, subject, text, task_created)\r
-VALUES ('NEW', 'RALLYE_PURGED', '".RALLYE_ADMIN_PURGED.": %s', '".RALLYE_ADMIN_PURGED_TEXT."', UNIX_TIMESTAMP())",\r
- array($title), __FILE__, __LINE__);\r
-       }\r
-\r
-       // Free memory\r
-       SQL_FREERESULT($result_rallye);\r
-}\r
-//\r
-function RALLYE_TEMPLATE_SELECTION($name="template", $default="")\r
-{\r
-       // Check templates directory\r
-       $OUT = ""; $ral = array();\r
-       $BASE = PATH."templates/".GET_LANGUAGE()."/html";\r
-       $dir = opendir($BASE);\r
-       while ($read = readdir($dir))\r
-       {\r
-               // If it is no dir (so a file)\r
-               if (!is_dir($BASE.$read))\r
-               {\r
-                       // Accept only templates matching with rallye_????.tpl.xx\r
-                       if (eregi("^rallye_.*\.tpl", $read))\r
-                       {\r
-                               $read = substr($read, 7, strpos($read, ".") - 7);\r
-                               // Accept only template names between 1 and 255 chars length\r
-                               if ((strlen($read) < 256) && (!empty($read))) $ral[] = $read;\r
-                       }\r
-               }\r
-       }\r
-       closedir($dir);\r
-\r
-       // Do we have found templates which we can link with the new rallye?\r
-       if (!empty($ral[0]))\r
-       {\r
-               // Generate selection box for all found templates\r
-               $OUT  = "<SELECT name=\"".$name."\" size=\"1\" class=\"admin_select\">\r
-  <OPTION value=\"\">".SELECT_NONE."</OPTION>\n";\r
-               foreach ($ral as $rallye)\r
-               {\r
-                    $OUT .= "  <OPTION value=\"".$rallye."\"";\r
-                       if ($default == $rallye) $OUT .= " selected default";\r
-                       $OUT .= ">".$rallye."</OPTION>\n";\r
-               }\r
-               $OUT .= "</SELECT>\n";\r
-       }\r
-        else\r
-       {\r
-               // No rallye templates found\r
-               $OUT = RALLYE_NO_TEMPLATES_FOUND;\r
-       }\r
-\r
-       // Return selection\r
-       return $OUT;\r
-}\r
-//\r
-function RALLYE_GET_REFCOUNT($uid, $old=0)\r
-{\r
-       global $REF_SYSTEM, $REF_DEPTHS, $CONFIG;\r
-       // Check current refs\r
-       if (GET_EXT_VERSION("cache") >= "0.1.2")\r
-       {\r
-               // Get refs from cache\r
-               $cnt = 0;\r
-               foreach ($REF_SYSTEM['userid'] as $id=>$u_id)\r
-               {\r
-                       if (($u_id == $uid) && ($REF_SYSTEM['level'][$id] == 0))\r
-                       {\r
-                               foreach ($REF_DEPTHS['level'] as $level)\r
-                               {\r
-                                       if (($level == $REF_SYSTEM['level'][$id]) && ($level == 0))\r
-                                       {\r
-                                               // Level does exist so abort here\r
-                                               $cnt = $REF_SYSTEM['counter'][$id];\r
-                                               //* DEBUG: */ echo "*".$uid."/".$cnt."*<BR>";\r
-                                               break;\r
-                                       }\r
-                                        elseif ($level > 0)\r
-                                       {\r
-                                               // Not interesting here...\r
-                                               break;\r
-                                       }\r
-                               }\r
-                               // Abort also here!\r
-                               if ($cnt > 0) break;\r
-                       }\r
-               }\r
-               //* DEBUG: */ echo "<PRE>";\r
-               //* DEBUG: */ print_r($REF_SYSTEM);\r
-               //* DEBUG: */ echo "</PRE>";\r
-               //* DEBUG: */ die();\r
-\r
-               if ($cnt > 0)\r
-               {\r
-                       // Count cache hits\r
-                       $CONFIG['cache_hits']++;\r
-\r
-                       // Remove old refs\r
-                       //* DEBUG: */ echo "+".$cnt."/".$old."+<BR>";\r
-                       $cnt -= $old;\r
-               }\r
-       }\r
-        else\r
-       {\r
-               // Load current refs from database\r
-               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(s.counter) AS cnt\r
-FROM "._MYSQL_PREFIX."_refsystem AS s\r
-LEFT JOIN "._MYSQL_PREFIX."_refdepths AS d\r
-ON s.level=d.level\r
-WHERE s.userid=%d AND s.level=0", array(bigintval($uid)), __FILE__, __LINE__);\r
-               list($cnt) = SQL_FETCHROW($result_ref);\r
-               SQL_FREERESULT($result_ref);\r
-               if (empty($cnt))\r
-               {\r
-                       $cnt = "0";\r
-               }\r
-                else\r
-               {\r
-                       $cnt -= $old;\r
-               }\r
-       }\r
-\r
-       // Return count\r
-       //* DEBUG: */ echo "*".$uid."/".$old."/".$cnt."*<BR>";\r
-       return $cnt;\r
-}\r
-//\r
-?>\r
+<?php
+/************************************************************************
+ * MXChange v0.2.1                                    Start: 08/22/2004 *
+ * ===============                              Last change: 08/24/2004 *
+ *                                                                      *
+ * -------------------------------------------------------------------- *
+ * File              : rallye_functions.php                             *
+ * -------------------------------------------------------------------- *
+ * Short description : Special functions for rallye extension           *
+ * -------------------------------------------------------------------- *
+ * Kurzbeschreibung  : Spezielle Funktion fuer rallye-Erweiterung       *
+ * -------------------------------------------------------------------- *
+ *                                                                      *
+ * -------------------------------------------------------------------- *
+ * Copyright (c) 2003 - 2008 by Roland Haeder                           *
+ * For more information visit: http://www.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 *
+ * the Free Software Foundation; either version 2 of the License, or    *
+ * (at your option) any later version.                                  *
+ *                                                                      *
+ * This program is distributed in the hope that it will be useful,      *
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
+ * GNU General Public License for more details.                         *
+ *                                                                      *
+ * You should have received a copy of the GNU General Public License    *
+ * along with this program; if not, write to the Free Software          *
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
+ * MA  02110-1301  USA                                                  *
+ ************************************************************************/
+
+// Some security stuff...
+if (ereg(basename(__FILE__), $_SERVER['PHP_SELF']))
+{
+       $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
+       require($INC);
+}
+//
+function RALLYE_AUTOSTART_RALLYES($result)
+{
+       // Global data array for LOAD_EMAIL_TEMPLATE()
+       $DATA = array();
+       global $DATA, $CONFIG;
+
+       // Load all rallyes (usally we have only one rallye active per time!
+       list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);
+       SQL_FREERESULT($result);
+
+       // Set notified to Y
+       $result_notified = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_rallye_data SET notified='Y' WHERE id=%d LIMIT 1",
+        array(bigintval($id)), __FILE__, __LINE__);
+
+       // Do a snapshot off all user refs
+       $result_user = SQL_QUERY("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE status='CONFIRMED' ORDER BY userid", __FILE__, __LINE__);
+
+       // Transfer all neccessary data to the global $DATA array
+       $DATA['uid_cnt']    = SQL_NUMROWS($result_user);
+       $DATA['start']      = MAKE_DATETIME($start, "2");
+       $DATA['end']        = MAKE_DATETIME($end  , "2");
+       $DATA['now_t']      = MAKE_DATETIME(time(), "2");
+       $DATA['title']      = $title;
+       $DATA['id']         = $id;  // ID for the rallye details link
+
+       if ($min_users == 0)
+       {
+               // Rallye ends without user limitation
+               $DATA['min_users'] = RALLYE_END_NO_USER_LIMITATION;
+       }
+        else
+       {
+               // Rallye ends when X members are totally in your exchange
+               $DATA['min_users'] = RALLYE_END_USERS_1." ".$min_users." ".RALLYE_END_USERS_2;
+       }
+       if ($min_prices == 0)
+       {
+               // Rallye ends without user limitation
+               $DATA['min_prices'] = RALLYE_END_NO_PRICE_LIMITATION;
+       }
+        else
+       {
+               // Rallye ends when X members are totally in your exchange
+               $DATA['min_prices'] = RALLYE_END_PRICES_1." ".$min_prices." ".RALLYE_END_PRICES_2;
+       }
+
+       // Load prices
+       $prices = RALLYE_ADD_PRICES($id);
+
+       // Let's begin with the userids...
+       while (list($uid) = SQL_FETCHROW($result_user))
+       {
+               $un = false;
+
+               // Get refs by userid
+               $cnt = RALLYE_GET_REFCOUNT($uid);
+               if (empty($cnt)) $cnt = "0"; // Added prevent some unknown troubles... :-?
+
+               // Check if line is already included...
+               $result_ref = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d AND userid=%d LIMIT 1",
+                array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);
+               if (SQL_NUMROWS($result_ref) == 0)
+               {
+                       // Free memory
+                       SQL_FREERESULT($result_ref);
+
+                       // Add userid and his ref count to table
+                       $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(p.points)
+FROM "._MYSQL_PREFIX."_user_points AS p
+LEFT JOIN "._MYSQL_PREFIX."_user_data AS d
+ON p.userid=d.userid
+WHERE d.status='CONFIRMED' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND p.ref_depth='1' AND p.points > 0 AND d.userid=%d",
+ array($CONFIG['ref_payout'], bigintval($uid)), __FILE__, __LINE__);
+                       list($cpoints) = SQL_FETCHROW($result_ref);
+                       SQL_FREERESULT($result_ref);
+
+                       if (empty($cpoints)) $cpoints = "0.00000";
+
+                       // Add info line
+                       $result_ref = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_rallye_users (rallye_id, userid, refs, curr_points)
+VALUES ('%s', '%s', '%s', '%s')",
+ array(bigintval($id), bigintval($uid), bigintval($cnt), $cpoints), __FILE__, __LINE__);
+                       $un = true;
+               }
+
+               // Ignored but for the template required refs (made before start of rallye)
+               $DATA['refs']  = $cnt;
+
+               // Shall I notify this member?
+               if (($notify == "Y") && ($un))
+               {
+                       // Load email template and send it to the user
+                       $msg = LOAD_EMAIL_TEMPLATE("member_rallye_notify", $prices, $uid);
+                       SEND_EMAIL($uid, RALLYE_MEMBER_NOTIFY.$title, $msg);
+               }
+       }
+
+       // Send email to admin
+       $templ = "admin_rallye_no_notify";
+       if ($notify == "Y") $templ = "admin_rallye_notify";
+       if (GET_EXT_VERSION("admins") < "0.4.1")
+       {
+               // Use old method to send out
+               $msg = LOAD_EMAIL_TEMPLATE($templ, $prices, 0);
+               SEND_ADMIN_EMAILS(RALLYE_ADMIN_NOTIFY.$title, $msg);
+       }
+        else
+       {
+               // Use new system to send out
+               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_NOTIFY.$title, $templ, $prices, "0");
+       }
+
+       // Free memory
+       SQL_FREERESULT($result_user);
+}
+//
+function RALLYE_ADD_PRICES($rallye,$mode="email")
+{
+       // Output mode
+       switch($mode)
+       {
+               case "email": $mode = "\n";     break;
+               case "html" : $mode = "<BR>\n"; break;
+       }
+
+       // Load prices
+       $result_prices = SQL_QUERY("SELECT price_level, points, info FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id='".$rallye."' ORDER BY price_level", __FILE__, __LINE__);
+       if (SQL_NUMROWS($result_prices) > 0)
+       {
+               // Load prices
+               if ($mode == "\n") $prices = RALLYE_MEMBER_PRICES_ADDED.":".$mode."------------------------------".$mode;
+               $prices = "";
+               while (list($level, $points, $info) = SQL_FETCHROW($result_prices))
+               {
+                       $prices .= $level.RALLYE_PRICE.": ";
+                       if (!empty($info))
+                       {
+                               $prices .= $info;
+                       }
+                        else
+                       {
+                               $prices .= $points." ".POINTS;
+                       }
+                       $prices .= "".$mode;
+               }
+
+               // Free memory
+               SQL_FREERESULT($result_prices);
+       }
+        else
+       {
+               // No prices???
+               $prices = RALLYE_MEMBER_NO_PRICES.$mode;
+       }
+       // Add last line for email mode
+       if ($mode == "\n") $prices .= "------------------------------";
+
+       // Return price list
+       return $prices;
+}
+//
+function RALLYE_ADD_TOPUSERS($rallye,$default=0)
+{
+       global $CONFIG;
+       $since = (time() - $CONFIG['ap_in_since']);
+
+       // First check how many prices are set
+       $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",
+        array(bigintval($rallye)), __FILE__, __LINE__);
+       $prices = SQL_NUMROWS($result);
+       SQL_FREERESULT($result);
+
+       // And load only limited users
+       $result = SQL_QUERY_ESC("SELECT DISTINCT u.userid, u.refs, u.curr_points FROM "._MYSQL_PREFIX."_rallye_users AS u
+LEFT JOIN "._MYSQL_PREFIX."_refsystem AS r
+ON u.userid=r.userid
+WHERE u.rallye_id=%d AND r.counter > 0 ORDER BY u.refs DESC",
+ array(bigintval($rallye)), __FILE__, __LINE__);
+
+       // Load users
+       $DATA = array(
+               'uid'      => array(),
+               'ref'      => array(),
+               'cpoints'  => array()
+       );
+
+       while(list($uid, $refs, $cpoints) = SQL_FETCHROW($result))
+       {
+               // Get current refs
+               $cnt = RALLYE_GET_REFCOUNT($uid, $refs);
+
+               // Points of ref's
+               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT p.points FROM "._MYSQL_PREFIX."_user_points AS p
+LEFT JOIN "._MYSQL_PREFIX."_user_data AS d
+ON p.userid=d.userid
+WHERE d.userid=%d AND d.status='CONFIRMED' AND p.ref_depth='1' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND d.last_online >= %s
+LIMIT 1", array(bigintval($uid), $CONFIG['ref_payout'], $since), __FILE__, __LINE__);
+               list($refpoints) = SQL_FETCHROW($result_ref);
+               SQL_FREERESULT($result_ref);
+
+               if (empty($refpoints)) $refpoints = "0";
+
+               // And subtract start refs
+               $cnt -= $refs;
+
+               $_uid = "---";
+               // List only users with at least one ref!
+               if (($cnt > 0) && ($refpoints > $cpoints)) { $_uid = $uid; } else { $cnt = ""; }
+
+               // Save values to array
+               $DATA['uid'][]     = $_uid;
+               $DATA['ref'][]     = $cnt;
+               $DATA['cpoints'][] = $cpoints;
+       }
+
+       // Free memory
+       SQL_FREERESULT($result);
+
+       // Sort whole array
+       array_pk_sort($DATA, array("ref", "cpoints"), 0, 1, true);
+
+       // Generate table
+       $OUT = LOAD_TEMPLATE("guest_rallye_header", true);
+       $SW = 2;
+       for ($idx = 0; $idx < $prices; $idx++)
+       {
+               if (empty($DATA['uid'][$idx])) $DATA['uid'][$idx] = "---";
+               if (empty($DATA['ref'][$idx])) $DATA['ref'][$idx] = "---";
+               // Add row
+               $OUT .= "<TR>
+  <TD class=\"switch_sw".$SW." bottom2\">&nbsp;&nbsp;".($idx+1).".</TD>
+  <TD align=\"center\" class=\"switch_sw".$SW." bottom2\">";
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";
+               $OUT .= $DATA['uid'][$idx];
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";
+               $OUT .= "</TD>
+  <TD align=\"center\" class=\"switch_sw".$SW." bottom2\">";
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";
+               $OUT .= $DATA['ref'][$idx];
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";
+               $OUT .= "</TD>
+</TR>\n";
+               $SW = 3 - $SW;
+       }
+       // Add footer
+       $OUT .= LOAD_TEMPLATE("guest_rallye_footer", true);
+
+       // And finnally return the output
+       return $OUT;
+}
+// Run this function only when a new member has confirmed his email address!
+function RALLYE_AUTOADD_USER($uid)
+{
+       global $DATA;
+       // Check for an auto-add rallye
+       $result = SQL_QUERY("SELECT id, title, start_time, end_time, send_notify FROM "._MYSQL_PREFIX."_rallye_data WHERE is_active='Y' AND notified='Y' AND auto_add_new_user='Y' AND expired='N' LIMIT 1", __FILE__, __LINE__);
+       if (SQL_NUMROWS($result) == 1)
+       {
+               // Load data
+               list($id, $title, $start, $end, $notify) = SQL_FETCHROW($result);
+               SQL_FREERESULT($result);
+
+               // Check if line is already included...
+               $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d AND userid=%d LIMIT 1",
+                array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);
+               if (SQL_NUMROWS($result) == 0)
+               {
+                       // Add userid and his ref count to table
+                       $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_rallye_users (rallye_id, userid, refs)
+VALUES ('%s', '%s', '0')",
+ array(bigintval($id), bigintval($uid)), __FILE__, __LINE__);
+               }
+                else
+               {
+                       // Free memory
+                       SQL_FREERESULT($result);
+               }
+
+               if ($notify == "Y")
+               {
+                       // Transfer all neccessary data to the global $DATA array
+                       $DATA['start'] = MAKE_DATETIME($start, "2");
+                       $DATA['end']   = MAKE_DATETIME($end  , "2");
+                       $DATA['now_t'] = MAKE_DATETIME(time(), "2");
+                       $DATA['title'] = $title;
+                       $DATA['id']    = $id;  // ID for the rallye details link
+                       $DATA['ref']   = "0";
+
+                       // Load prices
+                       $prices = RALLYE_ADD_PRICES($id);
+
+                       // Send notification to member
+                       $msg = LOAD_EMAIL_TEMPLATE("member_rallye_notify", $prices, $uid);
+                       SEND_EMAIL($uid, RALLYE_MEMBER_NOTIFY.$title, $msg);
+               }
+       }
+}
+//
+function RALLYE_EXPIRE_RALLYES($result)
+{
+       global $DATA, $CONFIG;
+
+       // Latest online time
+       $since = (time() - $CONFIG['ap_in_since']);
+
+       // Load rallye data
+       list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);
+       SQL_FREERESULT($result);
+
+       // Load users array (!) with assigned prices
+       $prices = RALLYE_LOAD_USERS_ARRAY($id);
+
+       // Init array
+       $DATA = array(); $cnt = 0;
+       $users = array();
+       $DATA['title']  = $title;
+       $DATA['start']  = MAKE_DATETIME($start, "1");
+       $DATA['end']    = MAKE_DATETIME($end  , "1");
+       $DATA['now_t']  = MAKE_DATETIME(time(), "1");
+
+       // Just count...
+       $TOTAL = 0;
+       foreach($prices['uid'] as $key=>$uid)
+       {
+               // Check status
+               //   active = 1: account is still confirmed
+               //   active = 0: account is deleted or locked
+               $result = SQL_QUERY_ESC("SELECT COUNT(userid) AS active
+FROM "._MYSQL_PREFIX."_user_data
+WHERE userid=%d AND status='CONFIRMED' AND last_online >= %s
+LIMIT 1", array(bigintval($uid), $since), __FILE__, __LINE__);
+               list($active) = SQL_FETCHROW($result);
+               SQL_FREERESULT($result);
+
+               $prices['active'][$key] = $active;
+
+               // Allow valid and active users with at least one ref to get points
+               if (($uid > 0) && ($prices['ref'][$key] > 0) && ($active == 1) && ($prices['cpoints'][$key] > 0))
+               {
+                       $TOTAL++;
+               }
+       }
+
+       if (($TOTAL < $min_prices) || ($TOTAL == 0))
+       {
+               // Do not end this rallye!
+               return;
+       }
+
+       // Expire rallye
+       $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_rallye_data SET expired='Y' WHERE id=%d LIMIT 1",
+        array(bigintval($id)), __FILE__, __LINE__);
+
+       // Run array through (by uid is the most important 2nd-level-array)
+       foreach($prices['uid'] as $key=>$uid)
+       {
+               // Allow valid and active users with at least one ref to get points
+               if (($uid > 0) && ($prices['ref'][$key] > 0) && ($prices['active'][$key] == 1) && ($prices['cpoints'][$key] > 0))
+               {
+                       // Transfer data to array for the mail template
+                       $DATA['level']  = $prices['level'][$key];
+                       $DATA['points'] = $prices['points'][$key];
+                       $DATA['info']   = $prices['info'][$key];
+                       $DATA['ref']    = $prices['ref'][$key];
+
+                       if ($DATA['points'] > 0)
+                       {
+                               // Add points directly to user's account
+                               $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_points SET points=points+%s WHERE userid=%d AND ref_depth='0' LIMIT 1",
+                                array($DATA['points'], bigintval($uid)), __FILE__, __LINE__);
+
+                               // Update mediadata as well
+                               if (GET_EXT_VERSION("mediadata") >= "0.0.4")
+                               {
+                                       // Update database
+                                       MEDIA_UPDATE_ENTRY(array("total_points"), "add", $DATA['points']);
+                               }
+                       }
+
+                       if ($notify == "Y")
+                       {
+                               // Prepare infos for the mail template
+                               if (!empty($DATA['info']))
+                               {
+                                       // Take direct infos
+                                       $DATA['infos'] = $DATA['info'];
+                               }
+                                else
+                               {
+                                       // Take points
+                                       $DATA['infos'] = $DATA['points']." ".POINTS;
+                               }
+
+                               // Add suffix to template name
+                               $template = "member_rallye_expired";
+                               if ($DATA['level'] == 1)
+                               {
+                                       // The winner!
+                                       $template .= "_gold";
+                               }
+                                elseif ($DATA['level'] == 2)
+                               {
+                                       // The vice winner!
+                                       $template .= "_silver";
+                               }
+                                elseif ($DATA['level'] == 3)
+                               {
+                                       // The bronce winner
+                                       $template .= "_bronce";
+                               }
+
+                               // Load template
+                               $msg = LOAD_EMAIL_TEMPLATE($template, $DATA, $uid);
+                               SEND_EMAIL($uid, RALLYE_MEMBER_EXPIRED.": ".$DATA['level']." "._RALLYE_PRICE, $msg);
+                       }
+
+                       // Count userid
+                       $cnt++;
+                       $users['uid'][$uid] = $uid;
+                       $users['poi'][$uid] = $DATA['infos'];
+               }
+       }
+
+       // Select template depending on notfication is switch on / off
+       if ($notify == "Y")
+       {
+               $templ = "admin_rallye_expired";
+       }
+        elseif (is_array($users['uid']))
+       {
+               $templ = "admin_rallye_expired_no";
+               $cnt = RALLYE_LOAD_USER_DATA($users);
+       }
+
+       // Send mail to admin
+       if (GET_EXT_VERSION("admins") < "0.4.1")
+       {
+               // Use old method to send out
+               $msg = LOAD_EMAIL_TEMPLATE($templ, $cnt, 0);
+               SEND_ADMIN_EMAILS(RALLYE_ADMIN_EXPIRED.": ".$title, $msg);
+       }
+        else
+       {
+               // Use new system to send out
+               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_EXPIRED.": ".$title, $templ, $cnt, 0);
+       }
+
+       // Add task
+       $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_task_system (status, task_type, subject, text, task_created)
+VALUES ('NEW', 'RALLYE_EXPIRED', '".RALLYE_ADMIN_EXPIRED.": %s', '".RALLYE_ADMIN_EXPIRED_TEXT."', UNIX_TIMESTAMP())",
+ array($title), __FILE__, __LINE__);
+
+       // All work done here...
+}
+//
+function RALLYE_LOAD_USER_DATA($uids_array)
+{
+       // Implode user ids
+       $uid_string = implode(",", $uids_array['uid']);
+
+       // Load users
+       $result = SQL_QUERY_ESC("SELECT userid, sex, surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid IN(%s) AND status='CONFIRMED' ORDER BY userid LIMIT %s",
+        array($uid_string, count($uids_array)), __FILE__, __LINE__);
+       $ret = "";
+       while (list($u, $sex, $surname, $family, $email) = SQL_FETCHROW($result))
+       {
+               $ret .= TRANSLATE_SEX($sex)." ".$surname." ".$family." (".$email.") - ".$uids_array['poi'][$u]."\n";
+       }
+
+       // Return result
+       return substr($ret, 0, -1);
+}
+//
+function RALLYE_LOAD_PRICES_ARRAY($rallye)
+{
+       // Init multi array
+       $prices = array(
+               'level'  => array(),
+               'points' => array(),
+               'info'   => array()
+       );
+
+       // Load prices
+       $result = SQL_QUERY_ESC("SELECT price_level, points, info FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",
+        array(bigintval($rallye)), __FILE__, __LINE__);
+       while(list($level, $points, $info) = SQL_FETCHROW($result))
+       {
+               $prices['level'][]  = $level;
+               $prices['points'][] = $points;
+               $prices['info'][]   = $info;
+       }
+
+       // Free memory
+       SQL_FREERESULT($result);
+
+       // Return array
+       return $prices;
+}
+//
+function RALLYE_LOAD_USERS_ARRAY($rallye)
+{
+       global $CONFIG;
+
+       // Fix zero points to 0.00000
+       if ($CONFIG['ref_payout'] == "0") $CONFIG['ref_payout'] = "0.00000";
+
+       // Init multi array
+       $users = array(
+               'uid'     => array(),
+               'ref'     => array(),
+               'cpoints' => array(),
+       );
+
+       // Load users                    uid    old   points earned
+       $result_user = SQL_QUERY_ESC("SELECT userid, refs, curr_points FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d ORDER BY userid",
+        array(bigintval($rallye)), __FILE__, __LINE__);
+       while(list($uid, $refs, $cpoints) = SQL_FETCHROW($result_user))
+       {
+               // Load current ref count
+               $cnt = RALLYE_GET_REFCOUNT($uid, $refs);
+
+               // Points of ref's
+               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(p.points)
+FROM "._MYSQL_PREFIX."_user_points AS p
+LEFT JOIN "._MYSQL_PREFIX."_user_data AS d
+ON p.userid=d.userid
+WHERE d.status='CONFIRMED' AND d.max_mails > 0 AND d.mails_confirmed >= %s AND p.ref_depth='1' AND p.points > 0 AND d.userid=%d",
+ array($CONFIG['ref_payout'], bigintval($uid)), __FILE__, __LINE__);
+               list($refpoints) = SQL_FETCHROW($result_ref);
+               SQL_FREERESULT($result_ref);
+
+               if (empty($refpoints)) $refpoints = "0";
+
+               // Store calculated new refs to array
+               $users['uid'][]     = $uid;
+               $users['ref'][]     = abs($cnt - $refs);
+               $users['cpoints'][] = $refpoints - $cpoints;
+       }
+
+       // Free memory
+       SQL_FREERESULT($result_user);
+
+       // Sort array for refs (descending)
+       array_pk_sort($users, array("ref", "cpoints"), 0, 1, true);
+
+       // Load prices array (!)
+       $prices = RALLYE_LOAD_PRICES_ARRAY($rallye);
+
+       // Merge users into prices
+       foreach ($prices['level'] as $k=>$lvl)
+       {
+               $prices['uid'][$k]  = $users['uid'][$k];
+               if (empty($prices['uid'][$k])) $prices['uid'][$k]  = "---";
+               $prices['ref'][$k] = $users['ref'][$k];
+               if (empty($prices['ref'][$k])) $prices['ref'][$k] = "---";
+               $prices['cpoints'][$k] = $users['cpoints'][$k];
+       }
+
+       // Return completed array
+       return $prices;
+}
+//
+function RALLYE_LIST_WINNERS($rallye,$default=0)
+{
+       // First check how many prices are set
+       $result_prices = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d ORDER BY price_level",
+        array(bigintval($rallye)), __FILE__, __LINE__);
+       $prices = SQL_NUMROWS($result_prices);
+       SQL_FREERESULT($result_prices);
+
+       // Load data
+       $DATA = RALLYE_LOAD_USERS_ARRAY($rallye);
+
+       // Generate table
+       $OUT = LOAD_TEMPLATE("guest_rallye_expired_header", true);
+       $SW = 2;
+       for ($idx = 0; $idx < $prices; $idx++)
+       {
+               // Check status
+               //   active = 1: account is still confirmed
+               //   active = 0: account is deleted or locked
+               $result_active = SQL_QUERY_ESC("SELECT COUNT(userid) FROM "._MYSQL_PREFIX."_user_data WHERE userid=%d AND status='CONFIRMED' LIMIT 1",
+                array(bigintval($DATA['uid'][$idx])), __FILE__, __LINE__);
+               list($active) = SQL_FETCHROW($result_active);
+               SQL_FREERESULT($result_active);
+
+               if (empty($DATA['uid'][$idx])) $DATA['uid'][$idx] = "---";
+               if ((empty($DATA['ref'][$idx])) || ($DATA['ref'][$idx] == 0) || ($active == 0) || ("".round($DATA['cpoints'][$idx])."" == "0") || (empty($DATA['cpoints'][$idx])))
+               {
+                       // Allow valid and active users with at least one ref to get points
+                       $DATA['ref'][$idx]   = "---";
+                       $DATA['uid'][$idx]   = "---";
+               }
+               if (!empty($DATA['info'][$idx]))
+               {
+                       // Take direct infos
+                       $DATA['infos'][$idx] = $DATA['info'][$idx];
+               }
+                else
+               {
+                       // Take ppints
+                       $DATA['infos'][$idx] = $DATA['points'][$idx]." ".POINTS;
+               }
+
+               // Add row
+               $ADD = "";
+               $OUT .= "<TR>
+  <TD class=\"switch_sw".$SW." bottom2".$ADD."\">&nbsp;&nbsp;".($idx+1).".</TD>
+  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";
+               $OUT .= $DATA['uid'][$idx];
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";
+               $OUT .= "</TD>
+  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";
+               $OUT .= $DATA['ref'][$idx];
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";
+               $OUT .= "</TD>
+  <TD align=\"center\" class=\"switch_sw".$SW." bottom2".$ADD."\">";
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "<STRONG>";
+               $OUT .= $DATA['infos'][$idx];
+               if (($DATA['uid'][$idx] == $default) && ($default > 0)) $OUT .= "</STRONG>";
+               $OUT .= "</TD>
+</TR>\n";
+               $SW = 3 - $SW;
+       }
+       // Add footer
+       $OUT .= LOAD_TEMPLATE("guest_rallye_expired_footer", true);
+
+       // And finnally return the output
+       return $OUT;
+}
+//
+function RALLYE_DELETE_EXPIRED_RALLYES()
+{
+       global $DATA, $CONFIG;
+       // Check for expired rallyes
+       $EXPIRE = time() - ONE_DAY * 3; // The hard-coded value...
+       $result_rallye = SQL_QUERY_ESC("SELECT id, title, start_time, end_time FROM "._MYSQL_PREFIX."_rallye_data WHERE end_time <= %s AND expired='Y'",
+        array($EXPIRE), __FILE__, __LINE__);
+
+       if (SQL_NUMROWS($result_rallye) > 0)
+       {
+               // Expire found rallyes and notify admin
+               while(list($id, $title, $start, $end) = SQL_FETCHROW($result_rallye))
+               {
+                       // Prepare data for mail template
+                       $DATA['title']  = $title;
+                       $DATA['start']  = MAKE_DATETIME($start, "1");
+                       $DATA['end']    = MAKE_DATETIME($end  , "1");
+                       $DATA['now_t']  = MAKE_DATETIME(time(), "1");
+
+                       // Send mail to admin
+                       if (GET_EXT_VERSION("admins") < "0.4.1")
+                       {
+                               // Use old method to send out
+                               $msg = LOAD_EMAIL_TEMPLATE("admin_rallye_purged", "", 0);
+                               SEND_ADMIN_EMAILS(RALLYE_ADMIN_PURGED.": ".$title, $msg);
+                       }
+                        else
+                       {
+                               // Use new system to send out
+                               SEND_ADMIN_EMAILS_PRO(RALLYE_ADMIN_PURGED.": ".$title, "admin_rallye_purged", "", 0);
+                       }
+
+                       // Purge whole rallye
+                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_data WHERE id=%d LIMIT 1",
+                        array(bigintval($id)), __FILE__, __LINE__);
+                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_prices WHERE rallye_id=%d LIMIT 1",
+                        array(bigintval($id)), __FILE__, __LINE__);
+                       $result_purge = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_rallye_users WHERE rallye_id=%d LIMIT 1",
+                        array(bigintval($id)), __FILE__, __LINE__);
+               }
+
+               // Add task
+               $result_task = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_task_system (status, task_type, subject, text, task_created)
+VALUES ('NEW', 'RALLYE_PURGED', '".RALLYE_ADMIN_PURGED.": %s', '".RALLYE_ADMIN_PURGED_TEXT."', UNIX_TIMESTAMP())",
+ array($title), __FILE__, __LINE__);
+       }
+
+       // Free memory
+       SQL_FREERESULT($result_rallye);
+}
+//
+function RALLYE_TEMPLATE_SELECTION($name="template", $default="")
+{
+       // Check templates directory
+       $OUT = ""; $ral = array();
+       $BASE = PATH."templates/".GET_LANGUAGE()."/html";
+       $dir = opendir($BASE);
+       while ($read = readdir($dir))
+       {
+               // If it is no dir (so a file)
+               if (!is_dir($BASE.$read))
+               {
+                       // Accept only templates matching with rallye_????.tpl.xx
+                       if (eregi("^rallye_.*\.tpl", $read))
+                       {
+                               $read = substr($read, 7, strpos($read, ".") - 7);
+                               // Accept only template names between 1 and 255 chars length
+                               if ((strlen($read) < 256) && (!empty($read))) $ral[] = $read;
+                       }
+               }
+       }
+       closedir($dir);
+
+       // Do we have found templates which we can link with the new rallye?
+       if (!empty($ral[0]))
+       {
+               // Generate selection box for all found templates
+               $OUT  = "<SELECT name=\"".$name."\" size=\"1\" class=\"admin_select\">
+  <OPTION value=\"\">".SELECT_NONE."</OPTION>\n";
+               foreach ($ral as $rallye)
+               {
+                    $OUT .= "  <OPTION value=\"".$rallye."\"";
+                       if ($default == $rallye) $OUT .= " selected default";
+                       $OUT .= ">".$rallye."</OPTION>\n";
+               }
+               $OUT .= "</SELECT>\n";
+       }
+        else
+       {
+               // No rallye templates found
+               $OUT = RALLYE_NO_TEMPLATES_FOUND;
+       }
+
+       // Return selection
+       return $OUT;
+}
+//
+function RALLYE_GET_REFCOUNT($uid, $old=0)
+{
+       global $REF_SYSTEM, $REF_DEPTHS, $CONFIG;
+       // Check current refs
+       if (GET_EXT_VERSION("cache") >= "0.1.2")
+       {
+               // Get refs from cache
+               $cnt = 0;
+               foreach ($REF_SYSTEM['userid'] as $id=>$u_id)
+               {
+                       if (($u_id == $uid) && ($REF_SYSTEM['level'][$id] == 0))
+                       {
+                               foreach ($REF_DEPTHS['level'] as $level)
+                               {
+                                       if (($level == $REF_SYSTEM['level'][$id]) && ($level == 0))
+                                       {
+                                               // Level does exist so abort here
+                                               $cnt = $REF_SYSTEM['counter'][$id];
+                                               //* DEBUG: */ echo "*".$uid."/".$cnt."*<BR>";
+                                               break;
+                                       }
+                                        elseif ($level > 0)
+                                       {
+                                               // Not interesting here...
+                                               break;
+                                       }
+                               }
+                               // Abort also here!
+                               if ($cnt > 0) break;
+                       }
+               }
+               //* DEBUG: */ echo "<PRE>";
+               //* DEBUG: */ print_r($REF_SYSTEM);
+               //* DEBUG: */ echo "</PRE>";
+               //* DEBUG: */ die();
+
+               if ($cnt > 0)
+               {
+                       // Count cache hits
+                       $CONFIG['cache_hits']++;
+
+                       // Remove old refs
+                       //* DEBUG: */ echo "+".$cnt."/".$old."+<BR>";
+                       $cnt -= $old;
+               }
+       }
+        else
+       {
+               // Load current refs from database
+               $result_ref = SQL_QUERY_ESC("SELECT DISTINCT SUM(s.counter) AS cnt
+FROM "._MYSQL_PREFIX."_refsystem AS s
+LEFT JOIN "._MYSQL_PREFIX."_refdepths AS d
+ON s.level=d.level
+WHERE s.userid=%d AND s.level=0", array(bigintval($uid)), __FILE__, __LINE__);
+               list($cnt) = SQL_FETCHROW($result_ref);
+               SQL_FREERESULT($result_ref);
+               if (empty($cnt))
+               {
+                       $cnt = "0";
+               }
+                else
+               {
+                       $cnt -= $old;
+               }
+       }
+
+       // Return count
+       //* DEBUG: */ echo "*".$uid."/".$old."/".$cnt."*<BR>";
+       return $cnt;
+}
+//
+?>