0.2.1/inc/libs/bonus_functions.php

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