inc/libs/rallye_functions.php

   1 <?php
   2 /************************************************************************
   3  * MXChange v0.2.1                                    Start: 08/22/2004 *
   4  * ===============                              Last change: 08/24/2004 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : rallye_functions.php                             *
   8  * -------------------------------------------------------------------- *
   9  * Short description : Special functions for rallye extension           *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Spezielle Funktion fuer rallye-Erweiterung       *
  12  * -------------------------------------------------------------------- *
  13  * $Revision::                                                        $ *
  14  * $Date::                                                            $ *
  15  * $Tag:: 0.2.1-FINAL                                                 $ *
  16  * $Author::                                                          $ *
  17  * Needs to be in all Files and every File needs "svn propset           *
  18  * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
  19  * -------------------------------------------------------------------- *
  20  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  21  * For more information visit: http://www.mxchange.org                  *
  22  *                                                                      *
  23  * This program is free software; you can redistribute it and/or modify *
  24  * it under the terms of the GNU General Public License as published by *
  25  * the Free Software Foundation; either version 2 of the License, or    *
  26  * (at your option) any later version.                                  *
  27  *                                                                      *
  28  * This program is distributed in the hope that it will be useful,      *
  29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  31  * GNU General Public License for more details.                         *
  32  *                                                                      *
  33  * You should have received a copy of the GNU General Public License    *
  34  * along with this program; if not, write to the Free Software          *
  35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  36  * MA  02110-1301  USA                                                  *
  37  ************************************************************************/
  38
  39 // Some security stuff...
  40 if (!defined('__SECURITY')) {
  41         die();
  42 } // END - if
  43
  44 // Auto-start referal rallyes
  45 function autostartReferalRallyes ($result) {
  46         // Global data array for loadEmailTemplate()
  47         global $DATA;
  48         $DATA = array();
  49
  50         // Load all rallyes (usally we have only one rallye active per time!
  51         list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);
  52
  53         // Free result
  54         SQL_FREERESULT($result);
  55
  56         // Set notified to Y
  57         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_rallye_data` SET `notified`='Y' WHERE `id`=%s LIMIT 1",
  58                 array(bigintval($id)), __FUNCTION__, __LINE__);
  59
  60         // Transfer all neccessary data to the $DATA array
  61         $DATA['userid_cnt'] = countSumTotalData('CONFIRMED','user_data','userid','status',true);
  62         $DATA['start']      = generateDateTime($start, 2);
  63         $DATA['end']        = generateDateTime($end  , 2);
  64         $DATA['now_t']      = generateDateTime(time(), 2);
  65         $DATA['title']      = $title;
  66         $DATA['id']         = $id;  // id for the rallye details link
  67
  68         // Determine min_users and min_prices
  69         $DATA['min_users']  = determineReferalRallyeMinimumUsers($min_users);
  70         $DATA['min_prices'] = determineReferalRallyeMinimumPrices($min_prices);
  71
  72         // Load prices
  73         $prices = addReferalRallyePrices($id);
  74
  75         // Query all users
  76         $result_user = SQL_QUERY("SELECT `userid` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `status`='CONFIRMED' ORDER BY `userid` ASC", __FUNCTION__, __LINE__);
  77
  78         // Let's begin with the userids...
  79         while ($content = SQL_FETCHARRAY($result_user)) {
  80                 $un = false;
  81
  82                 // Get refs by userid
  83                 $cnt = getReferalRallyeRefsCount($content['userid']);
  84                 if (empty($cnt)) $cnt = '0'; // Added prevent some unknown troubles... :-?
  85
  86                 // Check if line is already included...
  87                 $result_ref = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_rallye_users` WHERE rallye_id=%s AND `userid`=%s LIMIT 1",
  88                         array(bigintval($id), bigintval($content['userid'])), __FUNCTION__, __LINE__);
  89                 if (SQL_NUMROWS($result_ref) == '0') {
  90                         // Free memory
  91                         SQL_FREERESULT($result_ref);
  92
  93                         // Add userid and his ref count to table
  94                         $result_ref = SQL_QUERY_ESC("SELECT
  95         SUM(p.points) AS points
  96 FROM
  97         `{?_MYSQL_PREFIX?}_user_points` AS p
  98 LEFT JOIN
  99         `{?_MYSQL_PREFIX?}_user_data` AS d
 100 ON
 101         p.userid=d.userid
 102 WHERE
 103         d.`status`='CONFIRMED' AND
 104         d.max_mails > 0 AND
 105         d.mails_confirmed >= {?ref_payout?} AND
 106         p.ref_depth=1 AND
 107         p.points > 0
 108         AND d.userid=%s",
 109                                 array(bigintval($content['userid'])), __FUNCTION__, __LINE__);
 110
 111                         // Get points
 112                         list($cpoints) = SQL_FETCHROW($result_ref);
 113
 114                         // Free result
 115                         SQL_FREERESULT($result_ref);
 116
 117                         if (empty($cpoints)) $cpoints = '0.00000';
 118
 119                         // Add info line
 120                         SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_rallye_users` (rallye_id, userid, refs, curr_points)
 121 VALUES ('%s','%s','%s','%s')",
 122                         array(bigintval($id), bigintval($content['userid']), bigintval($cnt), $cpoints), __FUNCTION__, __LINE__);
 123                         $un = true;
 124                 } // END - if
 125
 126                 // Ignored but for the template required refs (made before start of rallye)
 127                 $DATA['refs']  = $cnt;
 128
 129                 // Shall I notify this member?
 130                 if (($notify == 'Y') && ($un)) {
 131                         // Load email template and send it to the user
 132                         $message = loadEmailTemplate('member_rallye_notify', array('prices' => $prices), $content['userid']);
 133                         sendEmail($content['userid'], sprintf(getMessage('RALLYE_MEMBER_NOTIFY'), $title), $message);
 134                 } // END - if
 135         } // END - while
 136
 137         // Choose the right admin template
 138         $templ = 'admin_rallye_no_notify';
 139         if ($notify == 'Y') $templ = 'admin_rallye_notify';
 140
 141         // Send email to admin
 142         sendAdminNotification(sprintf(getMessage('RALLYE_ADMIN_NOTIFY'), $title), $templ, $prices, 0);
 143
 144         // Free memory
 145         SQL_FREERESULT($result_user);
 146 }
 147
 148 //
 149 function addReferalRallyePrices ($rallye, $mode='email') {
 150         // Output mode
 151         switch($mode) {
 152                 case 'email': $mode = "\n";     break;
 153                 case 'html' : $mode = "<br />\n"; break;
 154         } // END - switch
 155
 156         // Load prices
 157         $result_prices = SQL_QUERY("SELECT
 158         `price_level`, `points`, `info`
 159 FROM
 160         `{?_MYSQL_PREFIX?}_rallye_prices`
 161 WHERE
 162         `rallye_id`='".$rallye."'
 163 ORDER BY
 164         `price_level` ASC",
 165                 __FUNCTION__, __LINE__);
 166         if (SQL_NUMROWS($result_prices) > 0) {
 167                 // Load prices
 168                 if ($mode == "\n") $prices = "{--RALLYE_MEMBER_PRICES_ADDED--}:".$mode."------------------------------".$mode;
 169                 $prices = '';
 170                 while ($content = SQL_FETCHARRAY($result_prices)) {
 171                         $prices .= $content['price_level'].getMessage('RALLYE_PRICE').": ";
 172                         if (!empty($content['info'])) {
 173                                 $prices .= $content['info'];
 174                         } else {
 175                                 $prices .= $content['points'] . ' {?POINTS?}';
 176                         }
 177                         $prices .= '' . $mode;
 178                 } // END - if
 179
 180                 // Free memory
 181                 SQL_FREERESULT($result_prices);
 182         } else {
 183                 // No prices???
 184                 $prices = sprintf(getMessage('RALLYE_MEMBER_NO_PRICES'), $mode);
 185         }
 186
 187         // Add last line for email mode
 188         if ($mode == "\n") $prices .= '------------------------------';
 189
 190         // Return price list
 191         return $prices;
 192 }
 193
 194 //
 195 function addReferalRallyeTopUsers ($rallye, $default=0) {
 196         // First check how many prices are set
 197         $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_rallye_prices` WHERE rallye_id=%s ORDER BY price_level",
 198                 array(bigintval($rallye)), __FUNCTION__, __LINE__);
 199         $prices = SQL_NUMROWS($result);
 200         SQL_FREERESULT($result);
 201
 202         // And load only limited users
 203         $result = SQL_QUERY_ESC("SELECT
 204         u.userid, u.refs, u.curr_points FROM `{?_MYSQL_PREFIX?}_rallye_users` AS u
 205 LEFT JOIN
 206         `{?_MYSQL_PREFIX?}_refsystem` AS r
 207 ON
 208         u.userid=r.userid
 209 WHERE
 210         u.rallye_id=%s AND r.counter > 0
 211 ORDER BY
 212         u.refs DESC",
 213                 array(bigintval($rallye)), __FUNCTION__, __LINE__);
 214
 215         // Load users
 216         $DATA = array(
 217                 'userid'      => array(),
 218                 'ref'      => array(),
 219                 'cpoints'  => array()
 220         );
 221
 222         while ($content = SQL_FETCHARRAY($result)) {
 223                 // Get current refs
 224                 $cnt = getReferalRallyeRefsCount($content['userid'], $content['refs']);
 225
 226                 // Points of ref's
 227                 $result_ref = SQL_QUERY_ESC("SELECT
 228         p.points
 229 FROM
 230         `{?_MYSQL_PREFIX?}_user_points` AS p
 231 LEFT JOIN
 232         `{?_MYSQL_PREFIX?}_user_data` AS d
 233 ON
 234         p.userid=d.userid
 235 WHERE
 236         d.userid=%s AND
 237         d.`status`='CONFIRMED' AND
 238         p.ref_depth=1 AND
 239         d.max_mails > 0 AND
 240         d.mails_confirmed >= %s
 241 LIMIT 1",
 242                         array(bigintval($content['userid']), getConfig('ref_payout')), __FUNCTION__, __LINE__);
 243
 244                 // Get points
 245                 list($refpoints) = SQL_FETCHROW($result_ref);
 246
 247                 // Free result
 248                 SQL_FREERESULT($result_ref);
 249
 250                 if (empty($refpoints)) $refpoints = '0';
 251
 252                 // Init userid for list
 253                 $_userid = '---';
 254
 255                 // List only users with at least one ref!
 256                 //* DEBUG: */ print("*".$cnt.'/'.$content['userid'].'/'.$content['curr_points'].'/'.$refpoints."*<br />");
 257                 if (($cnt > 0) && ($refpoints > $content['curr_points'])) { $_userid = $content['userid']; } else { $cnt = ''; }
 258
 259                 // Save values to array
 260                 $DATA['userid'][]     = $_userid;
 261                 $DATA['ref'][]     = $cnt;
 262                 $DATA['cpoints'][] = $content['curr_points'];
 263         } // END - while
 264
 265         // Free memory
 266         SQL_FREERESULT($result);
 267
 268         // Sort whole array
 269         array_pk_sort($DATA, array('ref', 'cpoints'), 0, 1, true);
 270
 271         // Generate table
 272         $OUT = loadTemplate('guest_rallye_header', true);
 273         $SW = 2;
 274         for ($idx = '0'; $idx < $prices; $idx++) {
 275                 if (empty($DATA['userid'][$idx])) $DATA['userid'][$idx] = '---';
 276                 if (empty($DATA['ref'][$idx])) $DATA['ref'][$idx] = '---';
 277                 // Add row
 278                 $OUT .= "<tr>
 279   <td class=\"switch_sw".$SW." bottom2\">&nbsp;&nbsp;".($idx+1).".</td>
 280   <td align=\"center\" class=\"switch_sw".$SW." bottom2\">";
 281                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "<strong>";
 282                 $OUT .= $DATA['userid'][$idx];
 283                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "</strong>";
 284                 $OUT .= "</td>
 285   <td align=\"center\" class=\"switch_sw".$SW." bottom2\">";
 286                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "<strong>";
 287                 $OUT .= $DATA['ref'][$idx];
 288                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "</strong>";
 289                 $OUT .= "</td>
 290 </tr>\n";
 291                 $SW = 3 - $SW;
 292         } // END - for
 293
 294         // Add footer
 295         $OUT .= loadTemplate('guest_rallye_footer', true);
 296
 297         // And finnally return the output
 298         return $OUT;
 299 }
 300
 301 // Run this function only when a new member has confirmed his email address!
 302 function addUserToReferalRallye ($userid, $content = array()) {
 303         $add = '';
 304
 305         // Updated extension?
 306         if (getExtensionVersion('rallye') >= '0.2.0') {
 307                 $add .= ", `min_users`, `min_prices`";
 308         } // END - if
 309
 310         // Check for an auto-add rallye
 311         $result = SQL_QUERY("SELECT
 312         `id`, `title`, `start_time`, `end_time`, `send_notify`".$add."
 313 FROM
 314         `{?_MYSQL_PREFIX?}_rallye_data`
 315 WHERE
 316         `is_active`='Y' AND
 317         `notified`='Y' AND
 318         `auto_add_new_user`='Y' AND
 319         `expired`='N'
 320 LIMIT 1", __FUNCTION__, __LINE__);
 321         if (SQL_NUMROWS($result) == 1) {
 322                 // Init variables
 323                 $min_users = '0'; $min_prices = '0';
 324
 325                 // Load data
 326                 if (getExtensionVersion('rallye') >= '0.2.0') {
 327                         list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);
 328                 } else {
 329                         list($id, $title, $start, $end, $notify) = SQL_FETCHROW($result);
 330                 }
 331
 332                 // Free result
 333                 SQL_FREERESULT($result);
 334
 335                 if ($notify == 'Y') {
 336                         // Transfer all neccessary data to the global $content array
 337                         $content['start'] = generateDateTime($start, 2);
 338                         $content['end']   = generateDateTime($end  , 2);
 339                         $content['now_t'] = generateDateTime(time(), 2);
 340                         $content['title'] = $title;
 341                         $content['id']    = $id;  // id for the rallye details link
 342                         $content['ref']   = '0';
 343                         $content['refs']  = countSumTotalData($userid, 'user_data', 'userid', 'refid', true);
 344
 345                         // Load prices
 346                         $content['prices'] = addReferalRallyePrices($id);
 347
 348                         // Determine min_users/prices tring
 349                         $content['min_users']  = determineReferalRallyeMinimumUsers($min_users);
 350                         $content['min_prices'] = determineReferalRallyeMinimumPrices($min_prices);
 351
 352                         // Send notification to member
 353                         $message = loadEmailTemplate('member_rallye_notify', $content, $userid);
 354                         sendEmail($userid, sprintf(getMessage('RALLYE_MEMBER_NOTIFY'), $title), $message);
 355                 } // END - if
 356
 357                 // Check if line is already included...
 358                 $result = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_rallye_users` WHERE `rallye_id`=%s AND `userid`=%s LIMIT 1",
 359                         array(
 360                                 bigintval($id),
 361                                 bigintval($userid)
 362                         ), __FUNCTION__, __LINE__);
 363
 364                 // Is this user added?
 365                 if (SQL_NUMROWS($result) < 1) {
 366                         // Add userid and his ref count to table
 367                         SQL_QUERY_ESC("INSERT INTO `{?_MYSQL_PREFIX?}_rallye_users` (`rallye_id`, `userid`, `refs`)
 368 VALUES ('%s','%s',0)",
 369                                 array(
 370                                         bigintval($id),
 371                                         bigintval($userid)
 372                                 ), __FUNCTION__, __LINE__);
 373                 } // END - if
 374
 375                 // Free memory
 376                 SQL_FREERESULT($result);
 377         } // END - if
 378 }
 379
 380 //
 381 function markReferalRallyesAsExpired ($result) {
 382         global $DATA;
 383
 384         // Load rallye data
 385         list($id, $title, $start, $end, $notify, $min_users, $min_prices) = SQL_FETCHROW($result);
 386
 387         // Free result
 388         SQL_FREERESULT($result);
 389
 390         // Load users array (!) with assigned prices
 391         $prices = getArrayFromReferalRallyeUsers($id);
 392
 393         // Init array
 394         $DATA = array(); $cnt = '0';
 395         $users = array();
 396         $DATA['title']  = $title;
 397         $DATA['start']  = generateDateTime($start, 1);
 398         $DATA['end']    = generateDateTime($end  , 1);
 399         $DATA['now_t']  = generateDateTime(time(), 1);
 400
 401         // Just count...
 402         $total = '0';
 403         foreach($prices['userid'] as $key => $userid) {
 404                 // Check status
 405                 //   active = 1: account is still confirmed
 406                 //   active = '0': account is deleted or locked
 407                 $result = SQL_QUERY_ESC("SELECT
 408         COUNT(`userid`) AS active
 409 FROM
 410         `{?_MYSQL_PREFIX?}_user_data`
 411 WHERE
 412         `userid`=%s AND `status`='CONFIRMED'
 413 LIMIT 1",
 414                         array(bigintval($userid)), __FUNCTION__, __LINE__);
 415                 list($active) = SQL_FETCHROW($result);
 416                 SQL_FREERESULT($result);
 417
 418                 $prices['active'][$key] = $active;
 419
 420                 // Allow valid and active users with at least one ref to get points
 421                 if (($userid > 0) && ($prices['ref'][$key] > 0) && ($active == 1) && ($prices['cpoints'][$key] > 0)) {
 422                         $total++;
 423                 } // END - if
 424         } // END - foreach
 425
 426         if (($total < $min_prices) || ($total == '0')) {
 427                 // Do not end this rallye!
 428                 unset($DATA);
 429                 return;
 430         } // END - if
 431
 432         // Expire rallye
 433         SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_rallye_data` SET `expired`='Y' WHERE `id`=%s LIMIT 1",
 434         array(bigintval($id)), __FUNCTION__, __LINE__);
 435
 436         // Run array through (by userid is the most important 2nd-level-array)
 437         foreach($prices['userid'] as $key => $userid) {
 438                 // Allow valid and active users with at least one ref to get points
 439                 if (($userid > 0) && ($prices['ref'][$key] > 0) && ($prices['active'][$key] == 1) && ($prices['cpoints'][$key] > 0)) {
 440                         // Transfer data to array for the mail template
 441                         $DATA['level']  = $prices['level'][$key];
 442                         $DATA['points'] = $prices['points'][$key];
 443                         $DATA['info']   = $prices['info'][$key];
 444                         $DATA['ref']    = $prices['ref'][$key];
 445
 446                         // Default is other
 447                         $winnerLevel = 'other';
 448
 449                         // Determine winner level
 450                         if ($DATA['level'] == 1) {
 451                                 // The winner!
 452                                 $winnerLevel = '_gold';
 453                         } elseif ($DATA['level'] == 2) {
 454                                 // The vice winner!
 455                                 $winnerLevel = '_silver';
 456                         } elseif ($DATA['level'] == 3) {
 457                                 // The bronce winner
 458                                 $winnerLevel = '_bronce';
 459                         }
 460
 461                         if ($DATA['points'] > 0) {
 462                                 // Add points directly to user's account
 463                                 addPointsDirectly('rallye_winner' . $winnerLevel, $userid, $DATA['points']);
 464                         } // END - if
 465
 466                         if ($notify == 'Y') {
 467                                 // Prepare infos for the mail template
 468                                 if (!empty($DATA['info'])) {
 469                                         // Take direct infos
 470                                         $DATA['infos'] = $DATA['info'];
 471                                 } else {
 472                                         // Take points
 473                                         $DATA['infos'] = $DATA['points'] . ' {?POINTS?}';
 474                                 }
 475
 476                                 // Add suffix to template name
 477                                 $template = 'member_rallye_expired' . $winnerLevel;
 478
 479                                 // Load template
 480                                 $message = loadEmailTemplate($template, $DATA, $userid);
 481                                 sendEmail($userid, sprintf(getMessage('RALLYE_MEMBER_EXPIRED_SUBJ'), $DATA['level']), $message);
 482                         } // END - if
 483
 484                         // Count userid
 485                         $cnt++;
 486                         $users['userid'][$userid] = $userid;
 487                         $users['poi'][$userid] = $DATA['infos'];
 488                 } // END - if
 489         } // END - foreach
 490
 491         // Select template depending on notfication is switch on / off
 492         if ($notify == 'Y') {
 493                 $templ = "admin_rallye_expired";
 494         } elseif (is_array($users['userid'])) {
 495                 $templ = "admin_rallye_expired_no";
 496                 $cnt = getReferalRallyeUserDataFromArray($users);
 497         }
 498
 499         // Send mail to admin
 500         sendAdminNotification(sprintf(getMessage('RALLYE_ADMIN_EXPIRED_SUBJ'), $title), $templ, $cnt, 0);
 501
 502         // Add task
 503         createNewTask('{--RALLYE_ADMIN_EXPIRED--}: ' . $title, '{--RALLYE_ADMIN_EXPIRED_TEXT--}', 'RALLYE_EXPIRED');
 504 }
 505
 506 //
 507 function getReferalRallyeUserDataFromArray ($userIds) {
 508         // Implode user ids
 509         $userid_string = implode(',', $userIds['userid']);
 510
 511         // Init result string
 512         $ret = '';
 513
 514         // Load users
 515         $result = SQL_QUERY_ESC("SELECT `userid`, `gender`, `surname`, `family`, `email` FROM `{?_MYSQL_PREFIX?}_user_data` WHERE `userid` IN(%s) AND `status`='CONFIRMED' ORDER BY `userid` ASC LIMIT %s",
 516                 array($userid_string, count($userIds)), __FUNCTION__, __LINE__);
 517         while ($content = SQL_FETCHARRAY($result)) {
 518                 // Construct the message masked and add it
 519                 $ret .= sprintf("%s %s %s (%s) - %s\n",
 520                         translateGender($content['gender']),
 521                         $content['surname'],
 522                         $content['family'],
 523                         $content['email'],
 524                         $userIds['poi'][$content['userid']]
 525                 );
 526         } // END - while
 527
 528         // Return result
 529         return substr($ret, 0, -1);
 530 }
 531
 532 //
 533 function getArrayFromReferalRallyePrices ($rallye) {
 534         // Init multi array
 535         $prices = array(
 536                 'level'  => array(),
 537                 'points' => array(),
 538                 'info'   => array()
 539         );
 540
 541         // Load prices
 542         $result = SQL_QUERY_ESC("SELECT price_level, points, info FROM `{?_MYSQL_PREFIX?}_rallye_prices` WHERE rallye_id=%s ORDER BY price_level",
 543         array(bigintval($rallye)), __FUNCTION__, __LINE__);
 544
 545         // Transfer elements
 546         while ($content = SQL_FETCHARRAY($result)) {
 547                 $prices['level'][]  = $content['price_level'];
 548                 $prices['points'][] = $content['points'];
 549                 $prices['info'][]   = $content['info'];
 550         } // END - while
 551
 552         // Free memory
 553         SQL_FREERESULT($result);
 554
 555         // Return array
 556         return $prices;
 557 }
 558
 559 //
 560 function getArrayFromReferalRallyeUsers ($rallye) {
 561         // Fix zero points to 0.00000
 562         if (getConfig('ref_payout') == '0') setConfigEntry('ref_payout', '0.00000');
 563
 564         // Init multi array
 565         $users = array(
 566                 'userid'     => array(),
 567                 'ref'     => array(),
 568                 'cpoints' => array(),
 569         );
 570
 571         // Load users                          userid    old   points earned
 572         $result_user = SQL_QUERY_ESC("SELECT `userid`, `refs`, `curr_points` FROM `{?_MYSQL_PREFIX?}_rallye_users` WHERE `rallye_id`=%s ORDER BY `userid` ASC",
 573                 array(bigintval($rallye)), __FUNCTION__, __LINE__);
 574         while ($content = SQL_FETCHARRAY($result_user)) {
 575                 // Load current ref count
 576                 $cnt = getReferalRallyeRefsCount($content['userid'], $content['refs']);
 577
 578                 // Points of ref's
 579                 $result_ref = SQL_QUERY_ESC("SELECT
 580         SUM(p.points) AS points
 581 FROM
 582         `{?_MYSQL_PREFIX?}_user_points` AS p
 583 LEFT JOIN
 584         `{?_MYSQL_PREFIX?}_user_data` AS d
 585 ON
 586         p.userid=d.userid
 587 WHERE
 588         d.`status`='CONFIRMED' AND
 589         d.max_mails > 0 AND
 590         d.mails_confirmed >= {?ref_payout?} AND
 591         p.ref_depth=1 AND
 592         p.points > 0 AND
 593         d.userid=%s
 594 LIMIT 1",
 595                         array(bigintval($content['userid'])), __FUNCTION__, __LINE__);
 596
 597                 // Get points
 598                 list($refpoints) = SQL_FETCHROW($result_ref);
 599
 600                 // Free result
 601                 SQL_FREERESULT($result_ref);
 602
 603                 // Fix empty refpoints
 604                 if (empty($refpoints)) $refpoints = '0';
 605
 606                 // Store calculated new refs to array
 607                 $users['userid'][]     = $content['userid'];
 608                 $users['ref'][]     = abs($cnt - $content['refs']);
 609                 $users['cpoints'][] = $refpoints - $content['curr_points'];
 610         } // END - while
 611
 612         // Free memory
 613         SQL_FREERESULT($result_user);
 614
 615         // Sort array for refs (descending)
 616         array_pk_sort($users, array("ref", "cpoints"), 0, 1, true);
 617
 618         // Load prices array (!)
 619         $prices = getArrayFromReferalRallyePrices($rallye);
 620
 621         // Merge users into prices
 622         foreach ($prices['level'] as $k => $level) {
 623                 // We only need to check one element in $users, see above while() block
 624                 if (isset($users['userid'][$k])) {
 625                         $prices['userid'][$k]  = $users['userid'][$k];
 626                         if (empty($prices['userid'][$k])) $prices['userid'][$k]  = '---';
 627                         $prices['ref'][$k] = $users['ref'][$k];
 628                         if (empty($prices['ref'][$k])) $prices['ref'][$k] = '---';
 629                         $prices['cpoints'][$k] = $users['cpoints'][$k];
 630                 } // END - if
 631         } // END - foreach
 632
 633         // Return completed array
 634         return $prices;
 635 }
 636
 637 //
 638 function addReferalRallyeWinners ($rallye, $default=0) {
 639         // First check how many prices are set
 640         $result_prices = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_rallye_prices` WHERE `rallye_id`=%s ORDER BY `price_level` ASC",
 641                 array(bigintval($rallye)), __FUNCTION__, __LINE__);
 642         $prices = SQL_NUMROWS($result_prices);
 643         SQL_FREERESULT($result_prices);
 644
 645         // Load data
 646         $DATA = getArrayFromReferalRallyeUsers($rallye);
 647
 648         // Generate table
 649         $OUT = loadTemplate('guest_rallye_expired_header', true);
 650         $SW = 2;
 651         for ($idx = '0'; $idx < $prices; $idx++) {
 652                 // Check status
 653                 //   active = 1: account is still confirmed
 654                 //   active = '0': account is deleted or locked
 655                 $active = countSumTotalData($DATA['userid'][$idx], 'user_data', 'userid', 'userid', true, " AND `status`='CONFIRMED'");
 656
 657                 if (empty($DATA['userid'][$idx])) $DATA['userid'][$idx] = '---';
 658                 if ((empty($DATA['ref'][$idx])) || ($DATA['ref'][$idx] == '0') || ($active == '0') || ("".round($DATA['cpoints'][$idx])."" == '0') || (empty($DATA['cpoints'][$idx]))) {
 659                         // Allow valid and active users with at least one ref to get points
 660                         $DATA['ref'][$idx]   = '---';
 661                         $DATA['userid'][$idx]   = '---';
 662                 } // END - if
 663
 664                 if (!empty($DATA['info'][$idx])) {
 665                         // Take direct infos
 666                         $DATA['infos'][$idx] = $DATA['info'][$idx];
 667                 } else {
 668                         // Take ppints
 669                         $DATA['infos'][$idx] = $DATA['points'][$idx] . ' {?POINTS?}';
 670                 }
 671
 672                 // Add row
 673                 $add = '';
 674                 $OUT .= "<tr>
 675   <td class=\"switch_sw".$SW." bottom2".$add."\">&nbsp;&nbsp;".($idx+1).".</td>
 676   <td align=\"center\" class=\"switch_sw".$SW." bottom2".$add."\">";
 677                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "<strong>";
 678                 $OUT .= $DATA['userid'][$idx];
 679                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "</strong>";
 680                 $OUT .= "</td>
 681   <td align=\"center\" class=\"switch_sw".$SW." bottom2".$add."\">";
 682                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "<strong>";
 683                 $OUT .= $DATA['ref'][$idx];
 684                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "</strong>";
 685                 $OUT .= "</td>
 686   <td align=\"center\" class=\"switch_sw".$SW." bottom2".$add."\">";
 687                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "<strong>";
 688                 $OUT .= $DATA['infos'][$idx];
 689                 if (($DATA['userid'][$idx] == $default) && ($default > 0)) $OUT .= "</strong>";
 690                 $OUT .= "</td>
 691 </tr>\n";
 692                 $SW = 3 - $SW;
 693         } // END - for
 694
 695         // Add footer
 696         $OUT .= loadTemplate('guest_rallye_expired_footer', true);
 697
 698         // And finnally return the output
 699         return $OUT;
 700 }
 701
 702 //
 703 function purgeExpiredReferalRallyes () {
 704         // Check for expired rallyes
 705         $EXPIRE = 3; // @TODO The hard-coded value...
 706         $result_rallye = SQL_QUERY_ESC("SELECT id, title, start_time, end_time
 707 FROM `{?_MYSQL_PREFIX?}_rallye_data`
 708 WHERE end_time <= (UNIX_TIMESTAMP() - {?ONE_DAY?} - %s) AND expired='Y'",
 709                 array($EXPIRE), __FUNCTION__, __LINE__);
 710
 711         if (SQL_NUMROWS($result_rallye) > 0) {
 712                 // Init SQLs
 713                 initSqls();
 714
 715                 // Expire found rallyes and notify admin
 716                 while ($content = SQL_FETCHARRAY($result_rallye)) {
 717                         // Prepare data for mail template
 718                         $content['start_time']  = generateDateTime($content['start_time'], 1);
 719                         $content['end_time']    = generateDateTime($content['end_time']  , 1);
 720                         $content['now_time']    = generateDateTime(time(), 1);
 721
 722                         // Send mail to admin
 723                         sendAdminNotification(sprintf(getMessage('RALLYE_ADMIN_PURGED_SUBJ'), $content['title']), 'admin_rallye_purged', $content, 0);
 724
 725                         // Purge whole rallye
 726                         addSql(SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_rallye_data` WHERE `id`=%s LIMIT 1",
 727                                 array(bigintval($content['id'])), __FUNCTION__, __LINE__, false));
 728                         addSql(SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_rallye_prices` WHERE rallye_id=%s LIMIT 1",
 729                                 array(bigintval($content['id'])), __FUNCTION__, __LINE__, false));
 730                         addSql(SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_rallye_users` WHERE rallye_id=%s LIMIT 1",
 731                                 array(bigintval($content['id'])), __FUNCTION__, __LINE__, false));
 732
 733                         // Add task
 734                         createNewTask('{--RALLYE_ADMIN_PURGED--}: ' . $content['title'], '{--RALLYE_ADMIN_PURGED_TEXT--}', 'RALLYE_PURGED');
 735                 } // END - while
 736
 737                 // Run all SQLs
 738                 runFilterChain('run_sqls');
 739         } // END - if
 740
 741         // Free memory
 742         SQL_FREERESULT($result_rallye);
 743 }
 744
 745 //
 746 function addReferalRallyeTemplateSelection ($name = 'template', $default = '') {
 747         // Init variables
 748         $OUT = '';
 749         $ral = array();
 750
 751         // Check templates directory
 752         $basePath = sprintf("templates/%s/html/rallye/", getLanguage());
 753
 754         // Read the directory
 755         $templates = getArrayFromDirectory($basePath, 'rallye_', false, true, array(), '.tpl');
 756
 757         // And walk through
 758         foreach ($templates as $read) {
 759                 // Cut prefix and extension away
 760                 $read = substr($read, 7, strpos($read, '.') - 7);
 761
 762                 // Accept only template names between 1 and 255 chars length
 763                 if ((strlen($read) < 256) && (!empty($read))) $ral[] = $read;
 764         } // END - while
 765
 766         // Do we have found templates which we can link with the new rallye?
 767         if (!empty($ral[0])) {
 768                 // Generate selection box for all found templates
 769                 // @TODO Rewrite this to our API function
 770                 $OUT  = "<select name=\"".$name."\" size=\"1\" class=\"admin_select\">
 771   <option value=\"\">{--SELECT_NONE--}</option>\n";
 772                 foreach ($ral as $rallye) {
 773                         $OUT .= "  <option value=\"".$rallye."\"";
 774                         if ($default == $rallye) $OUT .= ' selected="selected"';
 775                         $OUT .= ">".$rallye."</option>\n";
 776                 } // END - foreach
 777                 $OUT .= "</select>\n";
 778         } else {
 779                 // No rallye templates found
 780                 $OUT = getMessage('RALLYE_NO_TEMPLATES_FOUND');
 781         }
 782
 783         // Return selection
 784         return $OUT;
 785 }
 786
 787 //
 788 function getReferalRallyeRefsCount ($userid, $old = '0') {
 789         // Check current refs
 790         if (getExtensionVersion('cache') >= '0.1.2') {
 791                 // Get refs from cache
 792                 $cnt = '0';
 793                 foreach ($GLOBALS['cache_array']['refsystem']['userid'] as $id => $userid) {
 794                         // Do we have a ref for this user?
 795                         //* DEBUG: */ print("id={$id},userid={$userid},userid={$userid},old={$old},level={$GLOBALS['cache_array']['refsystem']['level'][$id]}<br />");
 796                         if (($userid == $userid) && ($GLOBALS['cache_array']['refsystem']['level'][$id] == 1)) {
 797                                 //* DEBUG: */ print("userid matches!<br />");
 798                                 foreach ($GLOBALS['cache_array']['refdepths']['level'] as $level) {
 799                                         if (($level == $GLOBALS['cache_array']['refsystem']['level'][$id]) && ($level == 1)) {
 800                                                 // Level does exist so abort here
 801                                                 $cnt = $GLOBALS['cache_array']['refsystem']['counter'][$id];
 802                                                 //* DEBUG: */ print("*".$userid.'/'.$cnt."*<br />");
 803                                                 break;
 804                                         } elseif ($level > 1) {
 805                                                 // Not interesting here...
 806                                                 break;
 807                                         }
 808                                 } // END - foreach
 809
 810                                 // Abort also here!
 811                                 if ($cnt > 0) break;
 812                         } // END - if
 813                 } // END - foreach
 814
 815                 //* DEBUG: */ print("<pre>");
 816                 //* DEBUG: */ print(print_r($GLOBALS['cache_array']['refsystem'], true));
 817                 //* DEBUG: */ print("</pre>");
 818                 //* DEBUG: */ shutdown();
 819
 820                 if ($cnt > 0) {
 821                         // Count cache hits
 822                         incrementStatsEntry('cache_hits');
 823
 824                         // Remove old refs
 825                         //* DEBUG: */ print('+'.$cnt.'/'.$old."+<br />");
 826                         $cnt -= $old;
 827                 } // END - if
 828         } else {
 829                 // Load current refs from database
 830                 $result_ref = SQL_QUERY_ESC("SELECT SUM(s.counter) AS cnt
 831 FROM `{?_MYSQL_PREFIX?}_refsystem` AS s
 832 LEFT JOIN `{?_MYSQL_PREFIX?}_refdepths` AS d
 833 ON s.level=d.level
 834 WHERE s.userid=%s AND s.level=1", array(bigintval($userid)), __FUNCTION__, __LINE__);
 835                 list($cnt) = SQL_FETCHROW($result_ref);
 836                 SQL_FREERESULT($result_ref);
 837                 if (empty($cnt)) {
 838                         $cnt = '0';
 839                 } else {
 840                         $cnt -= $old;
 841                 }
 842         }
 843
 844         // Return count
 845         //* DEBUG: */ print("*".$userid.'/'.$old.'/'.$cnt."*<br />");
 846         return $cnt;
 847 }
 848
 849 // Determines the right language string for min_users
 850 function determineReferalRallyeMinimumUsers ($min_users) {
 851         // Rallye ends without user limitation is the default
 852         $return = getMessage('RALLYE_END_NO_USER_LIMITATION');
 853
 854         if ($min_users > 0) {
 855                 // Rallye ends when X members are totally in your exchange
 856                 $return = sprintf(getMessage('RALLYE_END_USERS'), $min_users);
 857         } // END - if
 858
 859         // Return
 860         return $return;
 861 }
 862
 863 // Determines the right language string for min_prices
 864 function determineReferalRallyeMinimumPrices ($min_prices) {
 865         // Rallye ends without user limitation is the default
 866         $return = getMessage('RALLYE_END_NO_PRICE_LIMITATION');
 867
 868         if ($min_prices > 0) {
 869                 // Rallye ends when X members are totally in your exchange
 870                 $return = sprintf(getMessage('RALLYE_END_PRICES'), $min_prices);
 871         } // END - if
 872
 873         // Return
 874         return $return;
 875 }
 876
 877 // Filter for extra-autpurge
 878 function FILTER_RALLYE_EXTRA_AUTOPURGE () {
 879         // Check expired rallyes (hard-coded 3 days limit for displaying expired rallyes!)
 880         purgeExpiredReferalRallyes();
 881 }
 882
 883 // [EOF]
 884 ?>