A lot while() conditions rewritten to SQL_FETCHARRAY(), see bug #107, @TODO tags...
[mailer.git] / inc / monthly / monthly_newsletter.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 03/04/2005 *
4  * ===============                              Last change: 03/04/2005 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : monthly_newsletter.php                           *
8  * -------------------------------------------------------------------- *
9  * Short description : Monthly check for newsletter unsubscriptions     *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Monatlicher Test auf Newsletter-Abmeldungen      *
12  * -------------------------------------------------------------------- *
13  *                                                                      *
14  * -------------------------------------------------------------------- *
15  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
16  * For more information visit: http://www.mxchange.org                  *
17  *                                                                      *
18  * This program is free software; you can redistribute it and/or modify *
19  * it under the terms of the GNU General Public License as published by *
20  * the Free Software Foundation; either version 2 of the License, or    *
21  * (at your option) any later version.                                  *
22  *                                                                      *
23  * This program is distributed in the hope that it will be useful,      *
24  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
25  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
26  * GNU General Public License for more details.                         *
27  *                                                                      *
28  * You should have received a copy of the GNU General Public License    *
29  * along with this program; if not, write to the Free Software          *
30  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
31  * MA  02110-1301  USA                                                  *
32  ************************************************************************/
33
34 // Some security stuff...
35 if (!defined('__SECURITY')) {
36         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
37         require($INC);
38 } elseif (!EXT_IS_ACTIVE("newsletter")) {
39         return;
40 }
41
42 // Do not execute when script is in CSS mode or no daily reset
43 if (($GLOBALS['output_mode'] == 1) || (!isResetModeEnabled())) return;
44 //* DEBUG: */ echo basename(__FILE__)."<br />\n";
45
46 // Get current month (2 digits)
47 $curr = date("m", time());
48
49 if (getConfig('last_month') != $curr) {
50         // Check for unsubscribed members
51         $result = SQL_QUERY("SELECT userid, email, nl_until FROM `{!_MYSQL_PREFIX!}_user_data` WHERE nl_receive='N' ORDER BY userid", __FILE__, __LINE__);
52         if (SQL_NUMROWS($result) > 0) {
53                 // Some unsubscriptions are found so we reset them to receive newsletters
54                 while ($content = SQL_FETCHARRAY($result)) {
55                         // Update account
56                         SQL_QUERY_ESC("UPDATE `{!_MYSQL_PREFIX!}_user_data` SET nl_receive='Y', nl_until='0' WHERE userid=%s LIMIT 1",
57                                 array(bigintval($content['userid'])), __FILE__, __LINE__);
58
59                         // Send email to him
60                         $msg = LOAD_EMAIL_TEMPLATE("member_newsletter_reset", true, bigintval($content['userid']));
61                         SEND_EMAIL($content['email'], getMessage('NL_MEMBER_RESET_SUBJECT'), $msg);
62
63                         // Send email to admin
64                         SEND_ADMIN_NOTIFICATION(getMessage('NL_ADMIN_SUBJECT'), "admin_newsletter_reset", array(), $GLOBALS['userid']);
65                 } // END - if
66
67                 // Free memory
68                 SQL_FREERESULT($result);
69         }
70 }
71
72 //
73 ?>