include/banana/hooks.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2008 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), Banana::$message->getHeaderValue('subject'));
  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     global $globals;
 117     $url = $globals->baseurl . '/images/banana/' . $img;
 118
 119     if (!is_null($width)) {
 120         $width = ' width="' . $width . '"';
 121     }
 122     if (!is_null($height)) {
 123         $height = ' height="' . $height . '"';
 124     }
 125
 126     return '<img src="' . $url . '"' . $height . $width . ' alt="' . $alt . '" />';
 127 }
 128
 129 if (!function_exists('hook_makeLink')) {
 130 function hook_makeLink($params)
 131 {
 132     global $globals, $platal;
 133     $xnet = !empty($GLOBALS['IS_XNET_SITE']);
 134     $feed = (@$params['action'] == 'rss' || @$params['action'] == 'rss2' || @$params['action'] == 'atom');
 135     if (Banana::$protocole->name() == 'NNTP' && !$xnet) {
 136         $base = $globals->baseurl . '/banana';
 137         if ($feed) {
 138             return $base . hook_platalRSS(@$params['group']);
 139         }
 140         if (isset($params['page'])) {
 141             return $base . '/' . $params['page'];
 142         }
 143         if (@$params['action'] == 'subscribe') {
 144             return $base . '/subscribe';
 145         }
 146
 147         if (!isset($params['group'])) {
 148             return $base;
 149         }
 150         $base .= '/' . $params['group'];
 151     } else if (Banana::$protocole->name() == 'NNTP' && $xnet) {
 152         if ($feed) {
 153             return $globals->baseurl . '/banana' . hook_platalRSS(@$params['group']);
 154         }
 155         $base = $globals->baseurl . '/' . $platal->ns . 'forum';
 156     } else if (Banana::$protocole->name() == 'MLArchives') {
 157         if ($feed) {
 158             return $globals->baseurl . '/' . $platal->ns . hook_platalRSS(MLBanana::$listname);
 159         } elseif (php_sapi_name() == 'cli') {
 160             $base = "http://listes.polytechnique.org/archives/" . str_replace('@', '_', $params['group']);
 161         } else {
 162             $base = $globals->baseurl . '/' . $platal->ns . 'lists/archives/' . MLBanana::$listname;
 163         }
 164     }
 165     $base = $base . hook_platalMessageLink($params);
 166     if (@$params['action'] == 'showext') {
 167         $base .= '?action=showext';
 168     }
 169     return $base;
 170 }
 171 }
 172
 173 function hook_hasXFace($headers)
 174 {
 175     return isset($headers['x-org-id']) || isset($headers['x-org-mail']);
 176 }
 177
 178 function hook_getXFace($headers)
 179 {
 180     $login = @$headers['x-org-id'];
 181     if (!$login) {
 182         @list($login, ) = explode('@', $headers['x-org-mail']);
 183     }
 184     if (!$login) {
 185         return false;
 186     }
 187     if (isset($headers['x-face'])) {
 188         $res = XDB::query("SELECT  p.uid
 189                              FROM  forums.profils AS p
 190                        INNER JOIN  aliases AS a ON (p.uid = a.id)
 191                             WHERE  FIND_IN_SET('xface', p.flags) AND a.alias = {?}",
 192                           $login);
 193         if ($res->numRows()) {
 194             return false;
 195         }
 196     }
 197     global $globals;
 198     http_redirect($global->baseurl . '/photo/' . $login);
 199 }
 200
 201 function hook_makeJs($src)
 202 {
 203     global $page;
 204     $page->addJsLink("$src.js");
 205     return ' ';
 206 }
 207
 208 function make_Organization()
 209 {
 210     global $globals;
 211     $perms = S::v('perms');
 212     $group = $globals->asso('nom');
 213     if (S::has_perms()) {
 214         return "Administrateur de Polytechnique.org";
 215     } else if ($group && $perms->hasFlag('groupadmin')) {
 216         return "Animateur de $group";
 217     } else if ($group && $perms->hasFlag('groupmember')) {
 218         return "Membre de $group";
 219     }
 220     return "Utilisateur de Polytechnique.org";
 221 }
 222
 223 function get_banana_params(array &$get, $group = null, $action = null, $artid = null)
 224 {
 225     if ($group == 'forums') {
 226         $group = null;
 227     } else if ($group == 'thread') {
 228         $group = S::v('banana_group');
 229     } else if ($group == 'message') {
 230         $action = 'read';
 231         $group  = S::v('banana_group');
 232         $artid  = S::i('banana_artid');
 233     } else if ($action == 'message') {
 234         $action = 'read';
 235         $artid  = S::i('banana_artid');
 236     } else if ($group == 'subscribe' || $group == 'subscription') {
 237         $group  = null;
 238         $action = null;
 239         $get['action'] = 'subscribe';
 240     } else if ($group == 'profile') {
 241         $group  = null;
 242         $action = null;
 243         $get['action'] = 'profile';
 244     }
 245     if (!is_null($group)) {
 246         $get['group'] = $group;
 247     }
 248     if (!is_null($action)) {
 249         if ($action == 'new') {
 250             $get['action'] = 'new';
 251         } elseif (!is_null($artid)) {
 252             $get['artid'] = $artid;
 253             if ($action == 'reply') {
 254                 $get['action'] = 'new';
 255             } elseif ($action == 'cancel') {
 256                 $get['action'] = $action;
 257             } elseif ($action == 'from') {
 258                 $get['first'] = $artid;
 259                 unset($get['artid']);
 260             } elseif ($action == 'read') {
 261                 $get['part']  = @$_GET['part'];
 262             } elseif ($action == 'source') {
 263                 $get['part'] = 'source';
 264             } elseif ($action == 'xface') {
 265                 $get['part']  = 'xface';
 266             } elseif ($action) {
 267                 $get['part'] = str_replace('.', '/', $action);
 268             }
 269             if (Get::v('action') == 'showext') {
 270                 $get['action'] = 'showext';
 271             }
 272         }
 273     }
 274 }
 275
 276 class PlatalBananaPage extends BananaPage
 277 {
 278     protected $handler;
 279     protected $base;
 280
 281     public function __construct()
 282     {
 283         global $platal;
 284         Banana::$withtabs = false;
 285         $this->handler = 'BananaHandler';
 286         $this->base    = $platal->pl_self(0);
 287         parent::__construct();
 288     }
 289
 290     protected function prepare()
 291     {
 292         $tpl = parent::prepare();
 293         global $wiz, $page;
 294         $wiz = new PlWizard('Banana', 'core/plwizard.tpl', true, false);
 295         foreach ($this->pages as $name=>&$mpage) {
 296             $wiz->addPage($this->handler, $mpage['text'], $name);
 297         }
 298         $wiz->apply($page, $this->base, $this->page);
 299         return $tpl;
 300     }
 301 }
 302
 303 class BananaHandler
 304 {
 305     public function __construct(PlWizard &$wiz)
 306     {
 307     }
 308
 309     public function template()
 310     {
 311         return 'banana/index.tpl';
 312     }
 313
 314     public function prepare(PlatalPage &$page, $id)
 315     {
 316     }
 317
 318     public function process()
 319     {
 320         return PlWizard::CURRENT_PAGE;
 321     }
 322 }
 323
 324 function run_banana(&$page, $class, array $args)
 325 {
 326     $banana = new $class(S::v('forlife'), $args);
 327     $page->assign('banana', $banana->run());
 328     $page->addCssInline($banana->css());
 329     $page->addCssLink('banana.css');
 330     $rss = $banana->feed();
 331     if ($rss) {
 332         if (Banana::$group) {
 333             $page->setRssLink('Banana :: ' . Banana::$group, $rss);
 334         } else {
 335             $page->setRssLink('Banana :: Abonnements', $rss);
 336         }
 337     }
 338     $bt = $banana->backtrace();
 339     if ($bt) {
 340         new PlBacktrace(Banana::$protocole->name(), $banana->backtrace(), 'response', 'time');
 341     }
 342 }
 343
 344 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 345 ?>