0.2.1/inc/modules/admin/what-del_email.php

   1 <?php\r
   2 /************************************************************************\r
   3  * MXChange v0.2.1                                    Start: 02/12/2004 *\r
   4  * ================                             Last change: 02/27/2004 *\r
   5  *                                                                      *\r
   6  * -------------------------------------------------------------------- *\r
   7  * File              : what-del_email.php                               *\r
   8  * -------------------------------------------------------------------- *\r
   9  * Short description : Delete a bonus or normal mail                    *\r
  10  * -------------------------------------------------------------------- *\r
  11  * Kurzbeschreibung  : Bonus- / Normal-Mail loeschen                    *\r
  12  * -------------------------------------------------------------------- *\r
  13  *                                                                      *\r
  14  *  Module by Robert Niedziela, Megacomputing                           *\r
  15  *          web : http://mc-p.mcserver.de                               *\r
  16  *                                                                      *\r
  17  * -------------------------------------------------------------------- *\r
  18  * Copyright (c) 2003 - 2008 by Roland Haeder                           *\r
  19  * For more information visit: http://www.mxchange.org                  *\r
  20  *                                                                      *\r
  21  * This program is free software; you can redistribute it and/or modify *\r
  22  * it under the terms of the GNU General Public License as published by *\r
  23  * the Free Software Foundation; either version 2 of the License, or    *\r
  24  * (at your option) any later version.                                  *\r
  25  *                                                                      *\r
  26  * This program is distributed in the hope that it will be useful,      *\r
  27  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *\r
  28  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *\r
  29  * GNU General Public License for more details.                         *\r
  30  *                                                                      *\r
  31  * You should have received a copy of the GNU General Public License    *\r
  32  * along with this program; if not, write to the Free Software          *\r
  33  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *\r
  34  * MA  02110-1301  USA                                                  *\r
  35  ************************************************************************/\r
  36 \r
  37 // Some security stuff...\r
  38 if ((ereg(basename(__FILE__), $_SERVER['PHP_SELF'])) || (!IS_ADMIN()))\r
  39 {\r
  40         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4)."/security.php";\r
  41         require($INC);\r
  42 }\r
  43 \r
  44 // Add description as navigation point\r
  45 ADD_DESCR("admin", basename(__FILE__));\r
  46 OPEN_TABLE("100%", "admin_content admin_content_align", "");\r
  47 if (!empty($_GET['mid']))\r
  48 {\r
  49         // Load email data\r
  50         $result = SQL_QUERY_ESC("SELECT id, sender, subject, url, timestamp FROM "._MYSQL_PREFIX."_pool WHERE id=%d LIMIT 1",\r
  51          array(bigintval($_GET['mid'])), __FILE__, __LINE__);\r
  52         list ($id, $sender, $subject, $url, $timestamp,) = SQL_FETCHROW($result);\r
  53         SQL_FREERESULT($result);\r
  54 \r
  55         // Delete mail only once\r
  56         if ($sender > 0)\r
  57         {\r
  58                 // Prepare data for the template\r
  59                 define('__ID'     , $id);\r
  60                 define('__SENDER' , ADMIN_USER_PROFILE_LINK($sender));\r
  61                 define('__SUBJECT', $subject);\r
  62                 define('__URL'    , DEREFERER($url));\r
  63                 define('__ORDERED', MAKE_DATETIME($timestamp, "0"));\r
  64 \r
  65                 // Load template\r
  66                 LOAD_TEMPLATE("admin_del_email_normal");\r
  67 \r
  68                 // Transfer data to data array\r
  69                 $DATA = array($url, $subject);\r
  70 \r
  71                 // Load email template and send the email away\r
  72                 $msg_user = LOAD_EMAIL_TEMPLATE("order-deleted", "", $sender);\r
  73                 SEND_EMAIL($sender, MEMBER_ORDER_DELETED, $msg_user);\r
  74 \r
  75                 // Delete mail from queue\r
  76                 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_pool WHERE id=%d LIMIT 1",\r
  77                  array(bigintval($_GET['mid'])), __FILE__, __LINE__);\r
  78 \r
  79                 // Fetch right stats_id from pool\r
  80                 $result = SQL_QUERY_ESC("SELECT s.id FROM "._MYSQL_PREFIX."_user_stats AS s\r
  81 LEFT JOIN "._MYSQL_PREFIX."_pool AS p\r
  82 ON s.pool_id=%d LIMIT 1",\r
  83  array(bigintval($_GET['mid'])), __FILE__, __LINE__);\r
  84                 if (SQL_NUMROWS($result) == 1)\r
  85                 {\r
  86                         // Fetch stats id\r
  87                         list($stats_id) = SQL_FETCHROW($result);\r
  88                         SQL_FREERESULT($result);\r
  89 \r
  90                         // Remove links from DB\r
  91                         $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_links WHERE stats_id=%d",\r
  92                          array(bigintval($stats_id)), __FILE__, __LINE__);\r
  93 \r
  94                         // Output link for manually removing stats entry\r
  95                         LOAD_TEMPLATE ("admin_settings_saved", false, "<A href=\"".URL."/modules.php?module=admin&amp;what=del_email&amp;pid=".$_GET['mid']."\">".ADMIN_REMOVE_STATS_ENTRY."</A>");\r
  96                 }\r
  97         }\r
  98          else\r
  99         {\r
 100                 // Mail already deleted!\r
 101                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_NORMAL_MAIL_ALREADY_DELETED);\r
 102         }\r
 103 }\r
 104  elseif (!empty($_GET['pid']))\r
 105 {\r
 106         // Remove stats entries\r
 107         $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%d LIMIT 1",\r
 108          array(bigintval($_GET['pid'])), __FILE__, __LINE__);\r
 109         LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_USER_STATS_REMOVED);\r
 110 }\r
 111  elseif ((!empty($_GET['bid'])) && (EXT_IS_ACTIVE("bonus")))\r
 112 {\r
 113         // Load data from bonus mail\r
 114         $result = SQL_QUERY_ESC("SELECT id, subject, url, timestamp FROM "._MYSQL_PREFIX."_bonus WHERE id=%d",\r
 115          array(bigintval($_GET['bid'])), __FILE__, __LINE__);\r
 116         list ($id, $subject, $url, $timestamp) = SQL_FETCHROW($result);\r
 117         SQL_FREERESULT($result);\r
 118 \r
 119         // Delete mail only once\r
 120         if ($id > 0)\r
 121         {\r
 122                 // Delete bonus mail entirely from database\r
 123                 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_bonus WHERE id=%d LIMIT 1",\r
 124                  array(bigintval($_GET['bid'])), __FILE__, __LINE__);\r
 125                 $result = SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM "._MYSQL_PREFIX."_user_links WHERE bonus_id=%d",\r
 126                  array(bigintval($_GET['bid'])), __FILE__, __LINE__);\r
 127 \r
 128                 // Prepare data for the template\r
 129                 define('__ID'     , $id);\r
 130                 define('__SUBJECT', $subject);\r
 131                 define('__URL'    , DEREFERER($url));\r
 132                 define('__ORDERED', MAKE_DATETIME($timestamp, "0"));\r
 133 \r
 134                 // Load template\r
 135                 LOAD_TEMPLATE("admin_del_email_bonus");\r
 136         }\r
 137          else\r
 138         {\r
 139                 // Mail already deleted!\r
 140                 LOAD_TEMPLATE("admin_settings_saved", false, ADMIN_BONUS_MAIL_ALREADY_DELETED);\r
 141         }\r
 142 }\r
 143  else\r
 144 {\r
 145         // No mail orders fond\r
 146         LOAD_TEMPLATE ("admin_settings_saved", false, ADMIN_WRONG_CALL);\r
 147 }\r
 148 CLOSE_TABLE();\r
 149 //\r
 150 ?>\r