2 /************************************************************************
3 * MXChange v0.2.1 Start: 02/12/2004 *
4 * ================ Last change: 02/27/2004 *
6 * -------------------------------------------------------------------- *
7 * File : what-del_email.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Delete a bonus or normal mail *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Bonus- / Normal-Mail loeschen *
12 * -------------------------------------------------------------------- *
14 * Module by Robert Niedziela, Megacomputing *
15 * web : http://mc-p.mcserver.de *
17 * -------------------------------------------------------------------- *
18 * Copyright (c) 2003 - 2008 by Roland Haeder *
19 * For more information visit: http://www.mxchange.org *
21 * This program is free software; you can redistribute it and/or modify *
22 * it under the terms of the GNU General Public License as published by *
23 * the Free Software Foundation; either version 2 of the License, or *
24 * (at your option) any later version. *
26 * This program is distributed in the hope that it will be useful, *
27 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
28 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
29 * GNU General Public License for more details. *
31 * You should have received a copy of the GNU General Public License *
32 * along with this program; if not, write to the Free Software *
33 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, *
35 ************************************************************************/
37 // Some security stuff...
38 if ((!defined('__SECURITY')) || (!IS_ADMIN())) {
39 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
43 // Add description as navigation point
44 ADD_DESCR("admin", basename(__FILE__));
46 if (!empty($_GET['mid'])) {
48 $result = SQL_QUERY_ESC("SELECT id, sender, subject, url, timestamp, payment_id FROM "._MYSQL_PREFIX."_pool WHERE id=%s LIMIT 1",
49 array(bigintval($_GET['mid'])), __FILE__, __LINE__);
51 // Delete mail only once
52 if (SQL_NUMROWS($result) == 1) {
54 list ($id, $sender, $subject, $url, $timestamp, $payId) = SQL_FETCHROW($result);
55 SQL_FREERESULT($result);
57 // Get points we shall pay back per mail
58 $price = GET_PAY_POINTS($payId, "price");
60 // Prepare data for the template
62 define('__SENDER' , ADMIN_USER_PROFILE_LINK($sender));
63 define('__SUBJECT', $subject);
64 define('__URL' , DEREFERER($url));
65 define('__ORDERED', MAKE_DATETIME($timestamp, "0"));
68 LOAD_TEMPLATE("admin_del_email_normal");
70 // Transfer data to data array
71 $DATA = array($url, $subject);
73 // Load email template and send the email away
74 $msg_user = LOAD_EMAIL_TEMPLATE("order-deleted", "", $sender);
75 SEND_EMAIL($sender, MEMBER_ORDER_DELETED, $msg_user);
77 // Delete mail from queue
78 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_pool WHERE id=%s LIMIT 1",
79 array(bigintval($_GET['mid'])), __FILE__, __LINE__);
81 // Fetch right stats_id from pool
82 $result = SQL_QUERY_ESC("SELECT s.id FROM "._MYSQL_PREFIX."_user_stats AS s
83 LEFT JOIN "._MYSQL_PREFIX."_pool AS p
85 WHERE s.pool_id=%s LIMIT 1",
86 array(bigintval($_GET['mid'])), __FILE__, __LINE__);
87 if (SQL_NUMROWS($result) == 1) {
89 list($stats_id) = SQL_FETCHROW($result);
92 SQL_FREERESULT($result);
95 $result = SQL_QUERY_ESC("SELECT COUNT(id) AS 'cnt' FROM "._MYSQL_PREFIX."_user_links WHERE stats_id=%s",
96 array(bigintval($stats_id)), __FILE__, __LINE__);
98 // Get unconfirmed links for calculation of total points
99 list($links) = SQL_FETCHROW($result);
102 SQL_FREERESULT($result);
104 // Calc total points and pay them back
105 $totalPoints = $links * $price;
107 // Shall we pay the points back to the user?
108 if ($_CONFIG['repay_deleted_mails'] != 'SHRED') {
109 //* DEBUG: */ echo $stats_id.":".$totalPoints."/".$links."/".$price."<br />\n";
110 if ($totalPoints > 0) {
111 // Shall we payback to user or jackpot?
112 if ($_CONFIG['repay_deleted_mails'] == "JACKPOT") {
118 //* DEBUG: */ echo "PAYBACK:".$sender."<br />\n";
119 ADD_POINTS_REFSYSTEM($sender, $totalPoints, true, "0", false,"direct");
122 if ($_CONFIG['repay_deleted_mails'] == 'REPAY') {
124 LOAD_TEMPLATE("admin_settings_saved", false, sprintf(ADMIN_POINTS_REPAYED,
125 number_format($totalPoints, 0, ",", ".")
129 LOAD_TEMPLATE("admin_settings_saved", false, sprintf(ADMIN_POINTS_TO_JACKPOT,
130 number_format($totalPoints, 0, ",", ".")
134 // No points repayed!
135 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_NO_POINTS_REPAYED);
139 LOAD_TEMPLATE("admin_settings_saved", false, sprintf(ADMIN_POINTS_SHREDDED, $totalPoints));
142 // Remove links from DB
143 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_links WHERE stats_id=%s",
144 array(bigintval($stats_id)), __FILE__, __LINE__);
146 // Output link for manually removing stats entry
147 LOAD_TEMPLATE("admin_settings_saved", false, "<A href=\"".URL."/modules.php?module=admin&what=del_email&pid=".bigintval($_GET['mid'])."\">".ADMIN_REMOVE_STATS_ENTRY."</A>");
150 // Mail already deleted!
151 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_NORMAL_MAIL_ALREADY_DELETED);
153 } elseif (!empty($_GET['pid'])) {
154 // Remove stats entries
155 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s LIMIT 1",
156 array(bigintval($_GET['pid'])), __FILE__, __LINE__);
157 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_USER_STATS_REMOVED);
158 } elseif ((!empty($_GET['bid'])) && (EXT_IS_ACTIVE("bonus"))) {
159 // Load data from bonus mail
160 $result = SQL_QUERY_ESC("SELECT id, subject, url, timestamp FROM "._MYSQL_PREFIX."_bonus WHERE id=%s",
161 array(bigintval($_GET['bid'])), __FILE__, __LINE__);
163 // Delete mail only once
164 if (SQL_NUMROWS($result) == 1) {
166 list ($id, $subject, $url, $timestamp) = SQL_FETCHROW($result);
167 SQL_FREERESULT($result);
169 // Delete bonus mail entirely from database
170 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_bonus WHERE id=%s LIMIT 1",
171 array(bigintval($_GET['bid'])), __FILE__, __LINE__);
172 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_links WHERE bonus_id=%s",
173 array(bigintval($_GET['bid'])), __FILE__, __LINE__);
175 // Prepare data for the template
176 define('__ID' , $id);
177 define('__SUBJECT', $subject);
178 define('__URL' , DEREFERER($url));
179 define('__ORDERED', MAKE_DATETIME($timestamp, "0"));
182 LOAD_TEMPLATE("admin_del_email_bonus");
184 // Mail already deleted!
185 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BONUS_MAIL_ALREADY_DELETED);
188 // No mail orders fond
189 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_WRONG_CALL);