plugins/listcommands/functions.php

   1 <?php
   2
   3 /**
   4  * functions.php
   5  *
   6  * Copyright (c) 1999-2005 The SquirrelMail Project Team
   7  * Licensed under the GNU GPL. For full terms see the file COPYING.
   8  *
   9  * Implementation of RFC 2369 for SquirrelMail.
  10  * When viewing a message from a mailinglist complying with this RFC,
  11  * this plugin displays a menu which gives the user a choice of mailinglist
  12  * commands such as (un)subscribe, help and list archives.
  13  *
  14  * @version $Id$
  15  * @package plugins
  16  * @subpackage listcommands
  17  */
  18
  19 /**
  20  * internal function that builds mailing list links
  21  */
  22 function plugin_listcommands_menu_do() {
  23     global $passed_id, $passed_ent_id, $color, $mailbox, $message, $startMessage;
  24
  25     /**
  26      * Array of commands we can deal with from the header. The Reply option
  27      * is added later because we generate it using the Post information.
  28      */
  29     $fieldsdescr = listcommands_fieldsdescr();
  30     $output = array();
  31
  32     foreach ($message->rfc822_header->mlist as $cmd => $actions) {
  33
  34         /* I don't know this action... skip it */
  35         if ( !array_key_exists($cmd, $fieldsdescr) ) {
  36             continue;
  37         }
  38
  39         /* proto = {mailto,href} */
  40         $proto = array_shift(array_keys($actions));
  41         $act   = array_shift($actions);
  42
  43         if ($proto == 'mailto') {
  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             }
  51             $url .= 'send_to=' . str_replace('?','&amp;', $act);
  52
  53             $output[] = makeComposeLink($url, $fieldsdescr[$cmd]);
  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
  63                 $output[] = makeComposeLink($url, $fieldsdescr['reply']);
  64             }
  65         } else if ($proto == 'href') {
  66             $output[] = '<a href="' . $act . '" target="_blank">'
  67                 . $fieldsdescr[$cmd] . '</a>';
  68         }
  69     }
  70
  71     if (count($output) > 0) {
  72         echo '<tr>' .
  73             html_tag('td', '<b>' . _("Mailing List") . ':&nbsp;&nbsp;</b>',
  74                     'right', '', 'valign="middle" width="20%"') . "\n" .
  75             html_tag('td', '<small>' . implode('&nbsp;|&nbsp;', $output) . '</small>',
  76                     'left', $color[0], 'valign="middle" width="80%"') . "\n" .
  77             '</tr>';
  78     }
  79 }
  80
  81 /**
  82  * Returns an array with the actions as translated strings.
  83  * @return array action as key, translated string as value
  84  */
  85 function listcommands_fieldsdescr() {
  86     return array('post'   => _("Post to List"),
  87             'reply'       => _("Reply to List"),
  88             'subscribe'   => _("Subscribe"),
  89             'unsubscribe' => _("Unsubscribe"),
  90             'archive'     => _("List Archives"),
  91             'owner'       => _("Contact Listowner"),
  92             'help'        => _("Help"));
  93 }
  94
  95 ?>