96 lines
No EOL
3.2 KiB
PHP
96 lines
No EOL
3.2 KiB
PHP
<?php
|
|
|
|
/**
|
|
* functions.php
|
|
*
|
|
* Copyright (c) 1999-2005 The SquirrelMail Project Team
|
|
* Licensed under the GNU GPL. For full terms see the file COPYING.
|
|
*
|
|
* Implementation of RFC 2369 for SquirrelMail.
|
|
* When viewing a message from a mailinglist complying with this RFC,
|
|
* this plugin displays a menu which gives the user a choice of mailinglist
|
|
* commands such as (un)subscribe, help and list archives.
|
|
*
|
|
* @version $Id$
|
|
* @package plugins
|
|
* @subpackage listcommands
|
|
*/
|
|
|
|
/**
|
|
* internal function that builds mailing list links
|
|
*/
|
|
function plugin_listcommands_menu_do() {
|
|
global $passed_id, $passed_ent_id, $color, $mailbox, $message, $startMessage;
|
|
|
|
/**
|
|
* 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();
|
|
$output = 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);
|
|
$proto = array_shift($aActions);
|
|
$act = array_shift($actions);
|
|
|
|
if ($proto == 'mailto') {
|
|
|
|
if (($cmd == 'post') || ($cmd == 'owner')) {
|
|
$url = 'src/compose.php?'.
|
|
(isset($startMessage)?'startMessage='.$startMessage.'&':'');
|
|
} else {
|
|
$url = "plugins/listcommands/mailout.php?action=$cmd&";
|
|
}
|
|
$url .= 'send_to=' . str_replace('?','&', $act);
|
|
|
|
$output[] = 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';
|
|
|
|
$output[] = makeComposeLink($url, $fieldsdescr['reply']);
|
|
}
|
|
} else if ($proto == 'href') {
|
|
$output[] = '<a href="' . $act . '" target="_blank">'
|
|
. $fieldsdescr[$cmd] . '</a>';
|
|
}
|
|
}
|
|
|
|
if (count($output) > 0) {
|
|
echo '<tr>' .
|
|
html_tag('td', '<b>' . _("Mailing List") . ': </b>',
|
|
'right', '', 'valign="middle" width="20%"') . "\n" .
|
|
html_tag('td', '<small>' . implode(' | ', $output) . '</small>',
|
|
'left', $color[0], 'valign="middle" width="80%"') . "\n" .
|
|
'</tr>';
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Returns an array with the actions as translated strings.
|
|
* @return array action as key, translated string as value
|
|
*/
|
|
function listcommands_fieldsdescr() {
|
|
return array('post' => _("Post to List"),
|
|
'reply' => _("Reply to List"),
|
|
'subscribe' => _("Subscribe"),
|
|
'unsubscribe' => _("Unsubscribe"),
|
|
'archive' => _("List Archives"),
|
|
'owner' => _("Contact Listowner"),
|
|
'help' => _("Help"));
|
|
}
|
|
|
|
?>
|