Improvements and bugfixes
[banana.git] / banana / page.inc.php
1 <?php
2 /********************************************************************************
3 * banana/page.inc.php : class for group lists
4 * ------------------------
5 *
6 * This file is part of the banana distribution
7 * Copyright: See COPYING files that comes with this distribution
8 ********************************************************************************/
9
10 require_once 'smarty/libs/Smarty.class.php';
11
12 class BananaPage extends Smarty
13 {
14 private $error = array();
15 private $page = null;
16
17 private $pages = array();
18 private $killed = array();
19 private $actions = array();
20
21 public $css = '';
22
23 public function __construct()
24 {
25 $this->Smarty();
26
27 $this->compile_check = Banana::$debug_smarty;
28 $this->template_dir = dirname(__FILE__) . '/templates/';
29 $this->compile_dir = Banana::$spool_root . '/templates_c/';
30 $this->register_prefilter('banana_trimwhitespace');
31
32 }
33
34 /** Add an error message
35 * @param message STRING html code of the error to display
36 */
37 public function trig($message)
38 {
39 $this->error[] = $message;
40 }
41
42 /** Kill the current page (generate an error message and skip page generation)
43 * @param message STRING html code of the error message to display
44 @ @return XHTML code of the page
45 */
46 public function kill($message)
47 {
48 $this->trig($message);
49 $this->assign('killed', true);
50 return $this->run();
51 }
52
53 /** Set the current page
54 * @param page STRING page name
55 */
56 public function setPage($page)
57 {
58 $this->page = $page;
59 return true;
60 }
61
62 /** Register an action to show on banana page
63 * @param action_code HTML code of the action
64 * @param pages ARRAY pages where to show the action (null == every pages)
65 * @return true if success
66 */
67 public function registerAction($action_code, array $pages = null)
68 {
69 $this->actions[] = array('text' => $action_code, 'pages' => $pages);
70 return true;
71 }
72
73 /** Register a new page
74 * @param name Name of the page
75 * @param text Text for the tab of the page
76 * @param template Template path for the page if null, the page is not handled by banana
77 * @return true if success
78 */
79 public function registerPage($name, $text, $template = null)
80 {
81 $this->pages[$name] = array('text' => $text, 'template' => $template);
82 return true;
83 }
84
85 /** Remove a page
86 * @param page STRING page name to kill
87 */
88 public function killPage($page)
89 {
90 $this->killed[] = $page;
91 }
92
93 /** Add Inline CSS to put in the page headers
94 * @param css CSS code
95 */
96 public function addCssInline($css)
97 {
98 $this->css .= $css;
99 }
100
101 /** Preparte the page generation
102 * @return template to use
103 */
104 protected function prepare()
105 {
106 $this->registerPage('subscribe', _b_('Abonnements'), null);
107 $this->registerPage('forums', _b_('Les forums'), null);
108 if (!is_null(Banana::$group)) {
109 $this->registerPage('thread', Banana::$group, null);
110 if (!is_null(Banana::$artid)) {
111 $this->registerPage('message', _b_('Message'), null);
112 if ($this->page == 'cancel') {
113 $this->registerPage('cancel', _b_('Annulation'), null);
114 } elseif ($this->page == 'new') {
115 $this->registerPage('new', _b_('Répondre'), null);
116 }
117 } elseif ($this->page == 'new') {
118 $this->registerPage('new', _b_('Nouveau'), null);
119 }
120 }
121 foreach ($this->killed as $page) {
122 unset($this->pages[$page]);
123 }
124 foreach ($this->actions as $key=>&$action) {
125 if (!is_null($action['pages']) && !in_array($this->page, $action['pages'])) {
126 unset($this->actions[$key]);
127 }
128 }
129
130 return 'banana-base.tpl';
131 }
132
133 /** Generate XHTML code
134 */
135 public function run()
136 {
137 $tpl = $this->prepare();
138 if (!isset($this->pages[$this->page])) {
139 $this->trig(_b_('La page demandée n\'existe pas'));
140 $this->actions = array();
141 $this->page = null;
142 }
143
144 return $this->_run($tpl);
145 }
146
147 /** Generate feed XML code
148 */
149 public function feed()
150 {
151 @list($lg) = explode('_', Banana::$profile['locale']);
152 $tpl = 'banana-feed-' . Banana::$feed_format . '.tpl';
153 $this->assign('copyright', Banana::$feed_copyright);
154 $this->assign('generator', Banana::$feed_generator);
155 $this->assign('email', Banana::$feed_email);
156 $this->assign('title_prefix', Banana::$feed_namePrefix);
157 $this->assign('language', $lg);
158 $this->register_function('rss_date', 'rss_date');
159 header('Content-Type: application/rss+xml; charset=utf-8');
160 echo $this->_run($tpl, false);
161 exit;
162 }
163
164 /** Code generation
165 */
166 private function _run($tpl, $ent = true)
167 {
168 $this->assign('group', Banana::$group);
169 $this->assign('artid', Banana::$artid);
170 $this->assign('part', Banana::$part);
171 $this->assign('first', Banana::$first);
172 $this->assign('action', Banana::$action);
173 $this->assign('profile', Banana::$profile);
174 $this->assign('spool', Banana::$spool);
175 $this->assign('protocole', Banana::$protocole);
176 $this->assign('showboxlist', Banana::$spool_boxlist);
177 $this->assign('showthread', Banana::$msgshow_withthread);
178 $this->assign('withtabs' , Banana::$withtabs);
179 $this->assign('feed_format', Banana::$feed_format);
180 $this->assign('feed_active', Banana::$feed_active);
181
182 $this->register_function('url', array($this, 'makeUrl'));
183 $this->register_function('link', array($this, 'makeLink'));
184 $this->register_function('imglink', array($this, 'makeImgLink'));
185 $this->register_function('img', array($this, 'makeImg'));
186 $this->register_modifier('b', '_b_');
187
188 $this->assign('errors', $this->error);
189 $this->assign('page', $this->page);
190 $this->assign('pages', $this->pages);
191 $this->assign('actions', $this->actions);
192
193 if (!Banana::$debug_smarty) {
194 $error_level = error_reporting(0);
195 }
196 $text = $this->fetch($tpl);
197 if ($ent) {
198 $text = banana_utf8entities($text);
199 }
200 if (!Banana::$debug_smarty) {
201 error_reporting($error_level);
202 }
203 return $text;
204 }
205
206 /** Build a URL in Banana
207 * @param params ARRAY location datas
208 * @param smarty OBJECT Smarty instance associated (null if none)
209 * @return URL of the page associated with the given parameters
210 *
211 * Usual parameters are :
212 * - group : the box name
213 * - artid : the current message id (index of message-id)
214 * - part : part id to show (may be a content-id, xface or a mime-type for text)
215 * - first : first linear-index to show in spool view
216 * - action: like subscribe, cancel, new
217 * - all others params are allowed, but not parsed by the base implementation of banana
218 *
219 * smarty funciton : {url param1=... param2=...}
220 */
221 public function makeUrl(array $params, &$smarty = null)
222 {
223 if (function_exists('hook_makeLink')
224 && $res = hook_makeLink($params)) {
225 return $res;
226 }
227 $proto = empty($_SERVER['HTTPS']) ? 'http://' : 'https://';
228 $host = $_SERVER['HTTP_HOST'];
229 $file = $_SERVER['PHP_SELF'];
230
231 if (count($params) != 0) {
232 $get = '?';
233 foreach ($params as $key=>$value) {
234 if (strlen($get) != 1) {
235 $get .= '&';
236 }
237 $get .= $key . '=' . $value;
238 }
239 } else {
240 $get = '';
241 }
242 return $proto . $host . $file . $get;
243 }
244
245 /** Build a link to a Banana page
246 * @param params ARRAY location datas
247 * @param smarty OBJECT Smarty instance associated (null if none)
248 * @return Link to the page associated with the given parameters
249 *
250 * Support all @ref makeURL parameters, but catch the following:
251 * - text : if set, defined the text of the link (if not set, the URL is used
252 * - popup : title of the link (showed as a tooltip on most browsers)
253 * - class : specific style class for the markup
254 * - accesskey: keyboard key to trigger the link
255 * None of this parameters is needed
256 *
257 * Smarty function : {link param1=... param2=...}
258 */
259 public function makeLink(array $params, &$smarty = null)
260 {
261 $catch = array('text', 'popup', 'class', 'accesskey');
262 foreach ($catch as $key) {
263 ${$key} = isset($params[$key]) ? $params[$key] : null;
264 unset($params[$key]);
265 }
266 $link = $this->makeUrl($params, &$smarty);
267 if (is_null($text)) {
268 $text = $link;
269 }
270 if (!is_null($accesskey)) {
271 $popup .= ' (raccourci : ' . $accesskey . ')';
272 }
273 if (!is_null($popup)) {
274 $popup = ' title="' . banana_htmlentities($popup) . '"';
275 }
276 if (!is_null($class)) {
277 $class = ' class="' . $class . '"';
278 }
279 if (!is_null($accesskey)) {
280 $accesskey = ' accesskey="' . $accesskey . '"';
281 }
282 return '<a href="' . banana_htmlentities($link) . '"'
283 . $popup . $class . $accesskey
284 . '>' . $text . '</a>';
285 }
286
287 /** Build a link to one of the banana built-in images
288 * @param params ARRAY image datas
289 * @param smarty OBJECT Smarty instance associated (null if none)
290 * @return Img tag
291 *
292 * Supported parameters are
293 * - img : name of the image (without its extension)
294 * - alt : alternative text
295 * - height and width : dimensions of the images
296 * img and alt are needed
297 *
298 * Smarty function: {img img=... alt=... [height=...] [width=...]}
299 */
300 public function makeImg(array $params, &$smarty = null)
301 {
302 $catch = array('img', 'alt', 'height', 'width');
303 foreach ($catch as $key) {
304 ${$key} = isset($params[$key]) ? $params[$key] : null;
305 }
306 $img .= ".gif";
307 if (function_exists('hook_makeImg')
308 && $res = hook_makeImg($img, $alt, $height, $width)) {
309 return $res;
310 }
311
312 if (!is_null($width)) {
313 $width = ' width="' . $width . '"';
314 }
315 if (!is_null($height)) {
316 $height = ' height="' . $height . '"';
317 }
318
319 $proto = empty($_SERVER['HTTPS']) ? 'http://' : 'https://';
320 $host = $_SERVER['HTTP_HOST'];
321 $file = dirname($_SERVER['PHP_SELF']) . '/img/' . $img;
322 $url = $proto . $host . $file;
323
324 return '<img src="' . $url . '"' . $height . $width . ' alt="' . _b_($alt) . '" />';
325 }
326
327 /** Build a link with an image as text
328 * @param params ARRAY image and location data
329 * @param smarty OBJECT Smarty instance associated (null if none)
330 * @return an image within an link
331 *
332 * All @ref makeImg and @ref makeLink parameters are supported
333 * if text is set, the text will be appended after the image in the link
334 *
335 * Smarty function : {imglink img=... alt=... [param1=...]}
336 */
337 public function makeImgLink(array $params, &$smarty = null)
338 {
339 if (!isset($params['popup'])) {
340 $params['popup'] = @$params['alt'];
341 }
342 $img = $this->makeImg($params, $smarty);
343 if (isset($params['text'])) {
344 $img .= ' ' . $params['text'];
345 }
346 $params['text'] = $img;
347 unset($params['alt']);
348 unset($params['img']);
349 unset($params['width']);
350 unset($params['height']);
351 return $this->makeLink($params, $smarty);
352 }
353
354 /** Redirect to the page with the given parameter
355 * @ref makeURL
356 */
357 public function redirect(array $params = array())
358 {
359 header('Location: ' . $this->makeUrl($params));
360 }
361 }
362
363 // {{{ function banana_trimwhitespace
364
365 function banana_trimwhitespace($source, &$smarty)
366 {
367 $tags = array('script', 'pre', 'textarea');
368
369 foreach ($tags as $tag) {
370 preg_match_all("!<{$tag}[^>]+>.*?</{$tag}>!is", $source, ${$tag});
371 $source = preg_replace("!<{$tag}[^>]+>.*?</{$tag}>!is", "&&&{$tag}&&&", $source);
372 }
373
374 // remove all leading spaces, tabs and carriage returns NOT
375 // preceeded by a php close tag.
376 $source = preg_replace('/((?<!\?>)\n)[\s]+/m', '\1', $source);
377
378 foreach ($tags as $tag) {
379 $source = preg_replace("!&&&{$tag}&&&!e", 'array_shift(${$tag}[0])', $source);
380 }
381
382 return $source;
383 }
384
385 // }}}
386 // {{{ function rss_date
387
388 function rss_date($t)
389 {
390 return date('r', $t);
391 }
392
393 // }}}
394
395 // vim:set et sw=4 sts=4 ts=4 enc=utf-8:
396 ?>