* @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); } }