コード例 #1
0
ファイル: moderationStep1.php プロジェクト: ctcit/mailchimp
jimport('joomla.mail.mail');
function GetHtmlFromMessage($msg)
{
    if ($msg->getHeader("Content-Transfer-Encoding") == "quoted-printable") {
        return preg_replace_callback("/=[0-9a-f][0-9a-f]|[<>&=]|\n/i", function ($matches) {
            $match = strlen($matches[0]) == 3 ? chr(hexdec($matches[0])) : $matches[0];
            return $matches[0] == "=" ? "" : ($matches[0] == "\n" ? "" : ($match == "<" ? "&lt;" : ($match == ">" ? "&gt;" : ($match == "&" ? "&amp;" : ($match == "\n" ? "<br/>\n" : chr(hexdec($matches[0])))))));
        }, $msg->getPlainBody());
    } else {
        return preg_replace(ModerationConfig::BodyClearPattern, "", $msg->getHtmlBody());
    }
}
$config = JFactory::getConfig();
$live_site = $config->get("live_site");
echo "<style>" . file_get_contents(ModerationConfig::CssFile) . "</style>";
$dirs = array(ModerationConfig::GetInboxDir() . "/new", ModerationConfig::GetInboxDir() . "/cur");
foreach ($dirs as $dir) {
    $files = scandir($dir);
    foreach ($files as $file) {
        if (is_dir("{$dir}/{$file}")) {
            continue;
        }
        $raw = "ctc-id: " . str_replace("-", "", MakeGuid()) . "\n" . file_get_contents("{$dir}/{$file}");
        $msg = new PlancakeEmailParser($raw);
        $msgid = preg_replace('/,.*$/', "", $file);
        $from = $msg->getHeader("From");
        $subject = $msg->getHeader("Subject");
        $ctcid = $msg->getHeader("ctc-id");
        $body = GetHtmlFromMessage($msg);
        $css = ModerationConfig::GetCss();
        $step2Url = $live_site . "/" . ModerationConfig::Step2Url;
コード例 #2
0
<?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}"));
}