Correct CVS Id tag
[squirrelmail.git] / plugins / listcommands / functions.php
CommitLineData
793566f0 1<?php
2
3/**
4 * functions.php
5 *
793566f0 6 * Implementation of RFC 2369 for SquirrelMail.
7 * When viewing a message from a mailinglist complying with this RFC,
8 * this plugin displays a menu which gives the user a choice of mailinglist
9 * commands such as (un)subscribe, help and list archives.
10 *
47ccfad4 11 * @copyright &copy; 1999-2006 The SquirrelMail Project Team
4b4abf93 12 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
793566f0 13 * @version $Id$
14 * @package plugins
15 * @subpackage listcommands
16 */
17
f4f2d73f 18/**
19 * internal function that builds mailing list links
20 */
793566f0 21function plugin_listcommands_menu_do() {
22 global $passed_id, $passed_ent_id, $color, $mailbox, $message, $startMessage;
23
24 /**
25 * Array of commands we can deal with from the header. The Reply option
26 * is added later because we generate it using the Post information.
27 */
28 $fieldsdescr = listcommands_fieldsdescr();
2e58d6af 29 $links = array();
793566f0 30
31 foreach ($message->rfc822_header->mlist as $cmd => $actions) {
32
33 /* I don't know this action... skip it */
34 if ( !array_key_exists($cmd, $fieldsdescr) ) {
35 continue;
36 }
37
38 /* proto = {mailto,href} */
ba17b6c7 39 $aActions = array_keys($actions);
40 $proto = array_shift($aActions);
2253d920 41 $act = array_shift($actions);
793566f0 42
2e58d6af 43 if (1||$proto == 'mailto') {
793566f0 44
45 if (($cmd == 'post') || ($cmd == 'owner')) {
46 $url = 'src/compose.php?'.
47 (isset($startMessage)?'startMessage='.$startMessage.'&amp;':'');
48 } else {
49 $url = "plugins/listcommands/mailout.php?action=$cmd&amp;";
50 }
a74103dd 51 $url .= 'send_to=' . str_replace('?','&amp;', $act);
793566f0 52
2e58d6af 53 $links[] = makeComposeLink($url, $fieldsdescr[$cmd]);
793566f0 54
55 if ($cmd == 'post') {
56 if (!isset($mailbox))
57 $mailbox = 'INBOX';
58 $url .= '&amp;passed_id='.$passed_id.
59 '&amp;mailbox='.urlencode($mailbox).
60 (isset($passed_ent_id)?'&amp;passed_ent_id='.$passed_ent_id:'');
61 $url .= '&amp;smaction=reply';
62
2e58d6af 63 $links[] = makeComposeLink($url, $fieldsdescr['reply']);
793566f0 64 }
65 } else if ($proto == 'href') {
2e58d6af 66 $links[] = '<a href="' . $act . '" target="_blank">'
793566f0 67 . $fieldsdescr[$cmd] . '</a>';
68 }
69 }
70
2e58d6af 71 if (count($links) > 0) {
72 global $oTemplate;
73 $oTemplate->assign('links', $links);
74 $output = $oTemplate->fetch('plugins/listcommands/read_body_header.tpl');
75 return array('read_body_header' => $output);
793566f0 76 }
2e58d6af 77
793566f0 78}
79
80/**
81 * Returns an array with the actions as translated strings.
82 * @return array action as key, translated string as value
83 */
84function listcommands_fieldsdescr() {
85 return array('post' => _("Post to List"),
86 'reply' => _("Reply to List"),
87 'subscribe' => _("Subscribe"),
88 'unsubscribe' => _("Unsubscribe"),
89 'archive' => _("List Archives"),
90 'owner' => _("Contact Listowner"),
91 'help' => _("Help"));
92}
93