More misc fixes and rewrites (sorry, lame description)
[mailer.git] / inc / libs / bonus_functions.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 11/10/2004 *
4  * ===============                              Last change: 03/18/2005 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : bonus_functions.php                              *
8  * -------------------------------------------------------------------- *
9  * Short description : Special functions for bonus extension            *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Spezielle Funktion fuer bonus-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 - 2008 by Roland Haeder                           *
21  * For more information visit: http://www.mxchange.org                  *
22  *                                                                      *
23  * This program is free software; you can redistribute it and/or modify *
24  * it under the terms of the GNU General Public License as published by *
25  * the Free Software Foundation; either version 2 of the License, or    *
26  * (at your option) any later version.                                  *
27  *                                                                      *
28  * This program is distributed in the hope that it will be useful,      *
29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
31  * GNU General Public License for more details.                         *
32  *                                                                      *
33  * You should have received a copy of the GNU General Public License    *
34  * along with this program; if not, write to the Free Software          *
35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
36  * MA  02110-1301  USA                                                  *
37  ************************************************************************/
38
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), '/inc') + 4) . '/security.php';
42         require($INC);
43 }
44
45 // This function must be run *BEFORE* a link is removed from table 'mxchange_user_links' !
46 function BONUS_ADD_TURBO_POINTS ($mid, $uid, $type) {
47         // Shall we add bonus points?
48         if (getConfig('bonus_active') != 'Y') return false;
49
50         // Init variables
51         $sql = ''; $bonys = 0; $mail = 0; $column = '';
52
53         // Select SQL command
54         switch ($type)
55         {
56                 case 'bonusid':
57                         $column = 'bonus_id';
58                         $bonus = $mid;
59                         break;
60
61                 case 'mailid' :
62                         $column = 'mail_id';
63                         $mail = $mid;
64                         break;
65
66                 default:
67                         DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Invalid type %s detected.", $type));
68                         break;
69         }
70
71         // Is a column name set?
72         if (empty($column)) {
73                 // No, then abort here
74                 return false;
75         } // END - if
76
77         // Check for entry
78         $rank = GET_TOTAL_DATA($uid, 'bonus_turbo', 'id', 'userid', true, sprintf(" AND `%s`=%s", $column, $mid)) + 1;
79
80         // Which rank?
81         if ($rank == 1) {
82                 // First rank!
83                 $points = getConfig('turbo_bonus');
84         } else {
85                 // Anything else so let's explode all entered rank points
86                 $test = explode(';', getConfig('turbo_rates'));
87                 if (!empty($test[$rank - 2])) {
88                         // Level found
89                         $points = $test[$rank - 2];
90                 } else {
91                         // Level not found!
92                         $points = '0.00000';
93                 }
94         }
95
96         // Add points to his account directly
97         SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET `turbo_bonus`=`turbo_bonus`+%s WHERE `userid`=%s LIMIT 1",
98                 array(bigintval($uid), $points), __FUNCTION__, __LINE__);
99
100         // Rember this whole data for displaying ranking list
101         SQL_QUERY_ESC("INSERT INTO `{!_MYSQL_PREFIX!}_bonus_turbo` (`userid`, `mail_id`, `bonus_id`, `level`, `points`, `timemark`) VALUES (%s, %s, %s, %s, %s, UNIX_TIMESTAMP())",
102                 array(
103                         bigintval($uid),
104                         bigintval($mail),
105                         bigintval($bonus),
106                         $rank,
107                         $points
108                 ), __FUNCTION__, __LINE__);
109
110         if ((GET_EXT_VERSION('bonus') >= '0.3.5') && (getConfig('bonus_mode') != "ADD") && ($points > 0)) BONUS_POINTS_HANDLER($points);
111 }
112 //
113 function BONUS_MAKE_RANK_ROWS ($data, $type, $uid) {
114         $self = false; $OUT = '';
115
116         // How many ranks do we have?
117         $ranks = count(explode(';', getConfig('turbo_rates'))) + 1;
118
119         // Load current user's data
120         $result = SQL_QUERY_ESC("SELECT `level`, `points`, `timemark` FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE `%s`=%s AND `userid`=%s LIMIT 1",
121                 array($type, $data, $uid), __FUNCTION__, __LINE__);
122         if (SQL_NUMROWS($result) == 1) {
123                 // Load data
124                 list($rank, $points, $mark) = SQL_FETCHROW($result);
125
126                 // Remember all values for later use
127                 $self  = true; $points = translateComma($points);
128
129                 // Transfer data to template
130                 define('__YR_LEVEL' , $rank);
131                 define('__YR_POINTS', $points);
132                 define('__YR_TMARK' , generateDateTime($mark, '1'));
133
134                 // Load template
135                 define('__YOUR_RANKING_LINE', LOAD_TEMPLATE("show_bonus_yr", true));
136         } // END - if
137
138         // Load rankings
139         $result = SQL_QUERY_ESC("SELECT `id` FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE %s=%s ORDER BY level LIMIT %s",
140         array($type, $data, getConfig('bonus_lines')), __FUNCTION__, __LINE__);
141         if (SQL_NUMROWS($result) > 0) {
142                 // Start generating the ranking list
143                 $max = SQL_NUMROWS($result);
144
145                 $SW = 2;
146                 for ($rank = 1; $rank <= $max; $rank++) {
147                         // Load data
148                         $result_users = SQL_QUERY_ESC("SELECT userid, points, timemark FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE %s=%s AND level=%s LIMIT 1",
149                         array($type, $data, $rank), __FUNCTION__, __LINE__);
150
151                         // Nothing found by default
152                         $userid = '---'; $points = '---';
153
154                         // Are you one of them?
155                         if (SQL_NUMROWS($result_users) == 1) {
156                                 // Load data
157                                 list($userid, $points, $mark) = SQL_FETCHROW($result_users);
158
159                                 // Translate comma
160                                 $points = translateComma($points);
161                         } // END - if
162
163                         // Output row
164                         $OUT .= "<tr>
165   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\">&nbsp;".$rank.".</td>
166   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\" align=\"center\">".$userid."</td>
167   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\" align=\"center\">".$points."</td>
168 </tr>\n";
169                         $SW = 3 - $SW;
170                 } // END - for
171
172                 if (!$self) {
173                         // If current user was not found set constant
174                         define('__YOUR_RANKING_LINE', BONUS_RANK_YOU_ARE_NOT_FOUND);
175                 } // END - if
176         } else {
177                 // No entries found!
178                 $OUT = "<tr>
179   <td colspan=\"3\" align=\"center\" height=\"30\" class=\"bottom2\">
180     <div class=\"guest_failed\">".sprintf(getMessage('BONUS_NO_RANKS'), $data)."</div>
181   </td>
182 </tr>\n";
183                 define('__YOUR_RANKING_LINE', '');
184         }
185         return $OUT;
186 }
187 //
188 function BONUS_POINTS_HANDLER ($mode) {
189         // Shall we add bonus points?
190         if (getConfig('bonus_active') != 'Y') return;
191
192         // Switch to jackpot-mode when no UID is supplied but userid-mode is selected
193         if ((getConfig('bonus_mode') == 'UID') && (getConfig('bonus_uid') == '0')) {
194                 // Update database & config
195                 updateConfiguration('bonus_mode', 'JACKPOT');
196         } // END - if
197
198         if ($mode == 'login_bonus') {
199                 // Login bonus detected
200                 $points = getConfig('login_bonus');
201         } else {
202                 // Direct points supplied
203                 $points = $mode;
204         }
205
206         // Subtract points from...
207         switch (getConfig('bonus_mode'))
208         {
209                 case 'JACKPOT': // ... jackpot
210                         if ((SUB_JACKPOT($points) == -1) && (getConfig('bonus_uid') > 0)) {
211                                 // Check points amount first...
212                                 $total = GET_TOTAL_DATA(getConfig('bonus_uid'), 'user_points', 'points') - GET_TOTAL_DATA(getConfig('bonus_uid'), 'user_data', 'used_points');
213                                 if ($total >= $points) {
214                                         // Subtract points from userid's account
215                                         SUB_POINTS('bonus_payout_jackpot', getConfig('bonus_uid'), $points);
216                                 } // END - if
217                         } // END - if
218                         break;
219
220                 case 'UID': // ... userid's account
221                         // Check his amount first
222                         $total = GET_TOTAL_DATA(getConfig('bonus_uid'), 'user_points', 'points') - GET_TOTAL_DATA(getConfig('bonus_uid'), 'user_data', 'used_points');
223                         if ($total >= $points) {
224                                 // Subtract points from userid's account
225                                 SUB_POINTS('bonus_payout_uid', getConfig('bonus_uid'), $points);
226                         } else {
227                                 // Try to subtract from jackpot
228                                 $dummy = SUB_JACKPOT($points);
229                         }
230                         break;
231         }
232 }
233
234 //
235 function BONUS_PURGE_EXPIRED_TURBO_BONUS() {
236         // Remove entries
237         $result = SQL_QUERY("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE timemark < (UNIX_TIMESTAMP() - ".getConfig('bonus_timeout').")", __FUNCTION__, __LINE__);
238         if (SQL_AFFECTEDROWS() > 0) {
239                 // Send out email to admin
240                 sendAdminNotification(AUTOPURGE_ADMIN_TURBO_SUBJECT, 'admin_autopurge_turbo', SQL_AFFECTEDROWS(), '');
241         } // END - if
242 }
243
244 //
245 ?>