Пример #1
0
/**
 * $pMsgHeader is a imap_headerinfo generated array
 **/
function board_sync_process_message($pMbox, $pMsgNum, $pMsgHeader, $pMsgStructure, $pModerate = FALSE, $pLog = FALSE, $pDeliveredTo = NULL)
{
    global $gBitSystem, $gBitDb;
    // vd( $pMsgHeader );
    // Collect a bit of header information
    $message_id = board_sync_get_headerinfo($pMsgHeader, 'message_id');
    // @TODO comment or clean up, not sure why this is here -wjames5
    if (empty($message_id)) {
        $message_id = board_sync_get_headerinfo($pMsgHeader, 'message_id');
    }
    $subject = board_sync_get_headerinfo($pMsgHeader, 'Subject');
    if (empty($message_id)) {
        bit_error_log("Email sync for message: " . $subject . " failed: No Message Id in mail header.");
    } else {
        if ($pLog) {
            print "Processing: " . $message_id . "\n";
        }
        if ($pLog) {
            print "  Subject: " . $subject . "\n";
        }
        $matches = array();
        $toAddresses = array();
        $allRecipients = "";
        if (empty($pDeliveredTo)) {
            if (isset($pMsgHeader->toaddress)) {
                $allRecipients .= $pMsgHeader->toaddress;
                if ($pLog) {
                    print "  To addresses: " . $pMsgHeader->toaddress . "\n";
                }
            }
            if (isset($pMsgHeader->ccaddress)) {
                $allRecipients .= ($allRecipients != "" ? "," : "") . $pMsgHeader->ccaddress;
                if ($pLog) {
                    print "  CC addresses: " . $pMsgHeader->ccaddress . "\n";
                }
            }
            if ($pLog) {
                print "  All Recipients: " . $allRecipients . "\n";
            }
            $allSplit = split(',', $allRecipients);
            foreach ($allSplit as $s) {
                $s = trim($s);
                $matches = array();
                if (strpos($s, '<') !== FALSE) {
                    if (preg_match("/\\s*(.*)\\s*<\\s*(.*)\\s*>/", $s, $matches)) {
                        $toAddresses[] = array('name' => $matches[1], 'email' => $matches[2]);
                    } elseif (preg_match('/<\\s*(.*)\\s*>\\s*(.*)\\s*/', $s, $matches)) {
                        $toAddresses[] = array('email' => $matches[1], 'name' => $matches[2]);
                    }
                } elseif (validate_email_syntax($s)) {
                    $toAddresses[] = array('email' => $s);
                }
            }
        } else {
            foreach ($pDeliveredTo as $address) {
                $toAddresses[] = array('email' => $address);
            }
        }
        if ($pLog) {
            print_r($toAddresses);
        }
        $date = board_sync_get_headerinfo($pMsgHeader, 'Date');
        $from = board_sync_get_headerinfo($pMsgHeader, 'from');
        $fromaddress = $from[0]->mailbox . "@" . $from[0]->host;
        // personal is not always defined.
        if (isset($from[0]->personal)) {
            $personal = ucwords($from[0]->personal);
        } else {
            $personal = null;
        }
        $in_reply_to = board_sync_get_headerinfo($pMsgHeader, 'in_reply_to');
        if ($pLog) {
            print "\n---- " . date("Y-m-d HH:mm:ss") . " -------------------------\nImporting: " . $message_id . "\nDate: " . $date . "\nFrom: " . $fromaddress . "\nTo: " . $allRecipients . "\nSubject: " . $subject . "\nIn Reply To: " . $in_reply_to . "\nName: " . $personal . (is_array($pDeliveredTo) ? "\nDelivered-To:" . implode(", ", $pDeliveredTo) : '') . "\n";
        }
        foreach ($toAddresses as $to) {
            if ($pLog) {
                print "  Processing email: " . strtolower($to['email']) . "\n";
            }
            // get a board match for the email address
            if ($boardContentId = cache_check_content_prefs('board_sync_list_address', strtolower($to['email']), TRUE)) {
                if ($pLog) {
                    print "Found Board Content {$boardContentId} for {$to['email']}\n";
                }
                // Do we already have this message in this board?
                $contentId = NULL;
                if ($message_id != NULL) {
                    $sql = "SELECT `content_id` FROM `" . BIT_DB_PREFIX . "liberty_comments` WHERE `message_guid`=? AND `root_id`=?";
                    $contentId = $gBitDb->getOne($sql, array($message_id, $boardContentId));
                }
                if (empty($contentId)) {
                    if (!empty($in_reply_to)) {
                        if ($parent = $gBitDb->GetRow("SELECT `content_id`, `root_id` FROM `" . BIT_DB_PREFIX . "liberty_comments` WHERE `message_guid`=?", array($in_reply_to))) {
                            $replyId = $parent['content_id'];
                            $rootId = $parent['root_id'];
                        } else {
                            if ($pLog) {
                                print "WARNING: Reply to unfound message: " . $in_reply_to;
                            }
                            $replyId = $boardContentId;
                            $rootId = $boardContentId;
                        }
                        // if no reply to message guid then match on title - this looks dangerous as titles could easily be duplicated -wjames
                    } elseif ($parent = $gBitDb->GetRow("SELECT lcom.`content_id`, lcom.`root_id` FROM `" . BIT_DB_PREFIX . "liberty_comments` lcom INNER JOIN `" . BIT_DB_PREFIX . "liberty_content` lc ON(lcom.`content_id`=lc.`content_id`) WHERE lc.`title`=?", array(preg_replace('/re: /i', '', $subject)))) {
                        $replyId = $parent['content_id'];
                        $rootId = $parent['root_id'];
                        // attach to board as first level comment e.g. new topic
                    } else {
                        $replyId = $boardContentId;
                        $rootId = $boardContentId;
                    }
                    $userInfo = board_sync_get_user($fromaddress);
                    // prep the storage hash
                    $storeRow = array();
                    $storeRow['created'] = strtotime($date);
                    $storeRow['last_modified'] = $storeRow['created'];
                    $storeRow['user_id'] = $userInfo['user_id'];
                    $storeRow['modifier_user_id'] = $userInfo['user_id'];
                    $storeRow['title'] = $subject;
                    $storeRow['message_guid'] = $message_id;
                    if ($userInfo['user_id'] == ANONYMOUS_USER_ID && !empty($personal)) {
                        $storeRow['anon_name'] = $personal;
                    }
                    $storeRow['root_id'] = $rootId;
                    $storeRow['parent_id'] = $replyId;
                    $partHash = array();
                    switch ($pMsgStructure->type) {
                        case '0':
                            if ($pLog) {
                                print "Structure Type: text\n";
                            }
                            board_parse_msg_parts($partHash, $pMbox, $pMsgNum, $pMsgStructure, 1, $pLog);
                            break;
                        case '1':
                            if ($pLog) {
                                print "Structure Type: multipart\n";
                            }
                            if ($pModerate) {
                                $prefix = '2.';
                            } else {
                                $prefix = '';
                            }
                            foreach ($pMsgStructure->parts as $partNum => $part) {
                                board_parse_msg_parts($partHash, $pMbox, $pMsgNum, $part, $prefix . ($partNum + 1), $pLog);
                            }
                            break;
                    }
                    $plainBody = "";
                    $htmlBody = "";
                    foreach (array_keys($partHash) as $i) {
                        if (!empty($partHash[$i]['plain'])) {
                            $plainBody .= $partHash[$i]['plain'];
                        }
                        if (!empty($partHash[$i]['html'])) {
                            $htmlBody .= $partHash[$i]['html'];
                        }
                        if (!empty($partHash[$i]['attachment'])) {
                            $storeRow['_files_override'][] = array('tmp_name' => $partHash[$i]['attachment'], 'type' => $gBitSystem->verifyMimeType($partHash[$i]['attachment']), 'size' => filesize($partHash[$i]['attachment']), 'name' => basename($partHash[$i]['attachment']), 'user_id' => $userInfo['user_id']);
                        }
                    }
                    if (!empty($htmlBody)) {
                        $storeRow['edit'] = $htmlBody;
                        $storeRow['format_guid'] = 'bithtml';
                    } elseif (!empty($plainBody)) {
                        $storeRow['edit'] = nl2br($plainBody);
                        $storeRow['format_guid'] = 'bithtml';
                    }
                    // Nuke all email addresses from the body.
                    if (!empty($storeRow['edit'])) {
                        $storeRow['edit'] = ereg_replace('[-!#$%&\\`*+\\./0-9=?A-Z^_`a-z{|}~]+' . '@' . '(localhost|[-!$%&\'*+\\/0-9=?A-Z^_`a-z{|}~]+\\.' . '[-!$%&\'*+\\./0-9=?A-Z^_`a-z{|}~]+)', '', $storeRow['edit']);
                    }
                    // We trust the user from this source
                    // and count on moderation to handle links
                    global $gBitUser;
                    $gBitUser->setPermissionOverride('p_liberty_trusted_editor', true);
                    // Check to add attachments
                    // NOTE: we temporarily change the gBitUser here!
                    // This is so we can run a proper content permissions check
                    // for attachment permission against the parent
                    // board object. This is sort of a hack to deal
                    // with the fact that LibertyContent does not have a
                    // means to check the permissions of any user except gBitUser -wjames5
                    // Important store a reference so we can switch back when we are done
                    $gBitUserOrg = $gBitUser;
                    // Load the message sending user
                    if ($userInfo['user_id'] != ANONYMOUS_USER_ID) {
                        $userClass = $gBitSystem->getConfig('user_class', 'BitPermUser');
                        $newBitUser = new $userClass($userInfo['user_id']);
                        $newBitUser->load(TRUE);
                    }
                    if (!empty($newBitUser) && $newBitUser->isValid()) {
                        // flip gBitUser to our message sender
                        $gBitUser = $newBitUser;
                    }
                    // Load the parent board
                    $board = new BitBoard(NULL, $boardContentId);
                    $board->load();
                    // Check the permission for the user on the board
                    if ($gBitSystem->isFeatureActive('comments_allow_attachments') && $board->hasUserPermission('p_liberty_attach_attachments')) {
                        // note we grant the permission to the anonymous user which will become gBitUser once again
                        $gBitUserOrg->setPermissionOverride('p_liberty_attach_attachments', true);
                    }
                    // Clear the reference to this board so we dont mistakenly use it later
                    unset($board);
                    // Important: switch gBitUser back!
                    $gBitUser = $gBitUserOrg;
                    // End check to add attachments to comments to the parent board
                    // Check for an empty body
                    // Duplicate subject if we have it
                    if (empty($storeRow['edit'])) {
                        if (!empty($storeRow['title'])) {
                            $storeRow['edit'] = $storeRow['title'];
                        } else {
                            $storeRow['edit'] = ".";
                        }
                    }
                    $storeComment = new LibertyComment(NULL);
                    $gBitDb->StartTrans();
                    if ($storeComment->storeComment($storeRow)) {
                        // undo the attachment permission
                        $gBitUser->setPermissionOverride('p_liberty_attach_attachments', false);
                        // set moderation approval
                        if (!$pModerate && $gBitSystem->isPackageActive('moderation') && $gBitSystem->isPackageActive('modcomments')) {
                            global $gModerationSystem, $gBitUser;
                            $moderation = $gModerationSystem->getModeration(NULL, $storeComment->mContentId);
                            if (!empty($moderation)) {
                                // Allow to moderate
                                $gBitUser->setPermissionOverride('p_admin', TRUE);
                                $gModerationSystem->setModerationReply($moderation['moderation_id'], MODERATION_APPROVED);
                                $gBitUser->setPermissionOverride('p_admin', FALSE);
                            }
                        }
                        if (!empty($storeRow['message_guid'])) {
                            // map the message guid to the comment
                            $storeComment->mDb->query("UPDATE `" . BIT_DB_PREFIX . "liberty_comments` SET `message_guid`=? WHERE `content_id`=?", array($storeRow['message_guid'], $storeComment->mContentId));
                            // Store the confirm code
                            if ($pModerate) {
                                $storeComment->storePreference('board_confirm_code', $pModerate);
                            }
                            // done
                            $gBitDb->CompleteTrans();
                            return TRUE;
                        } else {
                            bit_error_log("Email sync error: Message Id not set. You shouldn't have even gotten this far.");
                            $gBitDb->RollbackTrans();
                            return FALSE;
                        }
                    } else {
                        if (count($storeComment->mErrors) == 1 && !empty($storeComment->mErrors['store']) && $storeComment->mErrors['store'] == 'Duplicate comment.') {
                            return TRUE;
                        } else {
                            foreach ($storeComment->mErrors as $error) {
                                bit_error_log($error);
                            }
                            $gBitDb->RollbackTrans();
                            return FALSE;
                        }
                    }
                } else {
                    if ($pLog) {
                        print "Message Exists: {$contentId} : {$boardContentId} : {$message_id} : {$pModerate}\n";
                    }
                    // If this isn't a moderation message
                    if ($pModerate === FALSE) {
                        // If the message exists it must have been approved via some
                        // moderation mechanism, so make sure it is available
                        if ($gBitSystem->isPackageActive('moderation') && $gBitSystem->isPackageActive('modcomments')) {
                            global $gModerationSystem, $gBitUser;
                            $storeComment = new LibertyComment(NULL, $contentId);
                            $storeComment->loadComment();
                            if ($storeComment->mInfo['content_status_id'] > 0) {
                                if ($pLog) {
                                    print "Already approved: {$contentId}\n";
                                }
                            } else {
                                $moderation = $gModerationSystem->getModeration(NULL, $contentId);
                                //				vd($moderation);
                                if (!empty($moderation)) {
                                    $gBitUser->setPermissionOverride('p_admin', TRUE);
                                    if ($pLog) {
                                        print "Setting approved: {$contentId}\n";
                                    }
                                    $gModerationSystem->setModerationReply($moderation['moderation_id'], MODERATION_APPROVED);
                                    $gBitUser->setPermissionOverride('p_admin', FALSE);
                                    if ($pLog) {
                                        print "Done";
                                    }
                                } else {
                                    if ($pLog) {
                                        print "ERROR: Unable to find moderation to approve for: {$contentId}";
                                    }
                                }
                            }
                        }
                    } else {
                        // Store the approve code;
                        if ($pLog) {
                            print "Storing approval code: " . $contentId . ":" . $pModerate . "\n";
                        }
                        $storeComment = new LibertyComment(NULL, $contentId);
                        $storeComment->storePreference('board_confirm_code', $pModerate);
                    }
                    return TRUE;
                }
            } else {
                if ($pLog) {
                    print "No Board match found for {$to['email']}\n";
                }
            }
        }
    }
    return FALSE;
}