modules/banana/banana.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2006 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) {
  25     global $banana;
  26     if ($_header == 'from') {
  27         $id = $banana->post->headers['x-org-id'];
  28         $_text = formatFrom($_text);
  29         return $_text . ' <a href="profile/' . $id . '" class="popup2" title="' . $id . '">'
  30              . '<img src="images/icons/user_suit.gif" title="fiche" /></a>';
  31     }
  32 }
  33
  34 function hook_checkcancel($_headers) {
  35     return ($_headers['x-org-id'] == S::v('forlife') or S::has_perms());
  36 }
  37
  38 function hook_shortcuts()
  39 {
  40     return array('profile' => array('<a href="banana/profile">Préférences</a>',
  41                                     'Préférences'));
  42 }
  43
  44 function hook_makeLink($params) {
  45     global $globals;
  46     $base = $globals->baseurl . '/banana';
  47     if ($params['subscribe'] == 1) {
  48         return $base . '/subscription';
  49     }
  50     if (isset($params['xface'])) {
  51         return $base . '/xface/' . strtr(base64_encode($params['xface']), '+/', '.:');
  52     }
  53
  54     if (!isset($params['group'])) {
  55         return $base;
  56     }
  57     $base .= '/' . $params['group'];
  58
  59     if (isset($params['first'])) {
  60         return $base . '/from/' . $params['first'];
  61     }
  62     if (isset($params['artid'])) {
  63         if ($params['action'] == 'new') {
  64             $base .= '/reply';
  65         } elseif ($params['action'] == 'cancel') {
  66             $base .= '/cancel';
  67         } else {
  68             $base .= '/read';
  69         }
  70         return $base . '/' . $params['artid'];
  71     }
  72
  73     if ($params['action'] == 'new') {
  74         return $base . '/new';
  75     }
  76     return $base;
  77 }
  78
  79 function hook_makeImg($img, $alt, $height, $width)
  80 {
  81     $url = 'images/banana/' . $img;
  82
  83     if (!is_null($width)) {
  84         $width = ' width="' . $width . '"';
  85     }
  86     if (!is_null($height)) {
  87         $height = ' height="' . $height . '"';
  88     }
  89
  90     return '<img src="' . $url . '"' . $height . $width . ' alt="' . $alt . '" />';
  91 }
  92
  93 function hook_getSubject(&$subject)
  94 {
  95     if (preg_match('!(.*\S)\s*\[=> ([^\]\s]+)\]!', $subject, $matches)) {
  96         $subject = $matches[1];
  97         global $banana;
  98         if ($banana->state['group'] == $matches[2]) {
  99             return ' [=> ' . $matches[2] . ']';
 100         } else {
 101             return ' [=> ' . makeHREF(array('group' => $matches[2]), $matches[2]) . ']';
 102         }
 103     }
 104     return null;
 105 }
 106
 107 class PlatalBanana extends Banana
 108 {
 109     var $profile    = array('name' => '', 'sig'  => '',
 110                             'org'  => 'Utilisateur de Polytechnique.org',
 111                             'customhdr' =>'', 'display' => 0, 'lastnews' => 0,
 112                             'locale'  => 'fr_FR', 'subscribe' => array());
 113     var $can_attach = false;
 114
 115     function PlatalBanana()
 116     {
 117         global $globals;
 118
 119         $uid = S::v('uid');
 120         $req = XDB::query(
 121                 "SELECT  nom, mail, sig, FIND_IN_SET('threads',flags), FIND_IN_SET('automaj',flags)
 122                    FROM  {$globals->banana->table_prefix}profils
 123                   WHERE  uid={?}", $uid);
 124
 125         if (!(list($nom,$mail,$sig,$disp,$maj) = $req->fetchOneRow())) {
 126             $nom  = S::v('prenom')." ".S::v('nom');
 127             $mail = S::v('forlife')."@polytechnique.org";
 128             $sig  = $nom." (".S::v('promo').")";
 129             $disp = 0;
 130             $maj  = 1;
 131         }
 132         $this->profile['name']      = "$nom <$mail>";
 133         $this->profile['sig']       = $sig;
 134         $this->profile['display']   = $disp;
 135         $this->profile['autoup']    = $maj;
 136         $this->profile['lastnews']  = S::v('banana_last');
 137
 138         if ($maj) {
 139             XDB::execute("UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}",
 140                          gmdate("YmdHis"), $uid);
 141         }
 142
 143         $req = XDB::query("
 144                  SELECT  nom
 145                    FROM  {$globals->banana->table_prefix}abos
 146               LEFT JOIN  {$globals->banana->table_prefix}list ON list.fid=abos.fid
 147                   WHERE  uid={?}", $uid);
 148         $this->profile['subscribe'] = $req->fetchColumn();
 149
 150         array_splice($this->show_hdr,  count($this->show_hdr)  - 2, 0);
 151         array_splice($this->parse_hdr, count($this->parse_hdr) - 2, 0, 'x-org-id');
 152
 153         $this->host = 'news://web_'.S::v('forlife')
 154             .":{$globals->banana->password}@{$globals->banana->server}:{$globals->banana->port}/";
 155
 156         parent::Banana();
 157     }
 158
 159     function run($params = null)
 160     {
 161         global $banana;
 162
 163         if (Get::v('banana') == 'updateall'
 164         || (!is_null($params) && isset($params['banana']) && $params['banana'] == 'updateall')) {
 165             XDB::execute('UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}',
 166                          gmdate('YmdHis'), S::v('uid'));
 167             $_SESSION['banana_last'] = time();
 168         }
 169         return Banana::run('PlatalBanana', $params);
 170     }
 171
 172     function action_saveSubs()
 173     {
 174         global $globals;
 175         $uid = S::v('uid');
 176
 177         $this->profile['subscribe'] = array();
 178         XDB::execute("DELETE FROM {$globals->banana->table_prefix}abos WHERE uid={?}", $uid);
 179         if (!count($_POST['subscribe'])) {
 180             return true;
 181         }
 182
 183         $req  = XDB::iterRow("SELECT fid,nom FROM {$globals->banana->table_prefix}list");
 184         $fids = array();
 185         while (list($fid,$fnom) = $req->next()) {
 186             $fids[$fnom] = $fid;
 187         }
 188
 189         $diff = array_diff($_POST['subscribe'], array_keys($fids));
 190         foreach ($diff as $g) {
 191             XDB::execute("INSERT INTO {$globals->banana->table_prefix}list (nom) VALUES ({?})", $g);
 192             $fids[$g] = mysql_insert_id();
 193         }
 194
 195         foreach ($_POST['subscribe'] as $g) {
 196             XDB::execute("INSERT INTO {$globals->banana->table_prefix}abos (fid,uid) VALUES ({?},{?})",
 197                          $fids[$g], $uid);
 198             $this->profile['subscribe'][] = $g;
 199         }
 200     }
 201 }
 202
 203 ?>