f97467bf1bc37c71e0cec5d5fecb1215045ec220
[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  *                                                                      *
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 // This function must be run *BEFORE* a link is removed from table 'mxchange_user_links' !
41 function BONUS_ADD_TURBO_POINTS ($mid, $uid, $type) {
42         // Shall we add bonus points?
43         if (getConfig('bonus_active') != "Y") return false;
44
45         // Init variables
46         $SQL = ""; $bonys = 0; $mail = 0; $column = "";
47
48         // Select SQL command
49         switch ($type)
50         {
51         case "bonusid":
52                 $column = "bonus_id";
53                 $bonus = $mid;
54                 break;
55
56         case "mailid" :
57                 $column = "mail_id";
58                 $mail = $mid;
59                 break;
60
61         default:
62                 DEBUG_LOG(__FUNCTION__, __LINE__, sprintf("Invalid type %s detected.", $type));
63                 break;
64         }
65
66         // Is a column name set?
67         if (empty($column)) {
68                 // No, then abort here
69                 return false;
70         } // END - if
71
72         // Check for entry
73         $result = SQL_QUERY_ESC("SELECT COUNT(id) AS cnt FROM  `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE userid=%s AND %s=%s LIMIT 1",
74                 array($uid, $column, $mid), __FILE__, __LINE__);
75
76         // Load clicks from table as current rank
77         list($rank) = SQL_FETCHROW($result);
78
79         // Add one line
80         $rank++;
81
82         // Free result
83         SQL_FREERESULT($result);
84
85         // Which rank?
86         if ($rank == 1) {
87                 // First rank!
88                 $points = getConfig('turbo_bonus');
89         } else {
90                 // Anything else so let's explode all entered rank points
91                 $test = explode(";", getConfig('turbo_rates'));
92                 if (!empty($test[$rank - 2])) {
93                         // Level found
94                         $points = $test[$rank - 2];
95                 } else {
96                         // Level not found!
97                         $points = "0.00000";
98                 }
99         }
100
101         // Add points to his account directly
102         SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET turbo_bonus=turbo_bonus+".$points." WHERE userid=%s LIMIT 1",
103                 array(bigintval($uid)), __FILE__, __LINE__);
104
105         // Rember this whole data for displaying ranking list
106         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())",
107                 array(bigintval($uid), bigintval($mail), bigintval($bonus), $rank, $points), __FILE__, __LINE__);
108
109         if ((GET_EXT_VERSION("bonus") >= "0.3.5") && (getConfig('bonus_mode') != "ADD") && ($points > 0)) BONUS_POINTS_HANDLER($points);
110 }
111 //
112 function BONUS_MAKE_RANK_ROWS ($data, $type, $uid) {
113         $self = false; $OUT = "";
114
115         // How many ranks do we have?
116         $ranks = sizeof(explode(";", getConfig('turbo_rates'))) + 1;
117
118         // Load current user's data
119         $result = SQL_QUERY_ESC("SELECT level, points, timemark FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE %s=%s AND userid=%s LIMIT 1",
120                 array($type, $data, $uid), __FILE__, __LINE__);
121         if (SQL_NUMROWS($result) == 1) {
122                 // Load data
123                 list($rank, $points, $mark) = SQL_FETCHROW($result);
124
125                 // Remember all values for later use
126                 $self  = true; $points = TRANSLATE_COMMA($points);
127
128                 // Transfer data to template
129                 define('__YR_LEVEL' , $rank);
130                 define('__YR_POINTS', $points);
131                 define('__YR_TMARK' , MAKE_DATETIME($mark, "1"));
132
133                 // Load template
134                 define('__YOUR_RANKING_LINE', LOAD_TEMPLATE("show_bonus_yr", true));
135         } // END - if
136
137         // Load rankings
138         $result = SQL_QUERY_ESC("SELECT id FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE %s=%s ORDER BY level LIMIT %s",
139                 array($type, $data, getConfig('bonus_lines')), __FILE__, __LINE__);
140         if (SQL_NUMROWS($result) > 0) {
141                 // Start generating the ranking list
142                 $max = SQL_NUMROWS($result);
143
144                 $SW = 2;
145                 for ($rank = 1; $rank <= $max; $rank++) {
146                         // Load data
147                         $result_users = SQL_QUERY_ESC("SELECT userid, points, timemark FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE %s=%s AND level=%s LIMIT 1",
148                                 array($type, $data, $rank), __FILE__, __LINE__);
149
150                         // Nothing found by default
151                         $userid = "---"; $points = "---";
152
153                         // Are you one of them?
154                         if (SQL_NUMROWS($result_users) == 1) {
155                                 // Load data
156                                 list($userid, $points, $mark) = SQL_FETCHROW($result_users);
157
158                                 // Translate comma
159                                 $points = TRANSLATE_COMMA($points);
160                         } // END - if
161
162                         // Output row
163                         $OUT .= "<tr>
164   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\">&nbsp;".$rank.".</td>
165   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\" align=\"center\">".$userid."</td>
166   <td class=\"bonus_rank_".$rank." bottom2 switch_sw".$SW."\" align=\"center\">".$points."</td>
167 </tr>\n";
168                         $SW = 3 - $SW;
169                 } // END - for
170
171                 if (!$self) {
172                         // If current user was not found set constant
173                         define('__YOUR_RANKING_LINE', BONUS_RANK_YOU_ARE_NOT_FOUND);
174                 } // END - if
175         } else {
176                 // No entries found!
177                 $OUT = "<tr>
178   <td colspan=\"3\" align=\"center\" height=\"30\" class=\"bottom2\">
179     <div class=\"guest_failed\">".BONUS_NO_RANKS_1.$data.BONUS_NO_RANKS_2."</div>
180   </td>
181 </tr>\n";
182                 define('__YOUR_RANKING_LINE', "");
183         }
184         return $OUT;
185 }
186 //
187 function BONUS_POINTS_HANDLER ($MODE) {
188         // Shall we add bonus points?
189         if (getConfig('bonus_active') != "Y") return;
190
191         // Switch to jackpot-mode when no UID is supplied but userid-mode is selected
192         if ((getConfig('bonus_mode') == "UID") && (getConfig('bonus_uid') == "0")) {
193                 // Update database & config
194                 UPDATE_CONFIG('bonus_mode', "JACKPOT");
195         } // END - if
196
197         if ($MODE == "login_bonus") {
198                 // Login bonus detected
199                 $points = getConfig('login_bonus');
200         } else {
201                 // Direct points supplied
202                 $points = $MODE;
203         }
204
205         // Subtract points from...
206         switch (getConfig('bonus_mode'))
207         {
208         case "JACKPOT": // ... jackpot
209                 if ((SUB_JACKPOT($points) == -1) && (getConfig('bonus_uid') > 0)) {
210                         // Check points amount first...
211                         $TOTAL = GET_TOTAL_DATA(getConfig('bonus_uid'), "user_points", "points") - GET_TOTAL_DATA(getConfig('bonus_uid'), "user_data", "used_points");
212                         if ($TOTAL >= $points) {
213                                 // Subtract points from userid's account
214                                 SUB_POINTS("bonus_payout_jackpot", getConfig('bonus_uid'), $points);
215                         } // END - if
216                 } // END - if
217                 break;
218
219         case "UID": // ... userid's account
220                 // Check his amount first
221                 $TOTAL = GET_TOTAL_DATA(getConfig('bonus_uid'), "user_points", "points") - GET_TOTAL_DATA(getConfig('bonus_uid'), "user_data", "used_points");
222                 if ($TOTAL >= $points) {
223                         // Subtract points from userid's account
224                         SUB_POINTS("bonus_payout_uid", getConfig('bonus_uid'), $points);
225                 } else {
226                         // Try to subtract from jackpot
227                         $dummy = SUB_JACKPOT($points);
228                 }
229                 break;
230         }
231 }
232
233 //
234 function BONUS_PURGE_EXPIRED_TURBO_BONUS() {
235         // Remove entries
236         $result = SQL_QUERY("DELETE LOW_PRIORITY FROM `{!_MYSQL_PREFIX!}_bonus_turbo` WHERE timemark < (UNIX_TIMESTAMP() - ".getConfig('bonus_timeout').")", __FILE__, __LINE__);
237         if (SQL_AFFECTEDROWS() > 0) {
238                 // Send out email to admin
239                 SEND_ADMIN_NOTIFICATION(AUTOPURGE_ADMIN_TURBO_SUBJECT, "admin_autopurge_turbo", SQL_AFFECTEDROWS(), "");
240         }
241 }
242 //
243 ?>