Mercurial > dirlist-php

comparison index.php @ 4:7812af1c23ae

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Actual refactor.
author edogawaconan <me@myconan.net>
date Tue, 21 Oct 2014 21:31:38 +0900
parents 9ea8be5b28d1
children b84ce3ef4c9d
comparison
equal deleted inserted replaced
3:9ea8be5b28d1 4:7812af1c23ae
1 <?php 1 <?php
2 //real men use UTC for internets 2 // Required for strftime(). Set to UTC because :internet:.
3 date_default_timezone_set('UTC'); 3 date_default_timezone_set('UTC');
4 $wwwroot = $_ENV["DOCUMENT_ROOT"]; 4
5 $link_prefix = "/"; 5 // $path: actual requested path, with $alias_prefix removed, relative to $root.
6 $link_base = rtrim(preg_replace("#/+#", "/", urldecode($_ENV["REQUEST_URI"])),'/'); 6 $path = $_SERVER["REQUEST_URI"];
7 $link_path = substr($link_base,strlen(utf8_decode($link_prefix))); 7 $query_string_start = strpos($path, "?");
8 $path = realpath("$wwwroot/".$link_path); 8 if ($query_string_start !== false) {
9 if (!$path) { die("fail"); } 9 $path = substr($path, 0, $query_string_start);
10 $dir_handle = @opendir($path); 10 }
11 $to_dir = explode('/', trim($link_path,'/')); 11 $path = urldecode($path);
12 array_unshift($to_dir, trim($link_prefix,'/')); 12
13 $prefix = $_SERVER["DL_PREFIX"];
14
15 $path = substr($path, strlen(utf8_decode($prefix)));
16 if ($path === false) { $path = "/"; }
17
18 // root of directory listing.
19 $root = $_SERVER["DL_ROOT"];
20 if ($root === "") { $root = $_SERVER["DOCUMENT_ROOT"]; }
21
22 // current directory being listed.
23 $current_dir = $root . $path;
24
25 if (realpath($root . $path) === false) {
26 header("HTTP/1.0 404 Not Found");
27 } elseif (substr($current_dir, -1) !== "/") {
28 header("Location: " . $path . "/", false, 301);
29 }
30
31 if (http_response_code() !== 200) { exit; }
32
33 // $link_prefix = "/";
34 // $link_base = rtrim(preg_replace("#/+#", "/", urldecode($_ENV["REQUEST_URI"])),'/');
35 // $link_path = substr($link_base,strlen(utf8_decode($link_prefix)));
36 // $path = realpath("$wwwroot/".$link_path);
37 // if (!$path) { die("fail"); }
38
39 $dir_handle = @opendir($root . $path);
13 $files = array(); 40 $files = array();
14 $dirs = array(); 41 $dirs = array();
15 while ($file = readdir($dir_handle)) { 42 while (($file = readdir($dir_handle)) !== false) {
16 if ($file == '.' or $file == '..') { continue; } 43 if ($file === "." or $file === "..") { continue; }
17 elseif (is_dir("$path/$file")) { $dirs[] = $file; } 44 elseif (is_dir($root . $path . $file)) { $dirs[] = $file; }
18 else { $files[] = $file; } 45 else { $files[] = $file; }
19 } 46 }
20 sort($files); 47 sort($files);
21 sort($dirs); 48 sort($dirs);
22 function h($string) { return htmlspecialchars($string, ENT_QUOTES, 'UTF-8'); } 49
50 // BEGIN UTILITY
51 function h($string) { return htmlspecialchars($string, ENT_QUOTES, "UTF-8"); }
23 function a($string) { return preg_replace("#(%2F)+#", "/", rawurlencode($string)); } 52 function a($string) { return preg_replace("#(%2F)+#", "/", rawurlencode($string)); }
24 function link_to($target, $title) { 53 function link_to($target, $title) { return('<a href="' . a($target) . '">' . h($title) . "</a>"); }
25 return("<a href=\"".a($target)."\">".h($title)."</a>"); 54
26 } 55 function human_size($size) {
27 function path_tree_header() { 56 $thousand_units = array("ko", "Mo", "Go", "To", "Po");
28 global $link_prefix, $link_base, $to_dir;
29 $path_tree = link_to('/', '[root]') . "/";
30 foreach ($to_dir as $level => $dir) {
31 if($dir) {
32 $link = "/";
33 for ($i = 0; $i <= $level; $i++) { $link .= "$to_dir[$i]/"; }
34 $path_tree .= link_to($link, $dir)."/";
35 }
36 }
37 return "Index of $path_tree";
38 }
39 function title() {
40 global $link_base;
41 return "Index of ".h(rtrim($link_base,"/")."/");
42 }
43
44 function nice_size($size) {
45 $thousand_units = array('ko', 'Mo', 'Go', 'To', 'Po');
46 57
47 $return_format = "%d %s"; 58 $return_format = "%d %s";
48 59
49 if ($size <= 1) { 60 if ($size <= 1) {
50 $return_unit = "octet"; 61 $return_unit = "octet";
51 } elseif ($size < 10000) { 62 } elseif ($size < 1000) {
52 $return_unit = "octets"; 63 $return_unit = "octets";
53 } else { 64 } else {
54 $size /= 1000; 65 $size /= 1000;
55 for ($i = 0; $size >= 1000 && $i < count($thousand_units); $i++) { $size /= 1000; } 66 for ($i = 0; $size >= 1000 && $i < count($thousand_units); $i++) { $size /= 1000; }
56 $return_format = "%.2f %s"; 67 $return_format = "%.2f %s";
57 $return_unit = $thousand_units[$i]; 68 $return_unit = $thousand_units[$i];
58 } 69 }
59 return sprintf($return_format, $size, $return_unit); 70 return sprintf($return_format, $size, $return_unit);
60 } 71 }
72 // END UTILITY
73
74 function tree_link() {
75 global $path, $prefix;
76
77 $path_array = explode("/", trim($path, "/"));
78 array_unshift($path_array, trim($prefix, "/"));
79
80 $tree_path = "/";
81 $tree_link = link_to($tree_path, "[root]") . "/";
82
83 foreach ($path_array as $p) {
84 if ($p === "") { continue; }
85 $tree_path .= $p . "/";
86 $tree_link .= link_to($tree_path, $p) . "/";
87 }
88
89 return $tree_link;
90 }
61 91
62 function file_rows($files, $is_dir) { 92 function file_rows($files, $is_dir) {
63 global $path, $link_base, $link_prefix; 93 global $path, $root, $prefix;
64 94
65 $file_rows = ""; 95 $file_rows = "";
96 $file_suffix = "";
97
66 if ($is_dir) { 98 if ($is_dir) {
67 $file_suffix = "/"; 99 $file_suffix = "/";
68 if($link_base != $link_prefix) { 100
69 $file_rows .= "<tr><td colspan=3>".link_to(dirname($link_base)."/","..")."</td></tr>"; 101 if ($path !== "/") {
70 } 102 $file_rows .= "<tr><td colspan=3>" . link_to(dirname($prefix . $path) . "/", "..") . "</td></tr>";
71 } else { $file_suffix = ""; } 103 }
104 }
72 105
73 foreach($files as $file) { 106 foreach($files as $file) {
74 $file_stat = stat("$path/".$file); 107 $file_stat = stat($root . $path . "/". $file);
75 108
76 $file_rows .= "<tr>"; 109 $file_rows .= "<tr>";
77 $file_rows .= "<td>".link_to("$link_base/".$file.$file_suffix, $file.$file_suffix)."</td>"; 110 $file_rows .= "<td>".link_to($file . $file_suffix, $file . $file_suffix)."</td>";
78 111
79 $file_rows .= "<td>"; 112 $file_rows .= "<td>";
80 if ($is_dir) { $file_rows .= "[dir]"; } 113 if ($is_dir) { $file_rows .= "[dir]"; }
81 else { $file_rows .= nice_size($file_stat['size']); } 114 else { $file_rows .= human_size($file_stat['size']); }
82 $file_rows .= "</td>"; 115 $file_rows .= "</td>";
83 116
84 $file_rows .= "<td>".h(strftime("%Y-%m-%d %H:%M %Z", $file_stat['mtime']))."</td>"; 117 $file_rows .= "<td>".h(strftime("%Y-%m-%d %H:%M %Z", $file_stat['mtime']))."</td>";
85 118
86 $file_rows .= "</tr>"; 119 $file_rows .= "</tr>";
90 ?> 123 ?>
91 <?php header('Content-Type: text/html; charset=utf-8'); ?> 124 <?php header('Content-Type: text/html; charset=utf-8'); ?>
92 <!doctype html> 125 <!doctype html>
93 <head> 126 <head>
94 <meta http-equiv="Content-Type" content="text/html;charset=UTF-8"> 127 <meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
95 <title><?php echo title(); ?></title> 128 <title>Index of <?php echo h($prefix . $path); ?></title>
96 <meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=0"> 129 <meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=0">
97 <style type="text/css"> 130 <style type="text/css">
98 * { box-sizing: border-box; } 131 * { box-sizing: border-box; }
99 body { 132 body {
100 font-family: Segoe UI, sans-serif; 133 font-family: Segoe UI, sans-serif;
145 } 178 }
146 } 179 }
147 </style> 180 </style>
148 </head> 181 </head>
149 <body> 182 <body>
150 <h1><?php echo path_tree_header(); ?></h1> 183 <h1>Index of <?php echo tree_link(); ?></h1>
151 184
152 <table> 185 <table>
153 <thead><tr> 186 <thead><tr>
154 <th>File</th> 187 <th>File</th>
155 <th>Size</th> 188 <th>Size</th>
158 <tbody> 191 <tbody>
159 <?php echo file_rows($dirs, true); ?> 192 <?php echo file_rows($dirs, true); ?>
160 <?php echo file_rows($files, false); ?> 193 <?php echo file_rows($files, false); ?>
161 </tbody> 194 </tbody>
162 </table> 195 </table>
196
197 <footer>
198 <hr>
199 <em>
200 Running <a href="https://bitbucket.org/edogawaconan/dirlist-php">dirlist-php</a>.
201 Powered by PHP <?php echo phpversion(); ?>.
202 </em>
163 </body> 203 </body>