2 /************************************************************************
3 * MXChange v0.2.1 Start: 02/16/2005 *
4 * =============== Last change: 01/21/2006 *
6 * -------------------------------------------------------------------- *
7 * File : doubler_send.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Send's out mails for doubled points *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Sendet Mails bei vergueteter Verdoppelung aus *
12 * -------------------------------------------------------------------- *
14 * -------------------------------------------------------------------- *
15 * Copyright (c) 2003 - 2008 by Roland Haeder *
16 * For more information visit: http://www.mxchange.org *
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. *
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. *
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, *
32 ************************************************************************/
34 // Some security stuff...
35 if (ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) {
36 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
40 // Initialize variables
41 $jackpot = "0"; $user = "0";
43 // Get total points of the doubler itself
44 $DOUBLER_POINTS = DOUBLER_GET_TOTAL_POINTS_LEFT();
45 if ($DOUBLER_POINTS == 0) {
46 // Exit here to prevent some SQL errors (SQL_QUERY_ESC doen't insert zeros! We need to fix this...)
50 // If not currently doubled set it to zero
51 unset($_GET['DOUBLER_UID']);
52 unset($_POST['DOUBLER_UID']);
53 set_session('DOUBLER_UID', "");
54 if (empty($DOUBLER_UID)) $DOUBLER_UID = "0";
56 // Check for doubles which we can pay out
57 $min = bigintval($_CONFIG['doubler_min'] * 2);
58 $result_total = SQL_QUERY_ESC("SELECT DISTINCT d.id, d.userid, d.points, d.remote_ip, d.timemark
59 FROM "._MYSQL_PREFIX."_doubler AS d
60 LEFT JOIN "._MYSQL_PREFIX."_user_data AS u
62 WHERE u.status='CONFIRMED' AND d.points <= %s AND d.points >= %s AND d.completed='N' AND d.is_ref='N'
63 ORDER BY d.timemark", array($DOUBLER_POINTS, $min), __FILE__, __LINE__);
65 // Check for accounts with limitation
66 $result_main = SQL_QUERY_ESC("SELECT DISTINCT d.id, d.userid, d.points, d.remote_ip, d.timemark
67 FROM "._MYSQL_PREFIX."_doubler AS d
68 LEFT JOIN "._MYSQL_PREFIX."_user_data AS u
70 WHERE u.status='CONFIRMED' AND d.points <= %s AND d.points >= %s AND d.completed='N' AND d.is_ref='N'
72 LIMIT %d", array($DOUBLER_POINTS, $min, $_CONFIG['doubler_max_sent']), __FILE__, __LINE__);
74 if (((SQL_NUMROWS($result_total) > 0) && ($_CONFIG['doubler_sent_all'] == "Y")) || ((SQL_NUMROWS($result_main) == $_CONFIG['doubler_group_sent']) && ($_CONFIG['doubler_sent_all'] == "N")))
76 // Switch to matching SQL resource
77 $result_load = $result_main;
78 if ((SQL_NUMROWS($result_total) > 0) && ($_CONFIG['doubler_sent_all'] == "Y")) $result_load = $result_total;
80 // At least one account was found
81 while(list($id, $uid, $points, $ip, $time) = SQL_FETCHROW($result_load))
83 // Only double when points are enougth!
84 if ($DOUBLER_POINTS >= $points)
86 // Check for his ref points
87 $result_ref = SQL_QUERY_ESC("SELECT SUM(points) FROM "._MYSQL_PREFIX."_doubler WHERE refid=%d AND completed='N' AND is_ref='Y'",
88 array(bigintval($uid)), __FILE__, __LINE__);
89 list($ref) = SQL_FETCHROW($result_ref);
92 SQL_FREERESULT($result_ref);
94 // Zero refid when empty (might be helpful!)
95 if (empty($ref)) $ref = 0;
96 if (($ref > 0) && ($DOUBLER_UID == $uid) && (!empty($ref)))
98 // Referral points found so add them and set line(s) to completed='Y'
100 $result_ref = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_doubler SET completed='Y' WHERE refid=%d AND completed='N' AND is_ref='Y'",
101 array(bigintval($uid)), __FILE__, __LINE__);
105 // No referral points found
109 // Exclude webmaster from doubling...
110 if ($uid != $_CONFIG['doubler_uid'])
113 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_points SET points=points+%s WHERE userid=%d AND ref_depth=0 LIMIT 1",
114 array($points, bigintval($uid)), __FILE__, __LINE__);
116 // Update mediadata as well
117 if (GET_EXT_VERSION("mediadata") >= "0.0.4")
120 MEDIA_UPDATE_ENTRY(array("total_points"), "add", $points);
124 // Set entry as "payed"
125 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_doubler SET completed='Y' WHERE id=%d LIMIT 1",
126 array(bigintval($id)), __FILE__, __LINE__);
129 // Check for jackpot inclusion in doubling process
130 if (($jackpot > 0) && ($jackpot >= $points) && ($_CONFIG['doubler_jackpot'] == "Y"))
132 // Subtract points from jackpot
133 SUB_JACKPOT($points);
140 // Exclude also webmaster's ID in taking points from webmaster's account
141 if (($user > 0) && ($user >= $points) && (!$OK) && ($_CONFIG['doubler_uid'] > 0) && ($uid != $_CONFIG['doubler_uid']))
143 // Add points to used points
144 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET used_points=used_points+%s WHERE userid='%d' LIMIT 1",
145 array($points, $_CONFIG['doubler_uid']), __FILE__, __LINE__);
147 // Update mediadata as well
148 if (GET_EXT_VERSION("mediadata") >= "0.0.4")
151 MEDIA_UPDATE_ENTRY(array("total_points"), "sub", $points);
158 // Update doubler's account only when others are not updated
161 // Add points to used doubler points
162 $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_config SET doubler_used=doubler_used+%s WHERE config=0 LIMIT 1",
163 array($points), __FILE__, __LINE__);
166 if (GET_EXT_VERSION("cache") >= "0.1.2")
168 if ($cacheInstance->cache_file("config", true)) $cacheInstance->cache_destroy();
172 // Update variables to prevent errors
173 $_CONFIG['doubler_used'] += $points;
174 $DOUBLER_POINTS -= $points;
178 // Doubler transmission ID
181 'points' => TRANSLATE_COMMA($points),
183 'when' => MAKE_DATETIME($time, "2"),
184 // IP number when the member submitted the doubling form
188 // Load mail template and send mail away...
189 $msg = LOAD_EMAIL_TEMPLATE("member_doubler", $content, $uid);
190 SEND_EMAIL($uid, DOUBLER_MEMBER_SUBJECT, $msg);
196 SQL_FREERESULT($result_total);
197 SQL_FREERESULT($result_main);