avoid preg_match, use is_numeric
[platal.git] / include / 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/loupe.gif" alt="fiche" 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 $base = 'banana';
46 if ($params['subscribe'] == 1) {
47 return $base . '/subscription';
48 }
49 if (isset($params['xface'])) {
50 return $base . '/xface/' . strtr(base64_encode($params['xface']), '+/', '.:');
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 }
71
72 if ($params['action'] == 'new') {
73 return $base . '/new';
74 }
75 return $base;
76 }
77
78 function hook_makeImg($img, $alt, $height, $width)
79 {
80 $url = 'images/banana/' . $img;
81
82 if (!is_null($width)) {
83 $width = ' width="' . $width . '"';
84 }
85 if (!is_null($height)) {
86 $height = ' height="' . $height . '"';
87 }
88
89 return '<img src="' . $url . '"' . $height . $width . ' alt="' . $alt . '" />';
90 }
91
92 function 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
106 class PlatalBanana extends Banana
107 {
108 var $profile = Array( 'name' => '', 'sig' => '', 'org' => 'Utilisateur de Polytechnique.org',
109 'customhdr' =>'', 'display' => 0, 'lastnews' => 0, 'locale' => 'fr_FR', 'subscribe' => array());
110 var $can_attach = false;
111
112 function PlatalBanana()
113 {
114 global $globals;
115
116 $uid = S::v('uid');
117 $req = XDB::query(
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())) {
123 $nom = S::v('prenom')." ".S::v('nom');
124 $mail = S::v('forlife')."@polytechnique.org";
125 $sig = $nom." (".S::v('promo').")";
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;
133 $this->profile['lastnews'] = S::v('banana_last');
134
135 if ($maj) {
136 XDB::execute("UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}", gmdate("YmdHis"), $uid);
137 }
138
139 $req = XDB::query("
140 SELECT nom
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
146 array_splice($this->show_hdr, count($this->show_hdr) - 2, 0);
147 array_splice($this->parse_hdr, count($this->parse_hdr) - 2, 0, 'x-org-id');
148
149 $this->host = 'news://web_'.S::v('forlife')
150 .":{$globals->banana->password}@{$globals->banana->server}:{$globals->banana->port}/";
151
152 parent::Banana();
153 }
154
155 function run($params = null)
156 {
157 global $banana;
158
159 if (Get::v('banana') == 'updateall'
160 || (!is_null($params) && isset($params['banana']) && $params['banana'] == 'updateall')) {
161 XDB::execute('UPDATE auth_user_quick SET banana_last={?} WHERE user_id={?}', gmdate('YmdHis'), S::v('uid'));
162 $_SESSION['banana_last'] = time();
163 }
164 return Banana::run('PlatalBanana', $params);
165 }
166
167 function action_saveSubs()
168 {
169 global $globals;
170 $uid = S::v('uid');
171
172 $this->profile['subscribe'] = Array();
173 XDB::execute("DELETE FROM {$globals->banana->table_prefix}abos WHERE uid={?}", $uid);
174 if (!count($_POST['subscribe'])) {
175 return true;
176 }
177
178 $req = XDB::iterRow("SELECT fid,nom FROM {$globals->banana->table_prefix}list");
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) {
186 XDB::execute("INSERT INTO {$globals->banana->table_prefix}list (nom) VALUES ({?})", $g);
187 $fids[$g] = mysql_insert_id();
188 }
189
190 foreach ($_POST['subscribe'] as $g) {
191 XDB::execute("INSERT INTO {$globals->banana->table_prefix}abos (fid,uid) VALUES ({?},{?})", $fids[$g], $uid);
192 $this->profile['subscribe'][] = $g;
193 }
194 }
195 }
196
197 ?>