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