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