2 /************************************************************************
3 * MXChange v0.2.1 Start: 12/12/2008 *
4 * =============== Last change: 12/12/2008 *
6 * -------------------------------------------------------------------- *
7 * File : pool-bonus.php *
8 * -------------------------------------------------------------------- *
9 * Short description : Sends queued bonus mails from the pool *
10 * -------------------------------------------------------------------- *
11 * Kurzbeschreibung : Sendet freigegebene Bonus-Mails aus dem Pool *
12 * -------------------------------------------------------------------- *
14 * -------------------------------------------------------------------- *
15 * Copyright (c) 2003 - 2008 by Roland Haeder *
16 * For more information visit: http://www.mxchange.org *
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. *
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. *
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, *
32 ************************************************************************/
34 // Some security stuff...
35 if (!defined('__SECURITY')) {
36 $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
40 // Don't run on daily reset
41 if (defined('__DAILY_RESET')) {
44 } elseif (!EXT_IS_ACTIVE("bonus")) {
45 // Abort if extension bonus is not active
49 // Only send bonus mail when bonus extension is active and maximum send-mails is not reached
50 if ($GLOBALS['pool_cnt'] < getConfig('max_send')) {
51 // Do we need to send out bonus mails?
52 if (EXT_IS_ACTIVE("html_mail")) {
53 // 0 1 2 3 4 5 6 7 8 9 10 11
54 $result_bonus = SQL_QUERY("SELECT id, subject, text, receivers, points, time, data_type, timestamp, url, cat_id, target_send, html_msg FROM "._MYSQL_PREFIX."_bonus WHERE data_type='NEW' ORDER BY timestamp DESC", __FILE__, __LINE__);
56 // 0 1 2 3 4 5 6 7 8 9 10
57 $result_bonus = SQL_QUERY("SELECT id, subject, text, receivers, points, time, data_type, timestamp, url, cat_id, target_send FROM "._MYSQL_PREFIX."_bonus WHERE data_type='NEW' ORDER BY timestamp DESC", __FILE__, __LINE__);
60 if (SQL_NUMROWS($result_bonus) > 0) {
61 // Send these mails away...
63 while ($DATA = SQL_FETCHARRAY($result_bonus)) {
65 $DATA['url'] = COMPILE_CODE($DATA['url']);
67 // Message is active in queue
68 SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='QUEUE' WHERE id=%s LIMIT 1",
69 array(bigintval($DATA['id'])), __FILE__, __LINE__);
71 // "Explode" all receivers into an array
72 if (ereg(";", $DATA['receivers'])) {
73 // There's more than one receiver in the list...
74 $RECEIVERS = explode(";", $DATA['receivers']);
75 } elseif (!empty($DATA['points'])) {
77 $RECEIVERS = array($DATA['receivers']);
80 $RECEIVERS = array("0");
84 // Now, if we are good little boys and girls Santa left us some user-ids.
85 // We can now send mails to them...
86 foreach ($RECEIVERS as $key => $uid) {
88 //* DEBUG: */ echo "*L:".__LINE__."/".$uid."*<br />";
89 $result_user = SQL_QUERY_ESC("SELECT surname, family, email FROM `"._MYSQL_PREFIX."_user_data` WHERE userid=%s LIMIT 1",
90 array(bigintval($uid)), __FILE__, __LINE__);
92 // Is his data available?
93 if (SQL_NUMROWS($result_user) == 1) {
94 // The final receiver does exists so we can continue...
95 list($sname, $fname, $email) = SQL_FETCHROW($result_user);
96 //* DEBUG: */ echo "OK!/L:".__LINE__."<br />";
98 // Mark this user as "spammed" ;-) And place a line for him...
99 if (REMOVE_RECEIVER($dummy, $key, $uid, $DATA['id'], $DATA['id'], true) == "done") {
100 // Replace text variables
101 foreach ($REPLACER as $key => $value) {
102 if (isset($DATA[$key])) $DATA['text'] = str_replace($value, $DATA[$key], $DATA['text']);
108 'url' => $DATA['url'],
109 'time' => CREATE_FANCY_TIME($DATA['time']),
110 'points' => TRANSLATE_COMMA($DATA['points']),
111 'category' => GET_CATEGORY($DATA['cat_id']),
112 'text' => $DATA['text']
116 $mailText = LOAD_EMAIL_TEMPLATE("bonus-mail", $content, $uid);
119 if (isset($DATA['html_msg'])) {
121 SEND_EMAIL($email, $DATA['subject'], $mailText, $DATA['html_msg']);
124 SEND_EMAIL($email, $DATA['subject'], $mailText);
127 // Count one up and remove entry from dummy array
128 $GLOBALS['pool_cnt']++; unset($dummy[$key]);
130 if (GET_EXT_VERSION("user") >= "0.1.4") {
131 // Update mails received for receiver
132 SQL_QUERY_ESC("UPDATE `"._MYSQL_PREFIX."_user_data` SET emails_received=emails_received+1 WHERE userid=%s LIMIT 1",
133 array(bigintval($uid)), __FILE__, __LINE__);
136 // Do we have send maximum mails?
137 if (($GLOBALS['pool_cnt'] >= getConfig('max_send')) || (SELECTION_COUNT($dummy) == 0)) {
139 //* DEBUG: */ echo "*EXIT/L:".__LINE__."<br />";
146 SQL_FREERESULT($result_user);
149 // Update mediadata if version is 0.0.4 or higher
150 if (GET_EXT_VERSION("mediadata") >= "0.0.4") {
151 // Update entry (or add missing
152 $P = $GLOBALS['pool_cnt'];
153 if (!empty($cnt2) && empty($GLOBALS['pool_cnt'])) $P = $cnt2;
154 //* DEBUG: */ echo "+MEDIA/L:".__LINE__."/".$P."+<br />";
155 MEDIA_UPDATE_ENTRY(array("total_send", "bonus_send"), "add", $P);
158 // Close sending system
159 //* DEBUG: */ echo "-L:".__LINE__."/".SELECTION_COUNT($dummy)."-<br />";
160 if (SELECTION_COUNT($dummy) == 0) {
162 SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='SEND', target_send='0', receivers='' WHERE id=%s LIMIT 1",
163 array(bigintval($DATA['id'])), __FILE__, __LINE__);
164 //* DEBUG: */ echo "*L:".__LINE__."*<br />";
166 // Update mediadata if version is 0.0.4 or higher
167 if (GET_EXT_VERSION("mediadata") >= "0.0.4") {
168 // Update entry (or add missing)
169 //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*<br />";
170 MEDIA_UPDATE_ENTRY(array("total_orders", "bonus_orders"), "add", 1);
172 } elseif ($GLOBALS['pool_cnt'] >= getConfig('max_send')) {
174 SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='NEW', target_send=%s, receivers='%s' WHERE id=%s LIMIT 1",
175 array(SELECTION_COUNT($dummy), implode(";", $dummy), bigintval($DATA['id'])), __FILE__, __LINE__);
176 //* DEBUG: */ echo "*L:".__LINE__."<PRE>";
177 //* DEBUG: */ print_r($dummy);
178 //* DEBUG: */ echo "</PRE>\n!!!<br />";
185 SQL_FREERESULT($result_bonus);