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