Merge commit 'origin/master' into fusionax
[platal.git] / classes / xnet.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2009 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 class Xnet extends Platal
23 {
24 public function __construct()
25 {
26 $modules = func_get_args();
27 parent::__construct($modules);
28
29 global $globals;
30 if ($globals->asso()) {
31 if ($p = strpos($this->path, '/')) {
32 $this->ns = substr($this->path, 0, $p).'/';
33 $this->path = '%grp'.substr($this->path, $p);
34 } else {
35 $this->ns = $this->path.'/';
36 $this->path = '%grp';
37 }
38 }
39 }
40
41 protected function find_nearest_key($key, array &$array)
42 {
43 global $globals;
44 if (in_array('%grp', array_keys($array)) && $key == $globals->asso('diminutif')) {
45 return '%grp';
46 }
47 return parent::find_nearest_key($key, $array);
48 }
49
50 public function near_hook()
51 {
52 global $globals;
53 $link = str_replace('%grp', $globals->asso('diminutif'), parent::near_hook());
54 if ($link != $this->path) {
55 return $link;
56 }
57 return null;
58 }
59
60 public function pl_self($n = null)
61 {
62 global $globals;
63 return str_replace('%grp', $globals->asso('diminutif'), parent::pl_self($n));
64 }
65
66 protected function find_hook()
67 {
68 $ans = parent::find_hook();
69 $this->https = false;
70 if ($ans && $this->ns) {
71 $this->path = $this->ns . substr($this->path, 5);
72 $this->argv[0] = $this->ns . substr($this->argv[0], 5);
73 }
74 return $ans;
75 }
76
77 public function force_login(PlPage &$page)
78 {
79 http_redirect(S::v('loginX'));
80 }
81 }
82
83 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
84 ?>