slitaz-forge view mirror/root/dir-generator.php @ rev 378
Update mirror/dir-generator.php
| author | Pascal Bellard <pascal.bellard@slitaz.org> |
|---|---|
| date | Mon Oct 21 12:59:37 2013 +0000 (2013-10-21) |
| parents | 5fa7c0df4e0d |
| children | f53863f3e839 |
line source
1 <?php
2 function redirect()
3 {
4 ?>
5 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
6 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
7 <html xml:lang="en" xmlns="http://www.w3.org/1999/xhtml" lang="en">
8 <head>
9 <title>SliTaz mirror redirection</title>
10 <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1" />
11 <meta name="description" content="slitaz mirror redirection" />
12 <meta name="robots" content="index, nofollow" />
13 <meta name="author" content="SliTaz Contributors" />
14 <meta http-equiv="Refresh" content="0;url=http://mirror.slitaz.org/">
15 </head>
16 <?php
17 }
19 $VERSION = "0.2-slitaz";
21 /* Lighttpd Enhanced Directory Listing Script
22 * ------------------------------------------
23 * Authors: Evan Fosmark <me@evanfosmark.com>,
24 * Pascal Bellard <pascal.bellard@slitaz.org>
25 * Christophe Lincoln <pankso@slitaz.org>
26 *
27 *
28 * GNU License Agreement
29 * ---------------------
30 * This program is free software; you can redistribute it and/or modify
31 * it under the terms of the GNU General Public License as published by
32 * the Free Software Foundation; either version 2 of the License, or
33 * (at your option) any later version.
34 *
35 * This program is distributed in the hope that it will be useful,
36 * but WITHOUT ANY WARRANTY; without even the implied warranty of
37 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
38 * GNU General Public License for more details.
39 *
40 * You should have received a copy of the GNU General Public License
41 * along with this program; if not, write to the Free Software
42 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
43 *
44 * http://www.gnu.org/licenses/gpl.txt
45 */
47 // Get the path (cut out the query string from the request_uri)
48 list($path) = explode('?', $_SERVER['REQUEST_URI']);
51 // Get the path that we're supposed to show.
52 $path = ltrim(rawurldecode($path), '/');
55 if(strlen($path) == 0) {
56 $path = "./";
57 }
60 // Can't call the script directly since REQUEST_URI won't be a directory
61 if($_SERVER['PHP_SELF'] == '/'.$path) {
62 redirect();
63 // die("Unable to call " . $path . " directly.");
64 }
67 $vpath = ($path != "./")?$path:"";
68 // Make sure it is valid.
69 if(!is_dir($path)) {
70 // die("<b>" . $path . "</b> is not a valid path.");
71 $path = dirname($_SERVER["SCRIPT_FILENAME"]);
72 list($vpath) = explode('?', $_SERVER['REQUEST_URI']);
73 $vpath = ltrim(rawurldecode($vpath), '/');
74 }
77 //
78 // This function returns the file size of a specified $file.
79 //
80 function format_bytes($size, $precision=1) {
81 $sizes = array('Y', 'Z', 'E', 'P', 'T', 'G', 'M', 'K', '');
82 $total = count($sizes);
84 while($total-- && $size > 1024) $size /= 1024;
85 if ($sizes[$total] == '') {
86 $size /= 1024;
87 $total--;
88 }
89 return sprintf('%.'.$precision.'f', $size).$sizes[$total];
90 }
92 //
93 // Get some variables from /etc/lighttpd/lighttpd.conf
94 //
95 $conf_lightty = file_get_contents("/etc/lighttpd/lighttpd.conf");
97 function get_conf($var,$start,$stop,$default='') {
98 global $conf_lightty;
100 if (!preg_match('/'.$var.'/',$conf_lightty)) return $default;
101 $filter = '/(.*\n)*'.$var.'\s*=\s*'.$start.'(([^'.$stop.']*\n*)*)'.$stop.'(.*\n)*/';
102 return preg_replace($filter,'$2',$conf_lightty);
103 }
105 $encoding = get_conf('dir-listing.encoding','"','"','ascii');
106 $external_css = get_conf('dir-listing.external-css','"','"');
108 $show_hidden_files = false;
109 if (get_conf('dir-listing.hide-dotfile','"','"','disable') == "disable") {
110 $show_hidden_files = true;
111 }
112 // get_conf('dir-listing.exclude','\(','\)');
113 // get_conf('dir-listing.set-footer','"','"');
115 $mime_types = array();
116 foreach (explode(',',get_conf('mimetype.assign','\(','\)')) as $item) {
117 $filter = '/\s*"(.*)"\s*=>\s*"(.*)".*/';
118 $val = explode(',',preg_replace($filter,'$1,$2',$item));
119 if (isset($val[1])) $mime_types[$val[0]] = $val[1];
120 }
122 //
123 // This function returns the mime type of $file.
124 //
125 function get_file_type($file) {
126 global $mime_types;
128 $file = basename($file);
129 $default_type = "application/octet-stream";
130 if (isset($mime_types[$file])) {
131 return $mime_types[$file];
132 }
133 $pos = strrpos($file, ".");
134 if ($pos === false) {
135 return $default_type;
136 }
137 //FIXME .tar.gz
138 $ext = '.'.rtrim(substr($file, $pos+1), "~");
139 if (isset($mime_types[$ext])) {
140 return $mime_types[$ext];
141 }
142 return $default_type;
143 }
145 //$slitaz_style = (dirname($_SERVER["PHP_SELF"]) == '/');
146 //$slitaz_style = ($_SERVER["SERVER_NAME"] == "mirror.slitaz.org");
147 $slitaz_style = preg_match("/mirror\.slitaz\./",$_SERVER["SERVER_NAME"]);
148 if ($slitaz_style) {
149 $fvalue = "";
150 if (isset($_GET['f'])) $fvalue = 'value="'.$_GET['f'].'"';
151 print <<<EOT
152 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
153 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
154 <html xml:lang="en" xmlns="http://www.w3.org/1999/xhtml" lang="en">
155 <head>
156 <title>Index of /$vpath</title>
157 <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1" />
158 <meta name="description" content=">Index of /$vpath" />
159 <meta name="robots" content="index, nofollow" />
160 <meta name="author" content="SliTaz Contributors" />
161 <link rel="shortcut icon" href="/static/favicon.ico" />
162 <link rel="stylesheet" type="text/css" href="/static/slitaz.css" />
163 <style type="text/css">
164 #block { min-height: 160px; }
165 div.list { background-color: white; padding-bottom: 14px; }
166 th, td { font: 90% monospace; text-align: left; }
167 th { font-weight: bold; padding-right: 14px; padding-bottom: 3px; }
168 td { padding-right: 14px; }
169 td.s, th.s { text-align: right; }
170 </style>
171 </head>
172 <body>
174 <!-- Header -->
175 <div id="header">
176 <div id="logo"></div>
177 <div id="network">
178 <a href="http://www.slitaz.org/">
179 <img src="/static/home.png" alt="[ Home ]" /></a>
180 <a href="http://scn.slitaz.org/">Community</a>
181 <a href="http://doc.slitaz.org/">Doc</a>
182 <a href="http://forum.slitaz.org/">Forum</a>
183 <a href="http://pro.slitaz.org/">Pro</a>
184 <a href="https://slitaz.spreadshirt.net/">Shop</a>
185 <a href="http://bugs.slitaz.org">Bugs</a>
186 <a href="http://hg.slitaz.org/?sort=lastchange">Hg</a>
187 <a href="http://cook.slitaz.org/">Cook</a>
188 </div>
189 <h1><a href="http://mirror.slitaz.org/">SliTaz Mirror</a></h1>
190 </div>
192 <!-- Block -->
193 <div id="block">
194 <!-- Navigation -->
195 <div id="block_nav">
196 <h4>Online Tools</h4>
197 <ul>
198 <li><a href="http://pizza.slitaz.me/">Live ISO Builder</a></li>
199 <li><a href="http://pizza.slitaz.org/">Live flavor Builder</a></li>
200 <li><a href="http://tiny.slitaz.org/">Tiny SliTaz Builder</a></li>
201 <li><a href="http://boot.slitaz.org/">Web Boot</a></li>
202 </ul>
203 </div>
204 <!-- Information/image -->
205 <div id="block_info">
206 <h4>Welcome to Open Source!</h4>
207 EOT;
208 if (preg_match("/mirror\.slitaz\./",$_SERVER["SERVER_NAME"])) print <<<EOT
209 <p>This is the SliTaz GNU/Linux main mirror. The server runs naturally
210 SliTaz (stable) in an lguest virtual machine provided by
211 <a href="http://www.ads-lu.com/">ADS</a> and is located in France.
212 <a href="/info/">Mirror info...</a></p>
213 EOT;
214 print <<<EOT
215 <form action="${_SERVER["REQUEST_URI"]}" method="get" style="width: 300px;">
216 <p><input type="text" name="f" $fvalue
217 style="width: 260px;" /></p>
218 </form>
219 </div>
220 </div>
222 <script type="text/javascript" src="/static/qrcode.js"></script>
223 <div id="lang">
224 Path: /${vpath}
225 </div>
227 <!-- Content -->
228 <div id="content">
230 <div id="mirrors">
231 <img src="/static/network.png" alt="[ Mirrors ]" style="margin-right: 5px;" />
232 EOT;
234 // Mirror list
235 $mirrors = array();
236 $fp = @fopen(dirname($_SERVER["SCRIPT_FILENAME"])."/mirrors","r");
237 if ($fp) {
238 while (($line = fgets($fp)) !== false) {
239 $line = chop($line);
240 $url = parse_url($line);
241 if ($_SERVER["SERVER_NAME"] == $url['host']) continue;
242 $host = explode('.',$url['host']);
243 $mirrors[$host[count($host)-2].".".
244 $host[count($host)-1]] = $line;
245 }
246 }
247 fclose($fp);
248 foreach($mirrors as $name => $url) {
249 echo "<a href=\"$url$vpath\" title=\"$name mirror\">$name</a>\n";
250 }
251 echo "</div>";
252 }
253 else {
255 // Print the heading stuff
256 print "<?xml version='1.0' encoding='$encoding'?>
257 <!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.1//EN' 'http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd'>
258 <html xmlns='http://www.w3.org/1999/xhtml' xml:lang='en'>
259 <head>
260 <title>Index of /" .$vpath. "</title>
261 ";
262 if ($external_css != '') {
263 print " <link rel='stylesheet' type='text/css' href='".$external_css."' />
264 ";
265 }
266 else {
267 print " <style type='text/css'>
268 a, a:active {text-decoration: none; color: blue;}
269 a:visited {color: #48468F;}
270 a:hover, a:focus {text-decoration: underline; color: red;}
271 body {background-color: #F5F5F5;}
272 h2 {margin-bottom: 12px;}
273 table {margin-left: 12px;}
274 th, td { font: 90% monospace; text-align: left;}
275 th { font-weight: bold; padding-right: 14px; padding-bottom: 3px;}
276 td {padding-right: 14px;}
277 td.s, th.s {text-align: right;}
278 div.list { background-color: white; border-top: 1px solid #646464; border-bottom: 1px solid #646464; padding-top: 10px; padding-bottom: 14px;}
279 div.foot { font: 90% monospace; color: #787878; padding-top: 4px;}
280 </style>
281 ";
282 }
283 print " </head>
284 <body>
285 <h2>Index of /" . $vpath ."</h2>
286 ";
287 }
289 print " <div class='list'>
290 <table summary='Directory Listing' cellpadding='0' cellspacing='0'>
291 ";
293 function my_is_file($path) // 2G+ file support
294 {
295 exec("[ -f '".$path."' ]", $tmp, $ret);
296 return $ret == 0;
297 //return is_file($path);
298 }
300 function my_filesize($path) // 2G+ file support
301 {
302 return rtrim(shell_exec("stat -Lc %s '".$path."'"));
303 //return filesize($path);
304 }
306 function my_filemtime($path) // 2G+ file support
307 {
308 return rtrim(shell_exec("stat -Lc %Y '".$path."'"));
309 //return filemtime($path);
310 }
312 function my_filemtimeasc($path) // 2G+ file support
313 {
314 return rtrim(shell_exec("LC_ALL=C date -r '".$path."' '+%Y-%b-%d %H:%M:%S'"));
315 //return date('Y-M-d H:m:s', filemtime($path));
316 }
318 if (filesize($path.".folderlist") > 0 && filesize($path.".filelist") > 0) {
319 $folderlist = unserialize(file_get_contents($path.".folderlist"));
320 $filelist = unserialize(file_get_contents($path.".filelist"));
321 }
322 else {
324 proc_nice(10);
325 // Get all of the folders and files.
326 $folderlist = array();
327 $filelist = array();
328 if($handle = @opendir($path)) {
329 while(($item = readdir($handle)) !== false) {
330 if ($item == "index.php") continue;
331 if ($item == ".folderlist") continue;
332 if ($item == ".filelist") continue;
333 if ($item == "dir-generator.php") continue;
334 if(is_dir($path.'/'.$item) and $item != '.' and $item != '..') {
335 $folderlist[] = array(
336 'name' => $item,
337 'size' => 0,
338 'modtime'=> filemtime($path.'/'.$item),
339 'modtimeasc'=> my_filemtimeasc($path.'/'.$item),
340 'file_type' => "Directory"
341 );
342 }
343 elseif(my_is_file($path.'/'.$item)) {
344 if(!$show_hidden_files) {
345 if(substr($item, 0, 1) == "." or substr($item, -1) == "~") {
346 continue;
347 }
348 }
349 $filelist[] = array(
350 'name'=> $item,
351 'size'=> my_filesize($path.'/'.$item),
352 'modtime'=> my_filemtime($path.'/'.$item),
353 'modtimeasc'=> my_filemtimeasc($path.'/'.$item),
354 'file_type' => get_file_type($path.'/'.$item)
355 );
356 }
357 }
358 closedir($handle);
359 file_put_contents($path.".folderlist",serialize($folderlist),LOCK_EX);
360 file_put_contents($path.".filelist",serialize($filelist),LOCK_EX);
361 }
362 }
364 if (isset($_GET['f'])) {
365 $filter = $_GET['f'];
366 if (substr($filter,0,1) != '/')
367 $filter = '/'.$filter.'/i';
368 foreach ($filelist as $key => $value)
369 if (!preg_match($filter,$value['name']))
370 unset($filelist[$key]);
371 foreach ($folderlist as $key => $value)
372 if (!preg_match($filter,$value['name']))
373 unset($folderlist[$key]);
374 }
376 if(!isset($_GET['s'])) {
377 $_GET['s'] = 'name';
378 }
380 // Figure out what to sort files by
381 $file_order_by = array();
382 foreach ($filelist as $key=>$row) {
383 $file_order_by[$key] = $row[$_GET['s']];
384 }
386 // Figure out what to sort folders by
387 $folder_order_by = array();
388 foreach ($folderlist as $key=>$row) {
389 $folder_order_by[$key] = $row[$_GET['s']];
390 }
392 // Order the files and folders
393 $sort_type = SORT_ASC;
394 $order = "&o=d";
395 if(isset($_GET['o'])) {
396 $sort_type = SORT_DESC;
397 $order = "";
398 }
399 array_multisort($folder_order_by, $sort_type, $folderlist);
400 array_multisort($file_order_by, $sort_type, $filelist);
403 // Show sort methods
404 print "<thead><tr>";
406 $sort_methods = array();
407 $sort_methods['name'] = "Name";
408 $sort_methods['modtime'] = "Last Modified";
409 $sort_methods['size'] = "Size";
410 $sort_methods['file_type'] = "Type";
412 foreach($sort_methods as $key=>$item) {
413 if ($_GET['s'] == $key) $key = "$key$order";
414 print "<th class='n'><a href='?s=$key'>$item</a></th>";
415 }
416 print "</tr></thead>\n<tbody>\n";
420 // Parent directory link
421 if($path != "./") {
422 print "<tr><td class='n'><a href='..'>Parent Directory</a>/</td>";
423 print "<td class='m'> </td>";
424 print "<td class='s'>- </td>";
425 print "<td class='t'>Directory</td></tr>\n";
426 }
430 // Print folder information
431 foreach($folderlist as $folder) {
432 print "<tr><td class='n'><a href='" . addslashes($folder['name']). "'>" .htmlentities($folder['name']). "</a>/</td>";
433 print "<td class='m'>" . $folder['modtimeasc'] . "</td>";
434 print "<td class='s'>- </td>";
435 print "<td class='t'>" . $folder['file_type'] . "</td></tr>\n";
436 }
439 // Print file information
440 foreach($filelist as $file) {
441 $url = addslashes($file['name']);
442 print "<tr><td class='n'><a href='$url'>" .htmlentities($file['name']). "</a></td>";
443 print "<td class='m'>" . $file['modtimeasc'] .
444 " <img src=\"/static/qr.png\" alt=\"@\" onmouseover=" .
445 "\"this.title = location.href+'$url'\" onclick=" .
446 "\"this.src = QRCode.generatePNG(location.href+'$url', " .
447 "{ecclevel: 'H'}) \"/>" .
448 "</td>";
449 print "<td class='s'>" . format_bytes($file['size']) . "</td>";
450 print "<td class='t'>" . $file['file_type'] . "</td></tr>\n";
451 }
453 // Print ending stuff
454 $soft = explode('/',$_SERVER["SERVER_SOFTWARE"]);
455 $tag = get_conf('server.tag','"','"',$soft[0].' <'.$soft[1].'>');
456 print "</tbody>
457 </table>
458 ".count($folderlist)." folders and ".count($filelist)." files.</div>";
459 if ($slitaz_style) { ?>
461 <!-- End of content -->
462 </div>
464 <!-- Footer -->
465 <div id="footer">
466 Copyright © <span class="year"></span>
467 <a href="http://www.slitaz.org/">SliTaz</a> - Network:
468 <a href="http://scn.slitaz.org/">Community</a>
469 <a href="http://doc.slitaz.org/">Doc</a>
470 <a href="http://forum.slitaz.org/">Forum</a>
471 <a href="http://pkgs.slitaz.org/">Packages</a>
472 <a href="http://bugs.slitaz.org">Bugs</a>
473 <a href="http://hg.slitaz.org/?sort=lastchange">Hg</a>
474 <p>
475 <img src="/static/qr.png" alt="#" onmouseover="this.title = location.href"
476 onclick="this.src = QRCode.generatePNG(location.href, {ecclevel: 'H'})" />
477 SliTaz @
478 <a href="http://twitter.com/slitaz">Twitter</a>
479 <a href="http://www.facebook.com/slitaz">Facebook</a>
480 <a href="http://distrowatch.com/slitaz">Distrowatch</a>
481 <a href="http://en.wikipedia.org/wiki/SliTaz">Wikipedia</a>
482 <a href="http://flattr.com/profile/slitaz">Flattr</a>
483 </p>
484 <p>
485 <a href="http://validator.w3.org/check?uri=referer">
486 <img src="/static/xhtml10.png"
487 alt="Valid XHTML 1.0" title="Code validé XHTML 1.0"
488 style="width: 80px; height: 15px;" /></a>
489 </p>
490 </div>
492 <?php }
493 else print "
494 <form action='".$_SERVER["REQUEST_URI"]."' method='get'>
495 <div class='foot'>".$tag."
496 <input type='text' name='f'/>
497 <!-- <input type='submit' value='Filter' /> -->
498 </div>
499 </form>
500 ";
501 print "</body>
502 </html>";
503 ?>