inc/monthly/monthly_beg.php

   1 <?php
   2 /************************************************************************
   3  * Mailer v0.2.1-FINAL                                Start: 10/22/2005 *
   4  * ===================                          Last change: 06/20/2010 *
   5  *                                                                      *
   6  * -------------------------------------------------------------------- *
   7  * File              : monthly_beg.php                                  *
   8  * -------------------------------------------------------------------- *
   9  * Short description : Monthly begging rallye                           *
  10  * -------------------------------------------------------------------- *
  11  * Kurzbeschreibung  : Monatliche Bettelrallye                          *
  12  * -------------------------------------------------------------------- *
  13  * Copyright (c) 2003 - 2009 by Roland Haeder                           *
  14  * Copyright (c) 2009 - 2015 by Mailer Developer Team                   *
  15  * For more information visit: http://mxchange.org                      *
  16  *                                                                      *
  17  * This program is free software; you can redistribute it and/or modify *
  18  * it under the terms of the GNU General Public License as published by *
  19  * the Free Software Foundation; either version 2 of the License, or    *
  20  * (at your option) any later version.                                  *
  21  *                                                                      *
  22  * This program is distributed in the hope that it will be useful,      *
  23  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
  24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
  25  * GNU General Public License for more details.                         *
  26  *                                                                      *
  27  * You should have received a copy of the GNU General Public License    *
  28  * along with this program; if not, write to the Free Software          *
  29  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
  30  * MA  02110-1301  USA                                                  *
  31  ************************************************************************/
  32
  33 // Some security stuff...
  34 if (!defined('__SECURITY')) {
  35         die();
  36 } elseif ((!isHtmlOutputMode()) || (!isMonthlyResetEnabled())) {
  37         // Do not execute when script is in non-HTML mode or no hourly reset
  38         return;
  39 } elseif ((!isExtensionActive('beg')) || (!isBegRallyeEnabled())) {
  40         if (isDebugModeEnabled()) logDebugMessage(__FILE__, __LINE__, 'Not resetting, needed extension ext-beg disabled.');
  41         return;
  42 }
  43
  44 // Debug line
  45 //* DEBUG: */ logDebugMessage(__FILE__, __LINE__, 'Monthly reset started.');
  46
  47 // Check if month is done
  48 if ((getBegRanks() > 0) && (!isCssOutputMode())) {
  49         // Extension 'autopurge' is inactive or purging of inactive accounts is deactivated
  50         $whereStatement = '';
  51
  52         // Shall we exclude webmaster's own userid?
  53         // @TODO Rewrite these if() blocks to a filter
  54         if ((!isBegIncludeOwnEnabled()) && (isValidId(getBegUserid()))) {
  55                 // Exclude it
  56                 $whereStatement .= ' AND `d`.`userid` != {?beg_userid?}';
  57         } // END - if
  58
  59         // Let's check if there are some points left we can pay...
  60         if ((isExtensionActive('autopurge')) && (isBegActiveEnabled()) && ((getApInactiveSince() > 0))) {
  61                 // Okay, include last online timestamp
  62                 $whereStatement .= ' AND (UNIX_TIMESTAMP() - `d`.`last_online`) < {?ap_inactive_since?}';
  63         } // END - if
  64
  65         // SQL string to check for accounts
  66         $result_main = sqlQuery("SELECT
  67         `d`.`userid`,
  68         `d`.`beg_points`
  69 FROM
  70         `{?_MYSQL_PREFIX?}_user_data` AS `d`
  71 WHERE
  72         `d`.`status`='CONFIRMED'
  73         " . runFilterChain('user_exclusion_sql', $whereStatement) . " AND
  74         `d`.`beg_points` > 0
  75 ORDER BY
  76         `d`.`beg_points` DESC,
  77         `d`.`userid` ASC
  78 LIMIT {?beg_ranks?}", __FILE__, __LINE__);
  79
  80         if (!ifSqlHasZeroNumRows($result_main)) {
  81                 // Load our winners...
  82                 while ($content = sqlFetchArray($result_main)) {
  83                         // Add points to user's account directly
  84                         initReferralSystem();
  85                         addPointsThroughReferralSystem('monthly_beg', $content['userid'], $content['beg_points']);
  86
  87                         // Load email template and email it away
  88                         $message = loadEmailTemplate('member_beg', $content, bigintval($content['userid']));
  89                         sendEmail($content['userid'], '{--BEG_MONTHLY_RALLYE--}', $message);
  90                 } // END - while
  91
  92                 // Reset accounts
  93                 $result = sqlQuery('UPDATE `{?_MYSQL_PREFIX?}_user_data` SET `beg_points`=0.00000 WHERE `beg_points` > 0', __FILE__, __LINE__);
  94         } // END - if
  95
  96         // Free memory
  97         sqlFreeResult($result_main);
  98 } // END - if
  99
 100 // Debug line
 101 //* DEBUG: */ logDebugMessage(__FILE__, __LINE__, 'Monthly reset ended.');
 102
 103 // [EOF]
 104 ?>