<?php
define('_VALID_MOS', 1);
require_once '/home1/ctcweb9/public_html/includes/alastair.php';
require_once '/home1/ctcweb9/public_html/mailchimp/moderation.config.php';
GetLogonDetails($con, $username);
$dirs = array(ModerationConfig::GetInboxDir() . "/cur", ModerationConfig::GetInboxDir() . "/new", ModerationConfig::GetUnmoderatedDir() . "/cur", ModerationConfig::GetUnmoderatedDir() . "/new", ModerationConfig::GetModeratedDir() . "/cur", ModerationConfig::GetModeratedDir() . "/new");
foreach ($dirs as $dir) {
$files = scandir($dir);
foreach ($files as $file) {
if (is_dir("{$dir}/{$file}")) {
continue;
}
echo "deleting {$dir}/{$file}</br>";
unlink("{$dir}/{$file}");
}
}
$dir = "/home1/ctcweb9/public_html/mailchimp/TestEmails";
$files = scandir($dir);
foreach ($files as $file) {
if (is_dir("{$dir}/{$file}")) {
continue;
}
echo "copying {$dir}/{$file} to " . ModerationConfig::GetInboxDir() . "/cur/{$file}</br>";
file_put_contents(ModerationConfig::GetInboxDir() . "/cur/{$file}", file_get_contents("{$dir}/{$file}"));
}
if (MailChimpSend($listid, $step2SubjectPrefix . $subject, $body, $from, $from, "You") === false) {
$ctcaction = "NOT sent to {$listname} by {$modname} - API call failed";
$action = "warning";
} else {
$ctcaction = "sent to {$listname} by {$modname}";
}
}
}
$captionweb = "This message has just been {$ctcaction}";
if (!$isImg) {
// Add ctcaction to the message
$raw = "ctc-action: {$ctcaction}\n{$raw}";
file_put_contents(ModerationConfig::GetModeratedDir() . "/cur/{$msgid},S=" . strlen($raw), $raw);
unlink($files[0]);
if ($prevaction == "edit") {
file_put_contents(ModerationConfig::GetModeratedDir() . "/cur/{$msgid}.edited.html", "<h3>" . htmlentities($subject) . "</h3>\n{$body}");
}
}
} else {
if ($location == "unmoderated" && $action == "edit") {
$captionimg = "Click to edit before sending or discarding";
$captionweb = "Edit before sending or discarding";
} else {
if ($location == "moderated" && ($action == "undo" || ($action = "retry"))) {
// remove ctcaction from message
$raw = str_replace("ctc-action: {$ctcaction}\n", "", $raw);
file_put_contents(ModerationConfig::GetUnmoderatedDir() . "/cur/{$msgid},S=" . strlen($raw), $raw);
unlink($files[0]);
$ctcaction = "";
$action = "edit";
$captionimg = "Click to edit before sending or discarding";
