include/banana/hooks.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2007 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 require_once 'banana/banana.inc.php';
  23
  24 function hook_formatDisplayHeader($_header, $_text, $in_spool = false)
  25 {
  26     switch ($_header) {
  27       case 'from': case 'to': case 'cc': case 'reply-to':
  28         $addresses = preg_split("/ *, */", $_text);
  29         $text = '';
  30         foreach ($addresses as $address) {
  31             $address = BananaMessage::formatFrom(trim($address));
  32             if ($_header == 'from') {
  33                 if ($id = Banana::$message->getHeaderValue('x-org-id')) {
  34                     return $address . ' <a href="profile/' . $id . '" class="popup2" title="' . $id . '">'
  35                         . '<img src="images/icons/user_suit.gif" title="fiche" alt="" /></a>';
  36                 } elseif ($id = Banana::$message->getHeaderValue('x-org-mail')) {
  37                     list($id, $domain) = explode('@', $id);
  38                     return $address . ' <a href="profile/' . $id . '" class="popup2" title="' . $id . '">'
  39                         . '<img src="images/icons/user_suit.gif" title="fiche" alt="" /></a>';
  40                 } else {
  41                     return $address;
  42                 }
  43             }
  44             if (!empty($text)) {
  45                 $text .= ', ';
  46             }
  47             $text .= $address;
  48         }
  49         return $text;
  50
  51       case 'subject':
  52         $link = null;
  53         $text = stripslashes($_text);
  54         if (preg_match('/^(.+?)\s*\[=> (.*?)\]\s*$/u', $text, $matches)) {
  55             $text = $matches[1];
  56             $group = $matches[2];
  57             if (Banana::$group == $group) {
  58                 $link = ' [=>&nbsp;' . $group . ']';
  59             } else {
  60                 $link = ' [=>&nbsp;' . Banana::$page->makeLink(array('group' => $group, 'text' => $group)) . ']';
  61             }
  62         }
  63         $text = banana_catchFormats(banana_htmlentities($text));
  64         if ($in_spool) {
  65             return array($text, $link);
  66         }
  67         return $text . $link;
  68     }
  69     return null;
  70 }
  71
  72 function hook_platalRSS($group)
  73 {
  74     if ($group) {
  75         $group .= '/';
  76     } else {
  77         $group = '';
  78     }
  79     return '/rss/' . $group . S::v('forlife') . '/' . S::v('core_rss_hash') . '/rss.xml';
  80 }
  81
  82 function hook_platalMessageLink($params)
  83 {
  84     $base = '';
  85     if (isset($params['first'])) {
  86         return $base . '/from/' . $params['first'];
  87     }
  88     if (isset($params['artid'])) {
  89         if (@$params['part'] == 'xface') {
  90             $base .= '/xface';
  91         } elseif (@$params['action'] == 'new') {
  92             $base .= '/reply';
  93         } elseif (@$params['action'] == 'cancel') {
  94             $base .= '/cancel';
  95         } elseif (@$params['part']) {
  96             if (strpos($params['part'], '.') !== false) {
  97                 $params['artid'] .= '?part=' . urlencode($params['part']);
  98                 $base = '/read';
  99             } else {
 100                 $base .= '/' . str_replace('/', '.', $params['part']);
 101             }
 102         } else {
 103             $base .= '/read';
 104         }
 105         return $base . '/' . $params['artid'];
 106     }
 107
 108     if (@$params['action'] == 'new') {
 109         return $base . '/new';
 110     }
 111     return $base;
 112 }
 113
 114 function hook_makeImg($img, $alt, $height, $width)
 115 {
 116     $url = 'images/banana/' . $img;
 117
 118     if (!is_null($width)) {
 119         $width = ' width="' . $width . '"';
 120     }
 121     if (!is_null($height)) {
 122         $height = ' height="' . $height . '"';
 123     }
 124
 125     return '<img src="' . $url . '"' . $height . $width . ' alt="' . $alt . '" />';
 126 }
 127
 128 if (!function_exists('hook_makeLink')) {
 129 function hook_makeLink($params)
 130 {
 131     global $globals, $platal;
 132     $xnet = !empty($GLOBALS['IS_XNET_SITE']);
 133     $feed = (@$params['action'] == 'rss' || @$params['action'] == 'rss2' || @$params['action'] == 'atom');
 134     if (Banana::$protocole->name() == 'NNTP' && !$xnet) {
 135         $base = $globals->baseurl . '/banana';
 136         if ($feed) {
 137             return $base . hook_platalRSS(@$params['group']);
 138         }
 139         if (isset($params['page'])) {
 140             return $base . '/' . $params['page'];
 141         }
 142         if (@$params['action'] == 'subscribe') {
 143             return $base . '/subscription';
 144         }
 145
 146         if (!isset($params['group'])) {
 147             return $base;
 148         }
 149         $base .= '/' . $params['group'];
 150     } else if (Banana::$protocole->name() == 'NNTP' && $xnet) {
 151         if ($feed) {
 152             return 'http://www.polytechnique.org/banana' . hook_platalRSS(@$params['group']);
 153         }
 154         $base = $globals->baseurl . '/' . $platal->ns . 'forum';
 155     } else if (Banana::$protocole->name() == 'MLArchives') {
 156         $base = $globals->baseurl . '/' . $platal->ns . 'lists/archives';
 157         if ($feed) {
 158             return $base . hook_platalRSS(MLBanana::$listname);
 159         }
 160         $base .= '/' . MLBanana::$listname;
 161     }
 162     $base = $base . hook_platalMessageLink($params);
 163     if (@$params['action'] == 'showext') {
 164         $base .= '?action=showext';
 165     }
 166     return $base;
 167 }
 168 }
 169
 170 function get_banana_params(array &$get, $group = null, $action = null, $artid = null)
 171 {
 172     if (!is_null($group)) {
 173         $get['group'] = $group;
 174     }
 175     if (!is_null($action)) {
 176         if ($action == 'new') {
 177             $get['action'] = 'new';
 178         } elseif (!is_null($artid)) {
 179             $get['artid'] = $artid;
 180             if ($action == 'reply') {
 181                 $get['action'] = 'new';
 182             } elseif ($action == 'cancel') {
 183                 $get['action'] = $action;
 184             } elseif ($action == 'from') {
 185                 $get['first'] = $artid;
 186                 unset($get['artid']);
 187             } elseif ($action == 'read') {
 188                 $get['part']  = @$_GET['part'];
 189             } elseif ($action == 'source') {
 190                 $get['part'] = 'source';
 191             } elseif ($action == 'xface') {
 192                 $get['part']  = 'xface';
 193             } elseif ($action) {
 194                 $get['part'] = str_replace('.', '/', $action);
 195             }
 196             if (Get::v('action') == 'showext') {
 197                 $get['action'] = 'showext';
 198             }
 199         }
 200     }
 201 }
 202
 203 function run_banana(&$page, $class, array $args)
 204 {
 205     $banana = new $class(S::v('forlife'), $args);
 206     $page->assign('banana', $banana->run());
 207     $page->addCssInline($banana->css());
 208     $page->addCssLink('banana.css');
 209     $rss = $banana->feed();
 210     if ($rss) {
 211         if (Banana::$group) {
 212             $page->setRssLink('Banana :: ' . Banana::$group, $rss);
 213         } else {
 214             $page->setRssLink('Banana :: Abonnements', $rss);
 215         }
 216     }
 217     $bt = $banana->backtrace();
 218     if ($bt) {
 219         new PlBacktrace(Banana::$protocole->name(), $banana->backtrace(), 'response', 'time');
 220     }
 221 }
 222
 223 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 224 ?>