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 | $_SESSION['perms'] =& XorgSession::make_perms($_SESSION['perms']); |
134 | if ($perm == 'logged' || $_SESSION['perms']->hasFlag('admin')) { | |
0f384dd3 | 135 | return; |
136 | } | |
137 | exit; | |
138 | } | |
139 | ||
d7610c35 FB |
140 | function wiki_apply_perms($perm) |
141 | { | |
142 | global $platal, $globals; | |
143 | $page =& Platal::page(); | |
f6ce9a88 | 144 | |
145 | switch ($perm) { | |
146 | case 'public': | |
147 | return; | |
148 | ||
149 | case 'logged': | |
c0d6753f | 150 | if (!call_user_func(array($globals->session, 'doAuthCookie'))) { |
fce088c1 | 151 | $platal = empty($GLOBALS['IS_XNET_SITE']) ? new Platal() : new Xnet(); |
c0d6753f | 152 | $platal->force_login($page); |
6f97366a | 153 | } |
c0d6753f | 154 | return; |
f6ce9a88 | 155 | |
156 | default: | |
c0d6753f | 157 | if (!call_user_func(array($globals->session, 'doAuth'))) { |
6f97366a | 158 | $platal = empty($GLOBALS['IS_XNET_SITE']) ? new Platal() : new Xnet(); |
f6ce9a88 | 159 | $platal->force_login($page); |
160 | } | |
161 | if ($perm == 'admin') { | |
162 | check_perms(); | |
163 | } | |
164 | return; | |
165 | } | |
166 | } | |
167 | ||
ab694f12 | 168 | function wiki_require_page($pagename) |
169 | { | |
170 | global $globals; | |
171 | $pagename_slashes = str_replace('.','/',$pagename); | |
172 | $pagename_dots = str_replace('/','.',$pagename); | |
b74ba781 FB |
173 | if (is_file(wiki_work_dir().'/cache_'.$pagename_dots.'.tpl')) { |
174 | return; | |
175 | } | |
176 | system('wget --no-check-certificate '. escapeshellarg($globals->baseurl.'/'.$pagename_slashes) . ' -O /dev/null'); | |
ab694f12 | 177 | } |
178 | ||
9162f4ed | 179 | function wiki_delete_page($pagename) |
180 | { | |
181 | $pagename_dots = str_replace('/','.',$pagename); | |
182 | if (!strpos($pagename_dots, '.')) { | |
183 | return false; | |
184 | } | |
185 | $file = wiki_work_dir().'/'.wiki_filename($pagename_dots); | |
eaf30d86 | 186 | $cachefile = wiki_work_dir().'/cache_'.$pagename_dots.'.tpl'; |
9162f4ed | 187 | if (is_file($cachefile)) { |
188 | unlink($cachefile); | |
189 | } | |
190 | if (!is_file($file)) { | |
191 | return false; | |
192 | } | |
193 | unlink($file); | |
194 | return true; | |
195 | } | |
196 | ||
197 | function wiki_links_in_line($line, $groupname) | |
198 | { | |
199 | $links = array(); | |
200 | if (preg_match_all('@\[\[([^~][^\]\|\?#]*)((\?|#)[^\]\|]+)?(\\|[^\]]+)?\]\]@', $line, $matches, PREG_OFFSET_CAPTURE)) { | |
201 | foreach ($matches[1] as $j => $link) if (!preg_match('@http://@', $link[0])) { | |
202 | $mylink = str_replace('/','.',trim($link[0])); | |
203 | $sup = trim(substr($matches[2][$j][0],1)); | |
204 | $alt = trim(substr($matches[4][$j][0],1)); | |
205 | $newlink = str_replace(' ','',ucwords($mylink)); | |
206 | if (strpos($newlink,'.') === false) { | |
207 | $newlink = $groupname.'.'.$newlink; | |
208 | } | |
209 | if (!$alt && $mylink != $newlink) { | |
210 | $alt = trim($link[0]); | |
211 | } | |
212 | $links[] = array( | |
213 | 'pos' => $matches[0][$j][1], | |
214 | 'size' => strlen($matches[0][$j][0]), | |
215 | 'href' => $newlink, | |
216 | 'sup' => $sup, | |
217 | 'alt' => $alt, | |
218 | 'group' => substr($mylink, 0, strpos($mylink, '.'))); | |
219 | } | |
220 | } | |
221 | return $links; | |
222 | } | |
223 | ||
224 | function wiki_rename_page($pagename, $newname, $changeLinks = true) | |
225 | { | |
226 | $pagename_dots = str_replace('/','.',$pagename); | |
227 | $newname_dots = str_replace('/','.',$newname); | |
228 | if (!strpos($pagename_dots, '.') || !strpos($newname_dots, '.')) { | |
229 | return false; | |
230 | } | |
231 | $groupname = substr($pagename_dots, 0, strpos($pagename_dots,'.')); | |
232 | $newgroupname = substr($newname_dots, 0, strpos($pagename_dots,'.')); | |
eaf30d86 | 233 | |
9162f4ed | 234 | $file = wiki_work_dir().'/'.wiki_filename($pagename_dots); |
235 | $newfile = wiki_work_dir().'/'.wiki_filename($newname_dots); | |
236 | if (!is_file($file)) { | |
237 | // old page doesn't exist | |
238 | return false; | |
239 | } | |
240 | if (!rename($file, $newfile)) { | |
241 | // impossible to renama page | |
242 | return false; | |
243 | } | |
244 | ||
245 | if (!$changeLinks) { | |
246 | return true; | |
247 | } | |
248 | ||
249 | $changedLinks = 0; | |
250 | // change name inside this folder and ingroup links if changing group | |
251 | $lines = explode("\n", file_get_contents($newfile)); | |
252 | $changed = false; | |
253 | foreach ($lines as $i => $line) { | |
254 | list($k, $v) = explode('=', $line, 2); | |
255 | if ($k == 'name' && $v == $pagename_dots) { | |
256 | $lines[$i] = 'name='.$newname_dots; | |
257 | $changed = true; | |
258 | } else if ($groupname != $newgroupname) { | |
259 | $links = wiki_links_in_line($line, $groupname); | |
260 | $newline = ''; $last = 0; | |
261 | foreach ($links as $link) if ($link['group'] == $groupname) { | |
262 | $newline .= substr($line, $last, $link['pos']); | |
263 | $newline .= '[['.$link['href'].$link['sup'].($link['alt']?(' |'.$link['alt']):'').']]'; | |
264 | $last = $link['pos']+$link['size']; | |
265 | $changedLinks++; | |
266 | } | |
267 | if ($last != 0) { | |
268 | $newline .= substr($line, $last); | |
269 | $lines[$i] = $newline; | |
270 | $changed = true; | |
271 | } | |
272 | } | |
273 | } | |
274 | wiki_putfile($newfile, join("\n", $lines)); | |
275 | ||
276 | // change wiki links in all wiki pages | |
277 | $endname = substr($pagename_dots, strpos($pagename_dots,'.')+1); | |
278 | $pages = array(); | |
279 | exec("grep ".$endname." ".wiki_work_dir()."/* -sc", $pages); | |
280 | foreach($pages as $line) { | |
281 | if (preg_match('%/([^/:]+):([0-9]+)$%', $line, $vals) && $vals[2] > 0) { | |
282 | $inpage = $vals[1]; | |
283 | $lines = explode("\n", file_get_contents(wiki_work_dir().'/'.$inpage)); | |
284 | $changed = false; | |
285 | // find all wiki links in page and change if linked to this page | |
286 | foreach ($lines as $i => $line) { | |
287 | $links = wiki_links_in_line($line, substr($inpage, 0, strpos($inpage, '.'))); | |
288 | $newline = ''; $last = 0; | |
289 | foreach ($links as $link) { | |
290 | if ($link['href'] == $pagename_dots) { | |
291 | $newline .= substr($line, $last, $link['pos']); | |
292 | $newline .= '[['.$newname_dots.$link['sup'].($link['alt']?(' |'.$link['alt']):'').']]'; | |
293 | $last = $link['pos']+$link['size']; | |
294 | $changedLinks++; | |
295 | } | |
296 | } | |
297 | if ($last != 0) { | |
298 | $newline .= substr($line, $last); | |
299 | $lines[$i] = $newline; | |
300 | $changed = true; | |
301 | } | |
302 | } | |
303 | if ($changed) | |
304 | { | |
305 | wiki_putfile(wiki_work_dir().'/'.$inpage, join("\n", $lines)); | |
306 | } | |
307 | } | |
308 | } | |
309 | if ($changedLinks > 0) { | |
310 | return $changedLinks; | |
311 | } | |
312 | return true; | |
313 | } | |
314 | ||
315 | function wiki_rename_folder($pagename, $newname, $changeLinks = true) | |
316 | { | |
317 | } | |
318 | ||
a7de4ef7 | 319 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
0df3edb9 | 320 | ?> |