From: Roland Häder Date: Fri, 12 Dec 2008 19:39:11 +0000 (+0000) Subject: Sending pool splitted (prepared for upcoming feature) X-Git-Url: https://git.mxchange.org/?a=commitdiff_plain;h=2d8391f9967d3c4bcc1712c0101cd7841ef9827a;p=mailer.git Sending pool splitted (prepared for upcoming feature) --- diff --git a/.gitattributes b/.gitattributes index 00de3f9368..0e1a50061c 100644 --- a/.gitattributes +++ b/.gitattributes @@ -581,6 +581,9 @@ inc/phpmailer/test/phpmailer_test.php -text inc/phpmailer/test/phpunit.php -text inc/phpmailer/test/test.png -text inc/pool-update.php -text +inc/pool/.htaccess -text +inc/pool/pool-bonus.php -text +inc/pool/pool-user.php -text inc/profile-updte.php -text inc/rdf.class.php -text inc/reset/.htaccess -text diff --git a/inc/databases.php b/inc/databases.php index 54d09fe2db..dfd79546c6 100644 --- a/inc/databases.php +++ b/inc/databases.php @@ -114,7 +114,7 @@ define('USAGE_BASE', "usage"); define('SERVER_URL', "http://www.mxchange.org"); // Current SVN revision -define('CURR_SVN_REVISION', "620"); +define('CURR_SVN_REVISION', "621"); // Take a prime number which is long (if you know a longer one please try it out!) define('_PRIME', 591623); diff --git a/inc/pool-update.php b/inc/pool-update.php index bc5ea6fd70..628b18a310 100644 --- a/inc/pool-update.php +++ b/inc/pool-update.php @@ -43,443 +43,23 @@ if (defined('__DAILY_RESET')) { return false; } // END - if -// Test html extensions once -$HTML_EXT = EXT_IS_ACTIVE("html_mail", true); +// Set some global variables +global $cnt, $msg; -// Check for freed mail orders to send out -if ($HTML_EXT) { - // 0 1 2 3 4 5 6 7 8 9 10 - $result_main = SQL_QUERY("SELECT id, sender, subject, text, receivers, payment_id, timestamp, url, target_send, cat_id, html_msg FROM "._MYSQL_PREFIX."_pool WHERE data_type='NEW' ORDER BY timestamp DESC", __FILE__, __LINE__); -} else { - // 0 1 2 3 4 5 6 7 8 9 10 - $result_main = SQL_QUERY("SELECT id, sender, subject, text, receivers, payment_id, timestamp, url, target_send, cat_id, id FROM "._MYSQL_PREFIX."_pool WHERE data_type='NEW' ORDER BY timestamp DESC", __FILE__, __LINE__); -} - -// Reset variables -$cnt = 0; $cnt2 = 0; $LAST_SENT_ID = 0; $cnt_back = array("0"); $points_BACK = array("0"); -if (SQL_NUMROWS($result_main) > 0) -{ - while ($DATA = SQL_FETCHROW($result_main)) - { - // Check fetched data for HTML - $HTML = $DATA[10]; if ($HTML == $DATA[0]) $HTML = "N"; - - // Compile URL and subject line - $DATA[7] = COMPILE_CODE($DATA[7]); - - // Set mail order as "active". That means it will be sent out - $result_active = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='ACTIVE' WHERE id=%s AND data_type='NEW' LIMIT 1", - array($DATA[0]), __FILE__, __LINE__); - if (SQL_AFFECTEDROWS() == 1) - { - // "Explode" all receivers into an array - if (ereg(";", $DATA[4])) - { - // There's more than one receiver in the list... - $RECEIVERS = explode(";", $DATA[4]); - } - elseif (!empty($DATA[4])) - { - // Only one user left - $RECEIVERS = array($DATA[4]); - } - else - { - // No users left - $RECEIVERS = array("0"); - } - $dummy = $RECEIVERS; - - // Now, if we are good little boys and girls Santa left us some user-ids. - // We can now send mails to them... - foreach ($RECEIVERS as $key => $uid) - { - // Lookup user ID - $result_user = SQL_QUERY_ESC("SELECT gender, surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", - array(bigintval($uid)), __FILE__, __LINE__); - - // Is his data available? - //* DEBUG: */ echo "*L:".__LINE__."/".SQL_NUMROWS($result_user)."*
"; - if (SQL_NUMROWS($result_user) == 1) - { - // The final receiver does exists so we can continue... - list($gender, $sname, $fname, $email) = SQL_FETCHROW($result_user); - - // Free memory - SQL_FREERESULT($result_user); - - // Do we have a stats entry? - $result_stats = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s AND userid=%s AND timestamp_ordered='%s' LIMIT 1", - array($DATA[0], $DATA[1], $DATA[6]), __FILE__, __LINE__); - - // If there's no stats entry add it! - //* DEBUG: */ echo "!L:".__LINE__."/".SQL_NUMROWS($result_stats)."!
"; - if (SQL_NUMROWS($result_stats) == 0) - { - // No entry was found, so we add him! - $result_stats = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_stats (pool_id , userid, cat_id, payment_id, subject, url , max_rec , timestamp_ordered, timestamp_sstart) VALUES ('%s','%s','%s','%s','%s','%s','%s','%s' , UNIX_TIMESTAMP())", - array(bigintval($DATA[0]), bigintval($DATA[1]), bigintval($DATA[9]), bigintval($DATA[5]), $DATA[2], $DATA[7], $DATA[8], bigintval($DATA[6])), __FILE__, __LINE__); - - // Receive it's ID for the links table - $result_stats = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s AND userid=%s AND timestamp_ordered='%s' LIMIT 1", - array(bigintval($DATA[0]), bigintval($DATA[1]), bigintval($DATA[6])), __FILE__, __LINE__); - } - - //* DEBUG: */ echo "!L:".__LINE__."/".SQL_NUMROWS($result_stats)."!
"; - if (SQL_NUMROWS($result_stats) == 1) - { - // We got one! - list($stats_id) = SQL_FETCHROW($result_stats); - SQL_FREERESULT($result_stats); - - // Mark this user as "spammed" ;-) And place a line for him... - //* DEBUG: */ echo "?L:".__LINE__."/".$dummy."/".$key."/".$uid."(".$DATA[1].")/".$DATA[0]."/".$stats_id."?
"; - switch (REMOVE_RECEIVER($dummy, $key, bigintval($uid), bigintval($DATA[0]), bigintval($stats_id))) - { - case "done": - // Prepare the mail - $DATA[11] = bigintval($stats_id); - $DATA[12] = $sname; - $DATA[13] = $fname; - $DATA[14] = TRANSLATE_GENDER($gender); - - // Replace text variables - foreach ($REPLACER as $key => $value) { - if (isset($DATA[$key])) $DATA[3] = str_replace($value, $DATA[$key], $DATA[3]); - } // END - if - - // Prepare content - $content = array( - 'id' => $DATA[11], - 'url' => $DATA[7], - 'sender_uid' => $DATA[1], - 'category' => GET_CATEGORY($DATA[9]), - 'time' => CREATE_FANCY_TIME(GET_PAY_POINTS($DATA[5], "time")), - 'points' => TRANSLATE_COMMA(GET_PAY_POINTS($DATA[5], "payment")), - 'text' => $DATA[3] - ); - - // Load message template - $msg = LOAD_EMAIL_TEMPLATE("normal-mail", $content, bigintval($uid)); - - // Send mail away - SEND_EMAIL($email, $DATA[2], $msg, $HTML); - - // Count sent mails... - $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_sent=emails_sent+1 WHERE userid=%s LIMIT 1", - array(bigintval($DATA[1])), __FILE__, __LINE__); - - if (GET_EXT_VERSION("user") >= "0.1.4") { - // Update mails received for receiver - $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_received=emails_received+1 WHERE userid=%s LIMIT 1", - array(bigintval($uid)), __FILE__, __LINE__); - } // END - if - - // Update mediadata if version is 0.0.4 or higher - if (GET_EXT_VERSION("mediadata") >= "0.0.4") { - // Update entry (or add missing) - //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; - MEDIA_UPDATE_ENTRY(array("total_send", "normal_send"), "add", 1); - } // END - if - - // And count up the mail - $cnt++; - //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$cnt."*
"; - break; - - case "already": - // Entry already found, but we still count one up! - $cnt++; - //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$cnt."
"; - break; - } - } - - // Do we have reached the maximum to send mails? || ($_CONFIG['max_send'] >= $cnt) - //* DEBUG: */ echo "*L:".__LINE__."/".$cnt.">=".$DATA[8]."/".$_CONFIG['max_send'].">=".$cnt."/".$LAST_SENT_ID."!=".$DATA[0]."*
"; - if ((($cnt >= $DATA[8])) && ($LAST_SENT_ID != $DATA[0])) { - // Prepare content - $content = array( - 'sender_uid' => $DATA[1], - 'category' => GET_CATEGORY($DATA[9]), - 'text' => $DATA[3], - 'url' => $DATA[7], - 'expiration' => CREATE_FANCY_TIME(GET_PAY_POINTS($DATA[5], "time")) - ); - - // Yes we do, so we notify admin and sender about fully sent mail! - SEND_ADMIN_NOTIFICATION(ADMIN_SUBJ_SEND_DONE, "done-admin", $content, $uid); - - // Get sender's data - $result_sender = SQL_QUERY_ESC("SELECT surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", - array(bigintval($DATA[1])), __FILE__, __LINE__); - - // Is the sender found? - if (SQL_NUMROWS($result_sender) == 1) { - // Load data and prepare mail - list($sname, $fname, $email) = SQL_FETCHROW($result_sender); - SQL_FREERESULT($result_sender); - - // Load email template - $msg = LOAD_EMAIL_TEMPLATE("done-member", $content, $DATA[1]); - - // Send it also waway - SEND_EMAIL($email, MEMBER_SUBJ_SEND_DONE, $msg); - } // END - if - - // Set status to SEND because we completely send it away - $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='SEND', target_send='0', receivers='' WHERE id=%s LIMIT 1", - array(bigintval($DATA[0])), __FILE__, __LINE__); - - // Update send-completed-time - $result_user = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_stats SET timestamp_send=UNIX_TIMESTAMP() WHERE pool_id=%s LIMIT 1", - array(bigintval($DATA[0])), __FILE__, __LINE__); - - $LAST_SENT_ID = $DATA[0]; $cnt = 0; - $cnt2 += $cnt; - - // Update mediadata if version is 0.0.4 or higher - if (GET_EXT_VERSION("mediadata") >= "0.0.4") { - // Update entry (or add missing) - //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; - MEDIA_UPDATE_ENTRY(array("total_orders", "normal_orders"), "add", 1); - } // END - if +// Init counter and message +$cnt = 0; $msg = ""; - //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$P."
"; - break; - } - // Do we have send maximum mails? - elseif (($cnt >= $_CONFIG['max_send']) || ($cnt2 >= $_CONFIG['max_send'])) { - // There are some mails left to send for next round, so we reset the status back to NEW (=still not fully delivered) - $ADD = ""; - if ($cnt <= $DATA[8]) $ADD = ", target_send=target_send-".$cnt; - $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='NEW', receivers='%s'".$ADD." WHERE id=%s LIMIT 1", - array(implode(";", $dummy), bigintval($DATA[0])), __FILE__, __LINE__); +// Load more cache includes +$INC_POOL = GET_DIR_AS_ARRAY(PATH."inc/pool/", "pool-"); - //* DEBUG: */ echo"*EXIT/L:".__LINE__."*
"; - break; - } - } else { - // User does not exists so we have add the sender's points back to sender's account - if (($RECEIVERS[0] == "0") || (empty($RECEIVERS[0]))) { - // List was empty - $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='SEND' WHERE id=%s LIMIT 1", - array(bigintval($DATA[0])), __FILE__, __LINE__); - } else { - // Is the userid set? - if ($uid > 0) { - // User does not exists, pay points back - $points = GET_PAY_POINTS($DATA[5]); - ADD_POINTS_REFSYSTEM("pool_payback", $DATA[1], $points, false, "0", false, "direct"); +// Include all +foreach ($INC_POOL as $fqfn) { + // Include the file + require_once($fqfn); +} // END - foreach - // Add points together and remove user - $points_BACK[$DATA[1]] += $points; - } // END - if - - // Count up - $cnt_back[$DATA[1]]++; - } - - // Remove entry from list - unset($dummy[$key]); - - // Update receivers - $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET receivers='%s' WHERE id=%s LIMIT 1", - array(implode(";", $dummy), bigintval($DATA[0])), __FILE__, __LINE__); - } - } - } - } - - // Do we have points to "pay back"? - if ((sizeof($points_BACK) > 0) && (!empty($points_BACK[0]))) { - // Walk through all points - foreach ($points_BACK as $uid => $PB) { - // Add points only when we have points left to add and a valid user ID - if (($PB > 0) && ($uid > 0)) { - // Prepare content - $content = array( - 'points' => TRANSLATE_COMMA($DATA[10]) - ); - - // We have to pay back some points to the sender (we add them directly :-P) - $result = SQL_QUERY_ESC("SELECT email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s AND status='CONFIRMED' LIMIT 1", - array(bigintval($uid)), __FILE__, __LINE__); - $DATA[10] = $PB; $DATA[11] = $cnt_back[$uid]; - - // User found? - if (SQL_NUMROWS($result) == 1) { - list($email) = SQL_FETCHROW($result); - SQL_FREERESULT($result); - - // User account does exists, so we can safely pay back! - $msg = LOAD_EMAIL_TEMPLATE("back-member", $content, bigintval($uid)); - - // Send mail out to member - SEND_EMAIL($email, MEMBER_BACK_JACKPOT." (".$uid.")", $msg); - } else { - // Add to jackpot - ADD_JACKPOT($PB); - - // Send mail out to admin - SEND_ADMIN_NOTIFICATION(ADMIN_BACK_JACKPOT." (".$uid.")", "back-admin", $content, "admin"); - } - } // END - if - } // END - foreach - } // END - if -} - -// Free memory -SQL_FREERESULT($result_main); - -// Only send bonus mail when bonus extension is active and maximum send-mails is not reached -if ((EXT_IS_ACTIVE("bonus") && ($cnt < $_CONFIG['max_send']))) -{ - // Do we need to send out bonus mails? - if ($HTML_EXT) { - // 0 1 2 3 4 5 6 7 8 9 10 11 - $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__); - } else { - // 0 1 2 3 4 5 6 7 8 9 10 - $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__); - } - - if (SQL_NUMROWS($result_bonus) > 0) { - // Send these mails away... - $cnt2 = ""; - while ($DATA = SQL_FETCHARRAY($result_bonus)) { - // Compile URL - $DATA['url'] = COMPILE_CODE($DATA['url']); - - // Message is active in queue - $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='QUEUE' WHERE id=%s LIMIT 1", - array(bigintval($DATA['id'])), __FILE__, __LINE__); - - // "Explode" all receivers into an array - if (ereg(";", $DATA['receivers'])) { - // There's more than one receiver in the list... - $RECEIVERS = explode(";", $DATA['receivers']); - } elseif (!empty($DATA['points'])) { - // Only one user left - $RECEIVERS = array($DATA['receivers']); - } else { - // No users left - $RECEIVERS = array("0"); - } - $dummy = $RECEIVERS; - - // Now, if we are good little boys and girls Santa left us some user-ids. - // We can now send mails to them... - foreach ($RECEIVERS as $key => $uid) { - // Load personal data - //* DEBUG: */ echo "*L:".__LINE__."/".$uid."*
"; - $result_user = SQL_QUERY_ESC("SELECT surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", - array(bigintval($uid)), __FILE__, __LINE__); - - // Is his data available? - if (SQL_NUMROWS($result_user) == 1) - { - // The final receiver does exists so we can continue... - list($sname, $fname, $email) = SQL_FETCHROW($result_user); - //* DEBUG: */ echo "OK!/L:".__LINE__."
"; - - // Mark this user as "spammed" ;-) And place a line for him... - if (REMOVE_RECEIVER($dummy, $key, $uid, $DATA['id'], $DATA['id'], true) == "done") - { - // Replace text variables - foreach ($REPLACER as $key => $value) { - if (isset($DATA[$key])) $DATA['text'] = str_replace($value, $DATA[$key], $DATA['text']); - } // END - foreach - - // Prepare content - $content = array( - 'id' => $DATA['id'], - 'url' => $DATA['url'], - 'time' => CREATE_FANCY_TIME($DATA['time']), - 'points' => TRANSLATE_COMMA($DATA['points']), - 'category' => GET_CATEGORY($DATA['cat_id']), - 'text' => $DATA['text'] - ); - - // Prepare the mail - $msg = LOAD_EMAIL_TEMPLATE("bonus-mail", $content, $uid); - - // Send mail away - if (isset($DATA['html_msg'])) { - // Send HTML? - SEND_EMAIL($email, $DATA['subject'], $msg, $DATA['html_msg']); - } else { - // No HTML mail! - SEND_EMAIL($email, $DATA['subject'], $msg); - } - - // Count one up and remove entry from dummy array - $cnt++; unset($dummy[$key]); - - if (GET_EXT_VERSION("user") >= "0.1.4") - { - // Update mails received for receiver - $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_received=emails_received+1 WHERE userid=%s LIMIT 1", - array(bigintval($uid)), __FILE__, __LINE__); - } - - // Do we have send maximum mails? - if (($cnt >= $_CONFIG['max_send']) || (SELECTION_COUNT($dummy) == 0)) - { - // Yes, we have - //* DEBUG: */ echo "*EXIT/L:".__LINE__."
"; - break; - } - } - } - - // Free some memory - SQL_FREERESULT($result_user); - } - - // Update mediadata if version is 0.0.4 or higher - if (GET_EXT_VERSION("mediadata") >= "0.0.4") - { - // Update entry (or add missing - $P = $cnt; - if (!empty($cnt2) && empty($cnt)) $P = $cnt2; - //* DEBUG: */ echo "+MEDIA/L:".__LINE__."/".$P."+
"; - MEDIA_UPDATE_ENTRY(array("total_send", "bonus_send"), "add", $P); - } - - // Close sending system - //* DEBUG: */ echo "-L:".__LINE__."/".SELECTION_COUNT($dummy)."-
"; - if (SELECTION_COUNT($dummy) == 0) - { - // Queue reached! - $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='SEND', target_send='0', receivers='' WHERE id=%s LIMIT 1", - array(bigintval($DATA['id'])), __FILE__, __LINE__); - //* DEBUG: */ echo "*L:".__LINE__."*
"; - - // Update mediadata if version is 0.0.4 or higher - if (GET_EXT_VERSION("mediadata") >= "0.0.4") - { - // Update entry (or add missing) - //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; - MEDIA_UPDATE_ENTRY(array("total_orders", "bonus_orders"), "add", 1); - } - } - elseif ($cnt >= $_CONFIG['max_send']) - { - // Update bonus pool - $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='NEW', target_send=%s, receivers='%s' WHERE id=%s LIMIT 1", - array(SELECTION_COUNT($dummy), implode(";", $dummy), bigintval($DATA['id'])), __FILE__, __LINE__); - //* DEBUG: */ echo "*L:".__LINE__."
";
-				//* DEBUG: */ print_r($dummy);
-				//* DEBUG: */ echo "
\n!!!
"; - break; - } - } - } - - // Free memory - SQL_FREERESULT($result_bonus); -} +// Remove array +unset($INC_POOL); // Remove message (IMPORTANT!) unset($msg); diff --git a/inc/pool/.htaccess b/inc/pool/.htaccess new file mode 100644 index 0000000000..14249c50bd --- /dev/null +++ b/inc/pool/.htaccess @@ -0,0 +1 @@ +Deny from all \ No newline at end of file diff --git a/inc/pool/pool-bonus.php b/inc/pool/pool-bonus.php new file mode 100644 index 0000000000..e44b30ef71 --- /dev/null +++ b/inc/pool/pool-bonus.php @@ -0,0 +1,201 @@ + 0) { + // Send these mails away... + $cnt2 = ""; + while ($DATA = SQL_FETCHARRAY($result_bonus)) { + // Compile URL + $DATA['url'] = COMPILE_CODE($DATA['url']); + + // Message is active in queue + $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='QUEUE' WHERE id=%s LIMIT 1", + array(bigintval($DATA['id'])), __FILE__, __LINE__); + + // "Explode" all receivers into an array + if (ereg(";", $DATA['receivers'])) { + // There's more than one receiver in the list... + $RECEIVERS = explode(";", $DATA['receivers']); + } elseif (!empty($DATA['points'])) { + // Only one user left + $RECEIVERS = array($DATA['receivers']); + } else { + // No users left + $RECEIVERS = array("0"); + } + $dummy = $RECEIVERS; + + // Now, if we are good little boys and girls Santa left us some user-ids. + // We can now send mails to them... + foreach ($RECEIVERS as $key => $uid) { + // Load personal data + //* DEBUG: */ echo "*L:".__LINE__."/".$uid."*
"; + $result_user = SQL_QUERY_ESC("SELECT surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", + array(bigintval($uid)), __FILE__, __LINE__); + + // Is his data available? + if (SQL_NUMROWS($result_user) == 1) + { + // The final receiver does exists so we can continue... + list($sname, $fname, $email) = SQL_FETCHROW($result_user); + //* DEBUG: */ echo "OK!/L:".__LINE__."
"; + + // Mark this user as "spammed" ;-) And place a line for him... + if (REMOVE_RECEIVER($dummy, $key, $uid, $DATA['id'], $DATA['id'], true) == "done") + { + // Replace text variables + foreach ($REPLACER as $key => $value) { + if (isset($DATA[$key])) $DATA['text'] = str_replace($value, $DATA[$key], $DATA['text']); + } // END - foreach + + // Prepare content + $content = array( + 'id' => $DATA['id'], + 'url' => $DATA['url'], + 'time' => CREATE_FANCY_TIME($DATA['time']), + 'points' => TRANSLATE_COMMA($DATA['points']), + 'category' => GET_CATEGORY($DATA['cat_id']), + 'text' => $DATA['text'] + ); + + // Prepare the mail + $msg = LOAD_EMAIL_TEMPLATE("bonus-mail", $content, $uid); + + // Send mail away + if (isset($DATA['html_msg'])) { + // Send HTML? + SEND_EMAIL($email, $DATA['subject'], $msg, $DATA['html_msg']); + } else { + // No HTML mail! + SEND_EMAIL($email, $DATA['subject'], $msg); + } + + // Count one up and remove entry from dummy array + $cnt++; unset($dummy[$key]); + + if (GET_EXT_VERSION("user") >= "0.1.4") + { + // Update mails received for receiver + $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_received=emails_received+1 WHERE userid=%s LIMIT 1", + array(bigintval($uid)), __FILE__, __LINE__); + } + + // Do we have send maximum mails? + if (($cnt >= $_CONFIG['max_send']) || (SELECTION_COUNT($dummy) == 0)) + { + // Yes, we have + //* DEBUG: */ echo "*EXIT/L:".__LINE__."
"; + break; + } + } + } + + // Free some memory + SQL_FREERESULT($result_user); + } + + // Update mediadata if version is 0.0.4 or higher + if (GET_EXT_VERSION("mediadata") >= "0.0.4") + { + // Update entry (or add missing + $P = $cnt; + if (!empty($cnt2) && empty($cnt)) $P = $cnt2; + //* DEBUG: */ echo "+MEDIA/L:".__LINE__."/".$P."+
"; + MEDIA_UPDATE_ENTRY(array("total_send", "bonus_send"), "add", $P); + } + + // Close sending system + //* DEBUG: */ echo "-L:".__LINE__."/".SELECTION_COUNT($dummy)."-
"; + if (SELECTION_COUNT($dummy) == 0) + { + // Queue reached! + $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='SEND', target_send='0', receivers='' WHERE id=%s LIMIT 1", + array(bigintval($DATA['id'])), __FILE__, __LINE__); + //* DEBUG: */ echo "*L:".__LINE__."*
"; + + // Update mediadata if version is 0.0.4 or higher + if (GET_EXT_VERSION("mediadata") >= "0.0.4") + { + // Update entry (or add missing) + //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; + MEDIA_UPDATE_ENTRY(array("total_orders", "bonus_orders"), "add", 1); + } + } + elseif ($cnt >= $_CONFIG['max_send']) + { + // Update bonus pool + $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_bonus SET data_type='NEW', target_send=%s, receivers='%s' WHERE id=%s LIMIT 1", + array(SELECTION_COUNT($dummy), implode(";", $dummy), bigintval($DATA['id'])), __FILE__, __LINE__); + //* DEBUG: */ echo "*L:".__LINE__."
";
+				//* DEBUG: */ print_r($dummy);
+				//* DEBUG: */ echo "
\n!!!
"; + break; + } + } + } + + // Free memory + SQL_FREERESULT($result_bonus); +} + +// Remove message (IMPORTANT!) +unset($msg); + +// +?> diff --git a/inc/pool/pool-user.php b/inc/pool/pool-user.php new file mode 100644 index 0000000000..beb483ca08 --- /dev/null +++ b/inc/pool/pool-user.php @@ -0,0 +1,329 @@ + 0) { + while ($DATA = SQL_FETCHROW($result_main)) { + // Check fetched data for HTML + $HTML = $DATA[10]; if ($HTML == $DATA[0]) $HTML = "N"; + + // Compile URL and subject line + $DATA[7] = COMPILE_CODE($DATA[7]); + + // Set mail order as "active". That means it will be sent out + $result_active = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='ACTIVE' WHERE id=%s AND data_type='NEW' LIMIT 1", + array($DATA[0]), __FILE__, __LINE__); + + // Entry updated? + if (SQL_AFFECTEDROWS() == 1) { + // "Explode" all receivers into an array + if (ereg(";", $DATA[4])) { + // There's more than one receiver in the list... + $RECEIVERS = explode(";", $DATA[4]); + } elseif (!empty($DATA[4])) { + // Only one user left + $RECEIVERS = array($DATA[4]); + } else { + // No users left + $RECEIVERS = array("0"); + } + $dummy = $RECEIVERS; + + // Now, if we are good little boys and girls Santa left us some user-ids. + // We can now send mails to them... + foreach ($RECEIVERS as $key => $uid) { + // Lookup user ID + $result_user = SQL_QUERY_ESC("SELECT gender, surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", + array(bigintval($uid)), __FILE__, __LINE__); + + // Is his data available? + //* DEBUG: */ echo "*L:".__LINE__."/".SQL_NUMROWS($result_user)."*
"; + if (SQL_NUMROWS($result_user) == 1) + { + // The final receiver does exists so we can continue... + list($gender, $sname, $fname, $email) = SQL_FETCHROW($result_user); + + // Free memory + SQL_FREERESULT($result_user); + + // Do we have a stats entry? + $result_stats = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s AND userid=%s AND timestamp_ordered='%s' LIMIT 1", + array($DATA[0], $DATA[1], $DATA[6]), __FILE__, __LINE__); + + // If there's no stats entry add it! + //* DEBUG: */ echo "!L:".__LINE__."/".SQL_NUMROWS($result_stats)."!
"; + if (SQL_NUMROWS($result_stats) == 0) + { + // No entry was found, so we add him! + $result_stats = SQL_QUERY_ESC("INSERT INTO "._MYSQL_PREFIX."_user_stats (pool_id , userid, cat_id, payment_id, subject, url , max_rec , timestamp_ordered, timestamp_sstart) VALUES ('%s','%s','%s','%s','%s','%s','%s','%s' , UNIX_TIMESTAMP())", + array(bigintval($DATA[0]), bigintval($DATA[1]), bigintval($DATA[9]), bigintval($DATA[5]), $DATA[2], $DATA[7], $DATA[8], bigintval($DATA[6])), __FILE__, __LINE__); + + // Receive it's ID for the links table + $result_stats = SQL_QUERY_ESC("SELECT id FROM "._MYSQL_PREFIX."_user_stats WHERE pool_id=%s AND userid=%s AND timestamp_ordered='%s' LIMIT 1", + array(bigintval($DATA[0]), bigintval($DATA[1]), bigintval($DATA[6])), __FILE__, __LINE__); + } + + //* DEBUG: */ echo "!L:".__LINE__."/".SQL_NUMROWS($result_stats)."!
"; + if (SQL_NUMROWS($result_stats) == 1) + { + // We got one! + list($stats_id) = SQL_FETCHROW($result_stats); + SQL_FREERESULT($result_stats); + + // Mark this user as "spammed" ;-) And place a line for him... + //* DEBUG: */ echo "?L:".__LINE__."/".$dummy."/".$key."/".$uid."(".$DATA[1].")/".$DATA[0]."/".$stats_id."?
"; + switch (REMOVE_RECEIVER($dummy, $key, bigintval($uid), bigintval($DATA[0]), bigintval($stats_id))) + { + case "done": + // Prepare the mail + $DATA[11] = bigintval($stats_id); + $DATA[12] = $sname; + $DATA[13] = $fname; + $DATA[14] = TRANSLATE_GENDER($gender); + + // Replace text variables + foreach ($REPLACER as $key => $value) { + if (isset($DATA[$key])) $DATA[3] = str_replace($value, $DATA[$key], $DATA[3]); + } // END - if + + // Prepare content + $content = array( + 'id' => $DATA[11], + 'url' => $DATA[7], + 'sender_uid' => $DATA[1], + 'category' => GET_CATEGORY($DATA[9]), + 'time' => CREATE_FANCY_TIME(GET_PAY_POINTS($DATA[5], "time")), + 'points' => TRANSLATE_COMMA(GET_PAY_POINTS($DATA[5], "payment")), + 'text' => $DATA[3] + ); + + // Load message template + $msg = LOAD_EMAIL_TEMPLATE("normal-mail", $content, bigintval($uid)); + + // Send mail away + SEND_EMAIL($email, $DATA[2], $msg, $HTML); + + // Count sent mails... + $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_sent=emails_sent+1 WHERE userid=%s LIMIT 1", + array(bigintval($DATA[1])), __FILE__, __LINE__); + + if (GET_EXT_VERSION("user") >= "0.1.4") { + // Update mails received for receiver + $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_data SET emails_received=emails_received+1 WHERE userid=%s LIMIT 1", + array(bigintval($uid)), __FILE__, __LINE__); + } // END - if + + // Update mediadata if version is 0.0.4 or higher + if (GET_EXT_VERSION("mediadata") >= "0.0.4") { + // Update entry (or add missing) + //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; + MEDIA_UPDATE_ENTRY(array("total_send", "normal_send"), "add", 1); + } // END - if + + // And count up the mail + $cnt++; + //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$cnt."*
"; + break; + + case "already": + // Entry already found, but we still count one up! + $cnt++; + //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$cnt."
"; + break; + } + } + + // Do we have reached the maximum to send mails? || ($_CONFIG['max_send'] >= $cnt) + //* DEBUG: */ echo "*L:".__LINE__."/".$cnt.">=".$DATA[8]."/".$_CONFIG['max_send'].">=".$cnt."/".$LAST_SENT_ID."!=".$DATA[0]."*
"; + if ((($cnt >= $DATA[8])) && ($LAST_SENT_ID != $DATA[0])) { + // Prepare content + $content = array( + 'sender_uid' => $DATA[1], + 'category' => GET_CATEGORY($DATA[9]), + 'text' => $DATA[3], + 'url' => $DATA[7], + 'expiration' => CREATE_FANCY_TIME(GET_PAY_POINTS($DATA[5], "time")) + ); + + // Yes we do, so we notify admin and sender about fully sent mail! + SEND_ADMIN_NOTIFICATION(ADMIN_SUBJ_SEND_DONE, "done-admin", $content, $uid); + + // Get sender's data + $result_sender = SQL_QUERY_ESC("SELECT surname, family, email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s LIMIT 1", + array(bigintval($DATA[1])), __FILE__, __LINE__); + + // Is the sender found? + if (SQL_NUMROWS($result_sender) == 1) { + // Load data and prepare mail + list($sname, $fname, $email) = SQL_FETCHROW($result_sender); + SQL_FREERESULT($result_sender); + + // Load email template + $msg = LOAD_EMAIL_TEMPLATE("done-member", $content, $DATA[1]); + + // Send it also waway + SEND_EMAIL($email, MEMBER_SUBJ_SEND_DONE, $msg); + } // END - if + + // Set status to SEND because we completely send it away + $result_done = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='SEND', target_send='0', receivers='' WHERE id=%s LIMIT 1", + array(bigintval($DATA[0])), __FILE__, __LINE__); + + // Update send-completed-time + $result_user = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_user_stats SET timestamp_send=UNIX_TIMESTAMP() WHERE pool_id=%s LIMIT 1", + array(bigintval($DATA[0])), __FILE__, __LINE__); + + $LAST_SENT_ID = $DATA[0]; $cnt = 0; + $cnt2 += $cnt; + + // Update mediadata if version is 0.0.4 or higher + if (GET_EXT_VERSION("mediadata") >= "0.0.4") { + // Update entry (or add missing) + //* DEBUG: */ echo "*MEDIA/L:".__LINE__."*
"; + MEDIA_UPDATE_ENTRY(array("total_orders", "normal_orders"), "add", 1); + } // END - if + + //* DEBUG: */ echo"*EXIT/L:".__LINE__."/".$P."
"; + break; + } + // Do we have send maximum mails? + elseif (($cnt >= $_CONFIG['max_send']) || ($cnt2 >= $_CONFIG['max_send'])) { + // There are some mails left to send for next round, so we reset the status back to NEW (=still not fully delivered) + $ADD = ""; + if ($cnt <= $DATA[8]) $ADD = ", target_send=target_send-".$cnt; + $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='NEW', receivers='%s'".$ADD." WHERE id=%s LIMIT 1", + array(implode(";", $dummy), bigintval($DATA[0])), __FILE__, __LINE__); + + //* DEBUG: */ echo"*EXIT/L:".__LINE__."*
"; + break; + } + } else { + // User does not exists so we have add the sender's points back to sender's account + if (($RECEIVERS[0] == "0") || (empty($RECEIVERS[0]))) { + // List was empty + $result = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET data_type='SEND' WHERE id=%s LIMIT 1", + array(bigintval($DATA[0])), __FILE__, __LINE__); + } else { + // Is the userid set? + if ($uid > 0) { + // User does not exists, pay points back + $points = GET_PAY_POINTS($DATA[5]); + ADD_POINTS_REFSYSTEM("pool_payback", $DATA[1], $points, false, "0", false, "direct"); + + // Add points together and remove user + $pointsBack[$DATA[1]] += $points; + } // END - if + + // Count up + $cnt_back[$DATA[1]]++; + } + + // Remove entry from list + unset($dummy[$key]); + + // Update receivers + $result_queue = SQL_QUERY_ESC("UPDATE "._MYSQL_PREFIX."_pool SET receivers='%s' WHERE id=%s LIMIT 1", + array(implode(";", $dummy), bigintval($DATA[0])), __FILE__, __LINE__); + } + } + } + } + + // Do we have points to "pay back"? + if ((sizeof($pointsBack) > 0) && (!empty($pointsBack[0]))) { + // Walk through all points + foreach ($pointsBack as $uid => $PB) { + // Add points only when we have points left to add and a valid user ID + if (($PB > 0) && ($uid > 0)) { + // Prepare content + $content = array( + 'points' => TRANSLATE_COMMA($DATA[10]) + ); + + // We have to pay back some points to the sender (we add them directly :-P) + $result = SQL_QUERY_ESC("SELECT email FROM "._MYSQL_PREFIX."_user_data WHERE userid=%s AND status='CONFIRMED' LIMIT 1", + array(bigintval($uid)), __FILE__, __LINE__); + $DATA[10] = $PB; $DATA[11] = $cnt_back[$uid]; + + // User found? + if (SQL_NUMROWS($result) == 1) { + list($email) = SQL_FETCHROW($result); + SQL_FREERESULT($result); + + // User account does exists, so we can safely pay back! + $msg = LOAD_EMAIL_TEMPLATE("back-member", $content, bigintval($uid)); + + // Send mail out to member + SEND_EMAIL($email, MEMBER_BACK_JACKPOT." (".$uid.")", $msg); + } else { + // Add to jackpot + ADD_JACKPOT($PB); + + // Send mail out to admin + SEND_ADMIN_NOTIFICATION(ADMIN_BACK_JACKPOT." (".$uid.")", "back-admin", $content, "admin"); + } + } // END - if + } // END - foreach + } // END - if +} + +// Free memory +SQL_FREERESULT($result_main); + +// +?>