2 /***************************************************************************
3 * Copyright (C) 2003-2004 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 require_once('banana/banana.inc.php');
24 function hook_formatDisplayHeader($_header,$_text) {
26 if ($_header == 'x-org-id') {
27 return "$_text [<a href=\"../fiche.php?user=$_text\" class='popup2'>fiche</a>]";
31 function hook_headerTranslate($hdr) {
32 if ($hdr == 'x-org-id') {
37 function hook_checkcancel($_headers) {
38 return ($_headers['x-org-id'] == Session
::get('forlife') or has_perms());
41 class PlatalBanana
extends Banana
43 var $profile = Array( 'name' => '', 'sig' => '', 'org' => 'Utilisateur de Polytechnique.org',
44 'customhdr' =>'', 'display' => 0, 'lastnews' => 0, 'locale' => 'fr_FR', 'subscribe' => array());
46 function PlatalBanana()
50 $uid = Session
::getInt('uid');
51 $req = $globals->xdb
->query(
52 "SELECT nom, mail, sig, FIND_IN_SET('threads',flags), FIND_IN_SET('automaj',flags)
53 FROM {$globals->banana->table_prefix}profils
54 WHERE uid={?}", $uid);
56 if (!(list($nom,$mail,$sig,$disp,$maj) = $req->fetchOneRow())) {
57 $nom = Session
::get('prenom')." ".Session
::get('nom');
58 $mail = Session
::get('forlife')."@polytechnique.org";
59 $sig = $nom." (".Session
::getInt('promo').")";
63 $this->profile
['name'] = "$nom <$mail>";
64 $this->profile
['sig'] = $sig;
65 $this->profile
['display'] = $disp;
66 $this->profile
['autoup'] = $maj;
67 $this->profile
['lastnews'] = Session
::get('banana_last');
70 $globals->xdb
->execute("UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}", gmdate("YmdHis"), $uid);
73 $req = $globals->xdb
->query(
75 FROM {$globals->banana->table_prefix}abos
76 LEFT JOIN {$globals->banana->table_prefix}list ON list.fid=abos.fid
77 WHERE uid={?}", $uid);
78 $this->profile
['subscribe'] = $req->fetchColumn();
80 array_splice($this->show_hdr
, count($this->show_hdr
) - 2, 0, 'x-org-id');
81 array_splice($this->parse_hdr
, count($this->parse_hdr
) - 2, 0, 'x-org-id');
83 $this->host
= 'news://web_'.Session
::get('forlife')
84 .":{$globals->banana->password}@{$globals->banana->server}:{$globals->banana->port}/";
91 global $banana, $globals;
93 if (Get
::get('banana') == 'updateall') {
94 $globals->xdb
->execute('UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}', gmdate('YmdHis'), Session
::getInt('uid'));
95 $_SESSION['banana_last'] = time();
96 redirect($_SERVER['PHP_SELF']);
98 return Banana
::run('PlatalBanana');
101 function action_saveSubs()
104 $uid = Session
::getInt('uid');
106 $this->profile
['subscribe'] = Array();
107 $globals->xdb
->execute("DELETE FROM {$globals->banana->table_prefix}abos WHERE uid={?}", $uid);
108 if (!count($_POST['subscribe'])) {
112 $req = $globals->xdb
->iterRow("SELECT fid,nom FROM {$globals->banana->table_prefix}list");
114 while (list($fid,$fnom) = $req->next()) {
118 $diff = array_diff($_POST['subscribe'], array_keys($fids));
119 foreach ($diff as $g) {
120 $globals->xdb
->execute("INSERT INTO {$globals->banana->table_prefix}list (nom) VALUES ({?})", $g);
121 $fids[$g] = mysql_insert_id();
124 foreach ($_POST['subscribe'] as $g) {
125 $globals->xdb
->execute("INSERT INTO {$globals->banana->table_prefix}abos (fid,uid) VALUES ({?},{?})", $fids[$g], $uid);
126 $this->profile
['subscribe'][] = $g;