Fix for surfbar if no account has depleted points
[mailer.git] / beg.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 01/09/2005 *
4  * ===============                              Last change: 01/09/2005 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : beg.php                                          *
8  * -------------------------------------------------------------------- *
9  * Short description : Beg link for members                             *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Bettel-Link fuer Mitglieder                      *
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 // Load security stuff here (Oh, I hope this is not unsecure? Am I paranoia??? ;-) )
35 require_once("inc/libs/security_functions.php");
36
37 // Init "action" and "what"
38 global $what, $action, $startTime;
39 $GLOBALS['startTime'] = microtime(true);
40 $GLOBALS['what'] = ""; $GLOBALS['action'] = "";
41
42 // Set module
43 $GLOBALS['module'] = "beg";
44 $GLOBALS['refid']  = 0;
45 $CSS = -1;
46 $msg = null;
47
48 // Load the required file(s)
49 require ("inc/config.php");
50
51 // Is the "beg" extension active?
52 if (!EXT_IS_ACTIVE("beg")) {
53         // Redirect to index
54         LOAD_URL("modules.php?module=index&amp;msg=".CODE_EXTENSION_PROBLEM."&amp;ext=beg");
55 } // END - if
56
57 // Is the script installed?
58 if (isBooleanConstantAndTrue('mxchange_installed')) {
59         // Check for userid
60         if (!empty($_GET['uid'])) {
61                 // Init user ID
62                 $uid = 0;
63
64                 // Validate if it is not a number
65                 if ("".($_GET['uid'] + 0)."" !== "".$_GET['uid']."") {
66                         if (EXT_IS_ACTIVE("nickname")) {
67                                 // Maybe we have found a nickname?
68                                 $result = SQL_QUERY_ESC("SELECT userid, beg_clicks, ref_payout, status, last_online FROM "._MYSQL_PREFIX."_user_data WHERE nickname='%s' LIMIT 1",
69                                  array($_GET['uid']), __FILE__, __LINE__);
70                         } else {
71                                 // Nickname entered but nickname is not active
72                                 $msg = CODE_EXTENSION_PROBLEM;
73                                 $uid = -1;
74                                 $result = false;
75                         }
76                 } else {
77                         // Direct userid
78                         $result = SQL_QUERY_ESC("SELECT userid, beg_clicks, ref_payout, status, last_online FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1",
79                          array(bigintval($_GET['uid'])), __FILE__, __LINE__);
80                 }
81
82                 // Check if locked in so don't pay points
83                 $login = false; $status = "failed";
84                 if (IS_MEMBER()) {
85                         // Logged in user detected!
86                         $login = true;
87                 } // END - if
88
89                 // Check if account was found
90                 if ((SQL_NUMROWS($result) == 1) && ($result != false)) {
91                         // Found an ID so we simply set it
92                         list($uid, $clicks, $ref_payout, $status, $last) = SQL_FETCHROW($result);
93                         if ($status == "CONFIRMED") {
94                                 // Secure userid
95                                 $uid = bigintval($uid);
96
97                                 // Calculate beg points
98                                 mt_srand((double)microtime() * 10000000000 / time());
99
100                                 // Multiply configured values with 100000 and divide with 100000 so we can also handle small values
101                                 // If we need more number behind the decimal dot then we just need to increase all these three
102                                 // numbers matching to the numbers behind the decimal dot. Simple! ;-)
103                                 $points = mt_rand(($_CONFIG['beg_points'] * 100000), ($_CONFIG['beg_points_max'] * 100000)) / 100000;
104
105                                 // Set nickname / userid for the template(s
106                                 define('__BEG_UID'   , $_GET['uid']);
107                                 define('__BEG_CLICKS', ($clicks + 1));
108                                 define('__BEG_BANNER', LOAD_TEMPLATE("beg_banner", true));
109                                 define('__BEG_POINTS', TRANSLATE_COMMA($points));
110                         } else {
111                                 // Other status
112                                 $uid = 0;
113                         }
114                 }
115
116                 // Free memory
117                 SQL_FREERESULT($result);
118
119                 if (($uid > 0) && ($_CONFIG['beg_uid'] != $uid)) {
120                         // Update counter
121                         $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET beg_clicks=beg_clicks+1 WHERE userid=%s AND status='CONFIRMED' LIMIT 1",
122                          array($uid), __FILE__, __LINE__);
123
124                         // Check for last entry for userid w/o IP number
125                         $result = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_beg_ips WHERE (timeout > (UNIX_TIMESTAMP() - ".$_CONFIG['beg_timeout'].") OR (timeout > (UNIX_TIMESTAMP() - ".$_CONFIG['beg_uid_timeout'].") AND userid=%s)) AND remote_ip='%s' LIMIT 1",
126                          array($uid, GET_REMOTE_ADDR()), __FILE__, __LINE__);
127                         if ((SQL_NUMROWS($result) == 0) && ($points > 0) && (!$login)) {
128                                 // Free memory
129                                 SQL_FREERESULT($result);
130
131                                 if (!IS_ADMIN()) {
132                                         // Remember remote address, userid and timestamp for next click
133                                         // but only when there is no admin begging.
134                                         // Admins shall be able to test it!
135                                         $result = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_beg_ips (userid, remote_ip, timeout) VALUES('%s','%s', UNIX_TIMESTAMP())",
136                                          array($uid, GET_REMOTE_ADDR()), __FILE__, __LINE__);
137                                 }
138
139                                 // Set mode depending on how many mails the member has to confirm
140                                 $locked = false;
141                                 if (($ref_payout > 0) && ($_CONFIG['allow_direct_pay'] == "N")) $locked = true;
142
143                                 // Is begging rallye active?
144                                 if ($_CONFIG['beg_rallye'] == "Y") {
145                                         // Add points to rallye account
146                                         $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET beg_points=beg_points+%s WHERE userid=%s LIMIT 1",
147                                          array($points, $uid), __FILE__, __LINE__);
148                                 } else {
149                                         // Add points to account
150                                         $DEPTH = 0;
151                                         ADD_POINTS_REFSYSTEM($uid, $points, false, "0", $locked, strtolower($_CONFIG['beg_mode']));
152                                 }
153
154                                 // Subtract begged points from member account if the admin has selected one
155                                 if ($_CONFIG['beg_uid'] > 0) {
156                                         // Subtract from this account
157                                         SUB_POINTS($_CONFIG['beg_uid'], $points);
158                                 }
159
160                                 // Set message
161                                 define('__BEG_MSG', LOAD_TEMPLATE("beg_done", true));
162                         } elseif ($login) {
163                                 // Logged in user found!
164                                 define('__BEG_MSG', LOAD_TEMPLATE("beg_login", true));
165
166                                 // Free memory
167                                 SQL_FREERESULT($result);
168                         } else {
169                                 // Free memory
170                                 SQL_FREERESULT($result);
171
172                                 // Clicked received while reload lock is active
173                                 define('__BEG_MSG', LOAD_TEMPLATE("beg_failed", true));
174                         }
175
176                         // Include header
177                         require_once(PATH."inc/header.php");
178
179                         // Load final template
180                         LOAD_TEMPLATE("beg_link");
181
182                         // Include footer
183                         require_once(PATH."inc/footer.php");
184                 } elseif (($status != "CONFIRMED") && ($status != "failed")) {
185                         // Maybe locked/unconfirmed account?
186                         switch ($status) {
187                                 case "LOCKED"     : $msg = CODE_ID_LOCKED     ; break; // Locked account
188                                 case "UNCONFIRMED": $msg = CODE_ID_UNCONFIRMED; break; // Unconfirmed account
189                         }
190                 } elseif (($uid == "0") || ($status == "failed")) {
191                         // Inalid or locked account, so let's find out
192                         $result = SQL_QUERY_ESC("SELECT userid FROM "._MYSQL_PREFIX."_user_data WHERE nickname='%s' LIMIT 1",
193                          array($_GET['uid']), __FILE__, __LINE__);
194                         if (SQL_NUMROWS($result) == 1) {
195                                 // Locked account
196                                 $msg = CODE_ACCOUNT_LOCKED;
197                         } else {
198                                 // Invalid nickname! (404)
199                                 $msg = CODE_USER_404;
200                         }
201
202                         // Free memory
203                         SQL_FREERESULT($result);
204                 } elseif ($uid == $_CONFIG['beg_uid']) {
205                         // Webmaster's ID cannot beg for points!
206                         $msg = CODE_BEG_SAME_AS_OWN;
207                 }
208
209                 // Reload to index module
210                 if ((!empty($msg)) && (!empty($msg))) LOAD_URL("modules.php?module=index&amp;msg=".$msg."&amp;ext=beg");
211         } else {
212                 // No userid entered
213                 LOAD_URL("modules.php?module=index");
214         }
215 } else {
216         // You have to configure first!
217         LOAD_URL("install.php");
218 }
219
220 // Really all done here... ;-)
221 ?>