* @copyright 1999-2016 The SquirrelMail Project Team
* @license http://opensource.org/licenses/gpl-license.php GNU Public License
* @version $Id$
* @package plugins
* @subpackage listcommands
*/
include_once '../../include/init.php';
include_once SM_PATH . 'plugins/listcommands/functions.php';
global $listcommands_allow_non_rfc_list_management, $data_dir, $username;
// only allow management of non-RFC lists if admin deems necessary
//
@(include_once SM_PATH . 'plugins/listcommands/config.php');
if (!$listcommands_allow_non_rfc_list_management) {
return;
}
$lists = get_non_rfc_lists();
// remove list?
//
if (sqGetGlobalVar('deletelist', $deletelist, SQ_FORM) && is_array($deletelist) && !empty($deletelist)) {
// interface currently does not support multiple deletions at once
// but we'll support it here anyway -- the index values of this
// array are the only thing we care about and need to be the
// index number of the list to be deleted
//
foreach (array_keys($deletelist) as $index) {
unset($lists[$index]);
}
sort($lists);
$temp_lists = array();
foreach ($lists as $index => $list_addr) {
$temp_lists[] = $index . '_' . $list_addr;
/**
* internal function that builds mailing list links
*/
function plugin_listcommands_menu_do()
{
global $passed_id, $passed_ent_id, $mailbox, $message, $startMessage, $oTemplate, $listcommands_allow_non_rfc_list_management;
@(include_once SM_PATH . 'plugins/listcommands/config.php');
/**
* Array of commands we can deal with from the header. The Reply option
* is added later because we generate it using the Post information.
*/
$fieldsdescr = listcommands_fieldsdescr();
$links = array();
foreach ($message->rfc822_header->mlist as $cmd => $actions) {
/* I don't know this action... skip it */
if (!array_key_exists($cmd, $fieldsdescr)) {
continue;
}
/* proto = {mailto,href} */
$aActions = array_keys($actions);
// note that we only use the first cmd/action, ignore the rest
$proto = array_shift($aActions);
$act = array_shift($actions);
if ($proto == 'mailto') {
$identity = '';
if ($cmd == 'post' || $cmd == 'owner') {
$url = 'src/compose.php?' . (isset($startMessage) ? 'startMessage=' . $startMessage . '&' : '');
} else {
$url = "plugins/listcommands/mailout.php?action={$cmd}&";
// try to find which identity the mail should come from
include_once SM_PATH . 'functions/identity.php';
$idents = get_identities();
// ripped from src/compose.php
$identities = array();
if (count($idents) > 1) {
foreach ($idents as $nr => $data) {
$enc_from_name = '"' . $data['full_name'] . '" <' . $data['email_address'] . '>';
$identities[] = $enc_from_name;
}
$identity_match = $message->rfc822_header->findAddress($identities);
if ($identity_match !== FALSE) {
$identity = $identity_match;
}
}
}
// if things like subject are given, peel them off and give
// them to src/compose.php as is (not encoded)
if (strpos($act, '?') > 0) {
list($act, $parameters) = explode('?', $act, 2);
$parameters = '&identity=' . $identity . '&' . $parameters;
} else {
$parameters = '&identity=' . $identity;
}
$url .= 'send_to=' . urlencode($act) . $parameters;
$links[$cmd] = makeComposeLink($url, $fieldsdescr[$cmd]);
if ($cmd == 'post') {
if (!isset($mailbox)) {
$mailbox = 'INBOX';
}
$url .= '&passed_id=' . $passed_id . '&mailbox=' . urlencode($mailbox) . (isset($passed_ent_id) ? '&passed_ent_id=' . $passed_ent_id : '');
$url .= '&smaction=reply';
$links['reply'] = makeComposeLink($url, $fieldsdescr['reply']);
}
} else {
if ($proto == 'href') {
$links[$cmd] = create_hyperlink($act, $fieldsdescr[$cmd], '_blank');
}
}
}
// allow non-rfc reply link if admin allows and message is from
// non-rfc list the user has configured
//
if ($listcommands_allow_non_rfc_list_management) {
$non_rfc_lists = get_non_rfc_lists();
$recipients = formatRecipientString($message->rfc822_header->to, "to") . ' ' . formatRecipientString($message->rfc822_header->cc, "cc") . ' ' . formatRecipientString($message->rfc822_header->bcc, "bcc");
if (!in_array('post', array_keys($links))) {
foreach ($non_rfc_lists as $non_rfc_list) {
if (preg_match('/(^|,|<|\\s)' . preg_quote($non_rfc_list) . '($|,|>|\\s)/', $recipients)) {
$url = 'src/compose.php?' . (isset($startMessage) ? 'startMessage=' . $startMessage . '&' : '') . 'send_to=' . str_replace('?', '&', $non_rfc_list);
$links['post'] = makeComposeLink($url, $fieldsdescr['post']);
break;
}
}
}
if (!in_array('reply', array_keys($links))) {
foreach ($non_rfc_lists as $non_rfc_list) {
if (preg_match('/(^|,|\\s)' . preg_quote($non_rfc_list) . '($|,|\\s)/', $recipients)) {
if (!isset($mailbox)) {
$mailbox = 'INBOX';
}
$url = 'src/compose.php?' . (isset($startMessage) ? 'startMessage=' . $startMessage . '&' : '') . 'send_to=' . str_replace('?', '&', $non_rfc_list) . '&passed_id=' . $passed_id . '&mailbox=' . urlencode($mailbox) . (isset($passed_ent_id) ? '&passed_ent_id=' . $passed_ent_id : '') . '&smaction=reply';
$links['reply'] = makeComposeLink($url, $fieldsdescr['reply']);
break;
}
}
}
}
if (count($links) > 0) {
$oTemplate->assign('links', $links);
$output = $oTemplate->fetch('plugins/listcommands/read_body_header.tpl');
return array('read_body_header' => $output);
}
}
