* $Date:: $ *
* $Tag:: 0.2.1-FINAL $ *
* $Author:: $ *
- * Needs to be in all Files and every File needs "svn propset *
- * svn:keywords Date Revision" (autoprobset!) at least!!!!!! *
* -------------------------------------------------------------------- *
* Copyright (c) 2003 - 2009 by Roland Haeder *
* Copyright (c) 2009, 2010 by Mailer Developer Team *
// Some security stuff...
if (!defined('__SECURITY')) {
die();
-}
-
-// Abort if autopurge is not active or disabled by admin
-if ((!isExtensionActive('autopurge')) || (getConfig('auto_purge_active') != 'Y')) {
+} elseif ((!isExtensionActive('autopurge')) || (!isAutoPurgingActive())) {
// Abort here
return false;
}
-if ((getConfig('auto_purge_active') == 'Y') && (getConfig('auto_purge') > 0)) {
+if (getAutoPurge() > 0) {
// Init SQLs
initSqls();
$admin_points = '0';
// Then check for outdated mail order. We don't delete them just the confirmation links will be deleted.
- $result = SQL_QUERY("SELECT
+ $result = SQL_QUERY('SELECT
s.id, s.userid, s.pool_id, t.price
FROM
`{?_MYSQL_PREFIX?}_user_stats` AS s
WHERE
s.timestamp_ordered <= (UNIX_TIMESTAMP() - {?auto_purge?})
ORDER BY
- s.userid ASC", __FILE__, __LINE__);
- if (SQL_NUMROWS($result) > 0) {
+ s.userid ASC', __FILE__, __LINE__);
+ if (!SQL_HASZERONUMS($result)) {
// Start deleting procedure
$userid = '0'; $points = '0';
while ($content = SQL_FETCHARRAY($result)) {
SQL_FREERESULT($result_links);
// At least one link was found, enougth to pay back the points
- if (($userid != $content['userid']) && ($userid > 0) && ($points > 0)) {
+ if (($userid != $content['userid']) && (isValidUserId($userid)) && ($points > 0)) {
// Directly add points back to senders account
addPointsAutoPurge($userid, $points);
$points = '0';
if (isExtensionActive('bonus', true)) {
// Check for bonus campaigns
$result = SQL_QUERY("SELECT `id`, `points` FROM `{?_MYSQL_PREFIX?}_bonus` WHERE `data_type`='SEND' AND `timestamp` <= {?auto_purge?} ORDER BY `id` ASC", __FILE__, __LINE__);
- if (SQL_NUMROWS($result) > 0) {
+ if (!SQL_HASZERONUMS($result)) {
// Start deleting procedure
$points = '0';
while ($content = SQL_FETCHARRAY($result)) {
// Check if confirmation links are purged or not
$result_links = SQL_QUERY_ESC("SELECT `id` FROM `{?_MYSQL_PREFIX?}_user_links` WHERE `bonus_id`=%s",
array(bigintval($content['id'])), __FILE__, __LINE__);
- if (SQL_NUMROWS($result_links) > 0) {
+ if (!SQL_HASZERONUMS($result_links)) {
// At least one link was found, enougth to pay back the points
$points += $content['points'] * SQL_NUMROWS($result_links);
// Add points from deleted accounts to jackpot, but here just add to notify mail
if ($admin_points > 0) {
// Send mail to admin
- sendAdminNotification(getMessage('AUTOPURGE_ADMIN_SUBJECT'), 'admin_autopurge_points', translateComma($admin_points));
+ sendAdminNotification('{--ADMIN_AUTOPURGE_SUBJECT--}', 'admin_autopurge_points', $admin_points);
} // END - if
// Run all SQLs here
runFilterChain('run_sqls');
} // END - if
-//
+// [EOF]
?>