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