Commit | Line | Data |
---|---|---|
0df3edb9 | 1 | <?php |
2 | /*************************************************************************** | |
179afa7f | 3 | * Copyright (C) 2003-2008 Polytechnique.org * |
0df3edb9 | 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 | ***************************************************************************/ | |
0df3edb9 | 21 | |
3b962ded | 22 | function wiki_pagename() |
23 | { | |
5e2307dc | 24 | if (!Get::v('n')) { |
ed912c6e | 25 | return null; |
26 | } | |
06a5e65b | 27 | |
5e2307dc | 28 | $words = explode('/', trim(Get::v('n'), '/')); |
06a5e65b | 29 | if (count($words) == 2) { |
30 | return join('.', $words); | |
31 | } | |
32 | ||
33 | array_unshift($words, $words[0]); | |
34 | $b = array_pop($words); | |
35 | $a = array_pop($words); | |
36 | ||
8b00e0e0 | 37 | pl_redirect($a.'/'.$b); |
0df3edb9 | 38 | } |
39 | ||
3b962ded | 40 | function wiki_filename($s) |
41 | { | |
42 | if (@iconv('utf-8', 'utf-8', $s) == $s) { | |
caf4ad02 | 43 | return $s; |
3b962ded | 44 | } |
caf4ad02 | 45 | return utf8_encode($s); |
3b962ded | 46 | } |
47 | ||
48 | function wiki_work_dir() | |
49 | { | |
0df3edb9 | 50 | global $globals; |
06a5e65b | 51 | return $globals->spoolroot.'/spool/wiki.d'; |
0df3edb9 | 52 | } |
53 | ||
ed912c6e | 54 | function wiki_clear_all_cache() |
55 | { | |
d7a8b04c | 56 | system('rm -f '.wiki_work_dir().'/cache_*'); |
0df3edb9 | 57 | } |
58 | ||
3aec1c21 | 59 | function wiki_perms_options() { |
a7de4ef7 | 60 | return array('public' => 'Public', 'logged' => 'Connecté', |
61 | 'mdp' => 'Authentifié', 'admin' => 'Admin'); | |
3aec1c21 | 62 | } |
63 | ||
89232034 | 64 | function wiki_get_perms($n) |
f6ce9a88 | 65 | { |
3b962ded | 66 | $file = wiki_work_dir().'/'.wiki_filename(str_replace('/', '.', $n)); |
89232034 | 67 | $lines = explode("\n", @file_get_contents($file)); |
f6ce9a88 | 68 | foreach ($lines as $line) { |
1a013db7 | 69 | @list($k, $v) = explode('=', $line, 2); |
f6ce9a88 | 70 | if ($k == 'platal_perms') { |
71 | return explode(':', $v); | |
72 | } | |
73 | } | |
74 | return array('logged', 'admin'); | |
75 | } | |
76 | ||
89232034 | 77 | function wiki_putfile($f, $s) |
78 | { | |
79 | $fp = fopen($f, 'w'); | |
80 | fputs($fp, $s); | |
81 | fclose($fp); | |
82 | } | |
83 | ||
84 | function wiki_set_perms($n, $pr, $pw) | |
85 | { | |
3b962ded | 86 | $file = wiki_work_dir().'/'.wiki_filename(str_replace('/', '.', $n)); |
87 | if (!file_exists($file)) { | |
89232034 | 88 | return false; |
3b962ded | 89 | } |
89232034 | 90 | |
91 | $p = $pr . ':' . $pw; | |
92 | ||
93 | $lines = explode("\n", file_get_contents($file)); | |
94 | foreach ($lines as $i => $line) { | |
95 | list($k, $v) = explode('=', $line, 2); | |
96 | if ($k == 'platal_perms') { | |
97 | $lines[$i] = 'platal_perms='.$p; | |
98 | wiki_putfile($file, join("\n", $lines)); | |
99 | return true; | |
100 | } | |
101 | } | |
102 | ||
103 | array_splice($lines, 1, 0, array('platal_perms='.$p)); | |
104 | wiki_putfile($file, join("\n", $lines)); | |
105 | return true; | |
106 | } | |
107 | ||
99ce0a25 | 108 | function wiki_may_have_perms($perm) { |
109 | switch ($perm) { | |
110 | case 'public': return true; | |
111 | case 'logged': return S::logged(); | |
112 | case 'mdp': return S::logged(); | |
113 | default: return S::has_perms(); | |
114 | } | |
115 | } | |
116 | ||
0f384dd3 | 117 | function wiki_apply_feed_perms($perm) |
118 | { | |
119 | if ($perm == 'public') { | |
120 | return; | |
121 | } | |
122 | ||
123 | require_once 'rss.inc.php'; | |
124 | $uid = init_rss(null, Env::v('user'), Env::v('hash')); | |
a2b461ce | 125 | $res = XDB::query('SELECT user_id AS uid, IF (nom_usage <> \'\', nom_usage, nom) AS nom, prenom, perms |
0f384dd3 | 126 | FROM auth_user_md5 |
127 | WHERE user_id = {?}', $uid); | |
128 | if (!$res->numRows()) { | |
129 | exit; | |
130 | } | |
131 | $table = $res->fetchOneAssoc(); | |
132 | $_SESSION = array_merge($_SESSION, $table, array('forlife' => Env::v('user'))); | |
a2b461ce | 133 | require_once 'xorg/session.inc.php'; |
134 | $_SESSION['perms'] =& XorgSession::make_perms($_SESSION['perms']); | |
135 | if ($perm == 'logged' || $_SESSION['perms']->hasFlag('admin')) { | |
0f384dd3 | 136 | return; |
137 | } | |
138 | exit; | |
139 | } | |
140 | ||
f6ce9a88 | 141 | function wiki_apply_perms($perm) { |
c0d6753f | 142 | global $page, $platal, $globals; |
f6ce9a88 | 143 | |
144 | switch ($perm) { | |
145 | case 'public': | |
146 | return; | |
147 | ||
148 | case 'logged': | |
c0d6753f | 149 | if (!call_user_func(array($globals->session, 'doAuthCookie'))) { |
fce088c1 | 150 | $platal = empty($GLOBALS['IS_XNET_SITE']) ? new Platal() : new Xnet(); |
c0d6753f | 151 | $platal->force_login($page); |
6f97366a | 152 | } |
c0d6753f | 153 | return; |
f6ce9a88 | 154 | |
155 | default: | |
c0d6753f | 156 | if (!call_user_func(array($globals->session, 'doAuth'))) { |
6f97366a | 157 | $platal = empty($GLOBALS['IS_XNET_SITE']) ? new Platal() : new Xnet(); |
f6ce9a88 | 158 | $platal->force_login($page); |
159 | } | |
160 | if ($perm == 'admin') { | |
161 | check_perms(); | |
162 | } | |
163 | return; | |
164 | } | |
165 | } | |
166 | ||
ab694f12 | 167 | function wiki_require_page($pagename) |
168 | { | |
169 | global $globals; | |
170 | $pagename_slashes = str_replace('.','/',$pagename); | |
171 | $pagename_dots = str_replace('/','.',$pagename); | |
b74ba781 FB |
172 | if (is_file(wiki_work_dir().'/cache_'.$pagename_dots.'.tpl')) { |
173 | return; | |
174 | } | |
175 | system('wget --no-check-certificate '. escapeshellarg($globals->baseurl.'/'.$pagename_slashes) . ' -O /dev/null'); | |
ab694f12 | 176 | } |
177 | ||
9162f4ed | 178 | function wiki_delete_page($pagename) |
179 | { | |
180 | $pagename_dots = str_replace('/','.',$pagename); | |
181 | if (!strpos($pagename_dots, '.')) { | |
182 | return false; | |
183 | } | |
184 | $file = wiki_work_dir().'/'.wiki_filename($pagename_dots); | |
eaf30d86 | 185 | $cachefile = wiki_work_dir().'/cache_'.$pagename_dots.'.tpl'; |
9162f4ed | 186 | if (is_file($cachefile)) { |
187 | unlink($cachefile); | |
188 | } | |
189 | if (!is_file($file)) { | |
190 | return false; | |
191 | } | |
192 | unlink($file); | |
193 | return true; | |
194 | } | |
195 | ||
196 | function wiki_links_in_line($line, $groupname) | |
197 | { | |
198 | $links = array(); | |
199 | if (preg_match_all('@\[\[([^~][^\]\|\?#]*)((\?|#)[^\]\|]+)?(\\|[^\]]+)?\]\]@', $line, $matches, PREG_OFFSET_CAPTURE)) { | |
200 | foreach ($matches[1] as $j => $link) if (!preg_match('@http://@', $link[0])) { | |
201 | $mylink = str_replace('/','.',trim($link[0])); | |
202 | $sup = trim(substr($matches[2][$j][0],1)); | |
203 | $alt = trim(substr($matches[4][$j][0],1)); | |
204 | $newlink = str_replace(' ','',ucwords($mylink)); | |
205 | if (strpos($newlink,'.') === false) { | |
206 | $newlink = $groupname.'.'.$newlink; | |
207 | } | |
208 | if (!$alt && $mylink != $newlink) { | |
209 | $alt = trim($link[0]); | |
210 | } | |
211 | $links[] = array( | |
212 | 'pos' => $matches[0][$j][1], | |
213 | 'size' => strlen($matches[0][$j][0]), | |
214 | 'href' => $newlink, | |
215 | 'sup' => $sup, | |
216 | 'alt' => $alt, | |
217 | 'group' => substr($mylink, 0, strpos($mylink, '.'))); | |
218 | } | |
219 | } | |
220 | return $links; | |
221 | } | |
222 | ||
223 | function wiki_rename_page($pagename, $newname, $changeLinks = true) | |
224 | { | |
225 | $pagename_dots = str_replace('/','.',$pagename); | |
226 | $newname_dots = str_replace('/','.',$newname); | |
227 | if (!strpos($pagename_dots, '.') || !strpos($newname_dots, '.')) { | |
228 | return false; | |
229 | } | |
230 | $groupname = substr($pagename_dots, 0, strpos($pagename_dots,'.')); | |
231 | $newgroupname = substr($newname_dots, 0, strpos($pagename_dots,'.')); | |
eaf30d86 | 232 | |
9162f4ed | 233 | $file = wiki_work_dir().'/'.wiki_filename($pagename_dots); |
234 | $newfile = wiki_work_dir().'/'.wiki_filename($newname_dots); | |
235 | if (!is_file($file)) { | |
236 | // old page doesn't exist | |
237 | return false; | |
238 | } | |
239 | if (!rename($file, $newfile)) { | |
240 | // impossible to renama page | |
241 | return false; | |
242 | } | |
243 | ||
244 | if (!$changeLinks) { | |
245 | return true; | |
246 | } | |
247 | ||
248 | $changedLinks = 0; | |
249 | // change name inside this folder and ingroup links if changing group | |
250 | $lines = explode("\n", file_get_contents($newfile)); | |
251 | $changed = false; | |
252 | foreach ($lines as $i => $line) { | |
253 | list($k, $v) = explode('=', $line, 2); | |
254 | if ($k == 'name' && $v == $pagename_dots) { | |
255 | $lines[$i] = 'name='.$newname_dots; | |
256 | $changed = true; | |
257 | } else if ($groupname != $newgroupname) { | |
258 | $links = wiki_links_in_line($line, $groupname); | |
259 | $newline = ''; $last = 0; | |
260 | foreach ($links as $link) if ($link['group'] == $groupname) { | |
261 | $newline .= substr($line, $last, $link['pos']); | |
262 | $newline .= '[['.$link['href'].$link['sup'].($link['alt']?(' |'.$link['alt']):'').']]'; | |
263 | $last = $link['pos']+$link['size']; | |
264 | $changedLinks++; | |
265 | } | |
266 | if ($last != 0) { | |
267 | $newline .= substr($line, $last); | |
268 | $lines[$i] = $newline; | |
269 | $changed = true; | |
270 | } | |
271 | } | |
272 | } | |
273 | wiki_putfile($newfile, join("\n", $lines)); | |
274 | ||
275 | // change wiki links in all wiki pages | |
276 | $endname = substr($pagename_dots, strpos($pagename_dots,'.')+1); | |
277 | $pages = array(); | |
278 | exec("grep ".$endname." ".wiki_work_dir()."/* -sc", $pages); | |
279 | foreach($pages as $line) { | |
280 | if (preg_match('%/([^/:]+):([0-9]+)$%', $line, $vals) && $vals[2] > 0) { | |
281 | $inpage = $vals[1]; | |
282 | $lines = explode("\n", file_get_contents(wiki_work_dir().'/'.$inpage)); | |
283 | $changed = false; | |
284 | // find all wiki links in page and change if linked to this page | |
285 | foreach ($lines as $i => $line) { | |
286 | $links = wiki_links_in_line($line, substr($inpage, 0, strpos($inpage, '.'))); | |
287 | $newline = ''; $last = 0; | |
288 | foreach ($links as $link) { | |
289 | if ($link['href'] == $pagename_dots) { | |
290 | $newline .= substr($line, $last, $link['pos']); | |
291 | $newline .= '[['.$newname_dots.$link['sup'].($link['alt']?(' |'.$link['alt']):'').']]'; | |
292 | $last = $link['pos']+$link['size']; | |
293 | $changedLinks++; | |
294 | } | |
295 | } | |
296 | if ($last != 0) { | |
297 | $newline .= substr($line, $last); | |
298 | $lines[$i] = $newline; | |
299 | $changed = true; | |
300 | } | |
301 | } | |
302 | if ($changed) | |
303 | { | |
304 | wiki_putfile(wiki_work_dir().'/'.$inpage, join("\n", $lines)); | |
305 | } | |
306 | } | |
307 | } | |
308 | if ($changedLinks > 0) { | |
309 | return $changedLinks; | |
310 | } | |
311 | return true; | |
312 | } | |
313 | ||
314 | function wiki_rename_folder($pagename, $newname, $changeLinks = true) | |
315 | { | |
316 | } | |
317 | ||
a7de4ef7 | 318 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
0df3edb9 | 319 | ?> |