inc/purge/purge-general.php

   1 <?php
   2 /************************************************************************
   3  * Mailer v0.2.1-FINAL                                Start: 09/14/2008 *
   4  * ===================                          Last change: 09/14/2008 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : purge-general.php                                *
   8  * -------------------------------------------------------------------- *
   9  * Short description : General autopurging, nothing extension-specific  *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Allgemeine, nicht erweiterunsabhaengige Auto-    *
  12  *                     Loeschung                                        *
  13  * -------------------------------------------------------------------- *
  14  * $Revision::                                                        $ *
  15  * $Date::                                                            $ *
  16  * $Tag:: 0.2.1-FINAL                                                 $ *
  17  * $Author::                                                          $ *
  18  * -------------------------------------------------------------------- *
  19  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  20  * Copyright (c) 2009 - 2012 by Mailer Developer Team                   *
  21  * For more information visit: http://mxchange.org                      *
  22  *                                                                      *
  23  * This program is free software; you can redistribute it and/or modify *
  24  * it under the terms of the GNU General Public License as published by *
  25  * the Free Software Foundation; either version 2 of the License, or    *
  26  * (at your option) any later version.                                  *
  27  *                                                                      *
  28  * This program is distributed in the hope that it will be useful,      *
  29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  31  * GNU General Public License for more details.                         *
  32  *                                                                      *
  33  * You should have received a copy of the GNU General Public License    *
  34  * along with this program; if not, write to the Free Software          *
  35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  36  * MA  02110-1301  USA                                                  *
  37  ************************************************************************/
  38
  39 // Some security stuff...
  40 if (!defined('__SECURITY')) {
  41         die();
  42 } elseif ((!isExtensionActive('autopurge')) || (!isAutoPurgingActive())) {
  43         // Abort here
  44         return FALSE;
  45 }
  46
  47 if (getAutoPurge() > 0) {
  48         // Init SQLs
  49         initSqls();
  50
  51         // Init variables
  52         $admin_points = '0';
  53
  54         // Then check for outdated mail order. We don't delete them just the confirmation links will be deleted.
  55         $result = SQL_QUERY('SELECT
  56         `s`.`id`,
  57         `s`.`userid`,
  58         `s`.`pool_id`,
  59         `t`.`price`
  60 FROM
  61         `{?_MYSQL_PREFIX?}_user_stats` AS `s`
  62 LEFT JOIN
  63         `{?_MYSQL_PREFIX?}_payments` AS `t`
  64 ON
  65         `s`.`payment_id`=`t`.`id`
  66 WHERE
  67         (UNIX_TIMESTAMP() - `s`.`timestamp_ordered`) >= {?auto_purge?}
  68 ORDER BY
  69         `s`.`userid` ASC', __FILE__, __LINE__);
  70         if (!SQL_HASZERONUMS($result)) {
  71                 // Start deleting procedure
  72                 $userid = NULL;
  73                 $points = '0';
  74                 while ($content = SQL_FETCHARRAY($result)) {
  75                         // Check if confirmation links are purged or not
  76                         $result_links = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_user_links` WHERE `stats_id`=%s LIMIT 1",
  77                                 array(bigintval($content['id'])), __FILE__, __LINE__);
  78
  79                         // Is there one entry?
  80                         if (SQL_NUMROWS($result_links) == 1) {
  81                                 // At least one link was found, enougth to pay back the points
  82                                 if (($userid != $content['userid']) && (isValidId($userid)) && ($points > 0)) {
  83                                         // Directly add points back to senders account
  84                                         addPointsAutoPurge($userid, $points);
  85                                         $points = '0';
  86                                 } // END - if
  87
  88                                 // Add points
  89                                 $userid = $content['userid'];
  90                                 $points += $content['price'];
  91                                 $admin_points += $content['price'];
  92
  93                                 // Remove confirmation links from queue
  94                                 addSql(SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_user_links` WHERE `stats_id`=%s",
  95                                         array(bigintval($content['id'])), __FILE__, __LINE__, FALSE));
  96
  97                                 // Update status of order
  98                                 addSql(SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_pool` SET `data_type`='DELETED' WHERE `id`=%s LIMIT 1",
  99                                         array(bigintval($content['pool_id'])), __FILE__, __LINE__, FALSE));
 100                         } // END - if
 101
 102                         // Free memory
 103                         SQL_FREERESULT($result_links);
 104                 } // END - while
 105
 106                 // Are some points collected?
 107                 if (($points > 0) && (isValidId($userid))) {
 108                         // Add last points to last user account
 109                         addPointsAutoPurge($userid, $points);
 110                 } // END - if
 111         } // END - if
 112
 113         // Free memory
 114         SQL_FREERESULT($result);
 115
 116         // Is the 'bonus' extension installed and activated?
 117         if (isExtensionActive('bonus', TRUE)) {
 118                 // Check for bonus campaigns
 119                 $result = SQL_QUERY("SELECT `id`, `points` FROM `{?_MYSQL_PREFIX?}_bonus` WHERE `data_type`='SEND' AND `timestamp` <= {?auto_purge?} ORDER BY `id` ASC", __FILE__, __LINE__);
 120                 if (!SQL_HASZERONUMS($result)) {
 121                         // Start deleting procedure
 122                         $points = '0';
 123                         while ($content = SQL_FETCHARRAY($result)) {
 124                                 // Check if confirmation links are purged or not
 125                                 $result_links = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_user_links` WHERE `bonus_id`=%s",
 126                                         array(bigintval($content['id'])), __FILE__, __LINE__);
 127                                 if (!SQL_HASZERONUMS($result_links)) {
 128                                         // At least one link was found, enougth to pay back the points
 129                                         $points += $content['points'] * SQL_NUMROWS($result_links);
 130
 131                                         // Free memory
 132                                         SQL_FREERESULT($result_links);
 133
 134                                         // Remove confirmation links from queue
 135                                         addSql(SQL_QUERY_ESC("DELETE LOW_PRIORITY FROM `{?_MYSQL_PREFIX?}_user_links` WHERE `bonus_id`=%s",
 136                                                 array(bigintval($content['id'])), __FILE__, __LINE__, FALSE));
 137
 138                                         // Update status of order
 139                                         addSql(SQL_QUERY_ESC("UPDATE `{?_MYSQL_PREFIX?}_bonus` SET `data_type`='DELETED' WHERE `id`=%s LIMIT 1",
 140                                                 array(bigintval($content['id'])), __FILE__, __LINE__, FALSE));
 141                                 } // END - if
 142                         } // END - while
 143
 144                         // Is ext-jackpot installed?
 145                         if (isExtensionActive('jackpot')) {
 146                                 // Add points to jackpot
 147                                 addPointsToJackpot($points);
 148                         } // END - if
 149
 150                         // Add points for the admin
 151                         $admin_points += $points;
 152                 } // END - if
 153
 154                 // Free memory
 155                 SQL_FREERESULT($result);
 156         } // END - if
 157
 158         // Add points from deleted accounts to jackpot, but here just add to notify mail
 159         if ($admin_points > 0) {
 160                 // Send mail to admin
 161                 sendAdminNotification('{--ADMIN_AUTOPURGE_SUBJECT--}', 'admin_purge_points', $admin_points);
 162         } // END - if
 163
 164         // Run all SQLs here
 165         runFilterChain('run_sqls');
 166 } // END - if
 167
 168 // [EOF]
 169 ?>