Mercurial > dirlist-php
annotate index.php @ 47:546c6b40d250
Changed enough stuff to bump minor version.
| author | nanaya <me@myconan.net> |
|---|---|
| date | Sun, 24 May 2015 18:48:11 +0900 |
| parents | 113f9121d38b |
| children | c388003e921a |
| rev | line source |
|---|---|
| 0 | 1 <?php |
|
47
546c6b40d250
Changed enough stuff to bump minor version.
nanaya <me@myconan.net>
parents:
46
diff
changeset
|
2 define('DL_VERSION', '2.2.0'); |
| 4 | 3 // Required for strftime(). Set to UTC because :internet:. |
| 2 | 4 date_default_timezone_set('UTC'); |
| 4 | 5 |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
6 // $uri: web-facing path |
|
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
7 $uri = $_SERVER["REQUEST_URI"]; |
|
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
8 $query_string_start = strpos($uri, "?"); |
| 4 | 9 if ($query_string_start !== false) { |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
10 $uri = substr($uri, 0, $query_string_start); |
| 4 | 11 } |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
12 $uri = urldecode($uri); |
| 4 | 13 |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
14 // $dir: filesystem path |
|
26
eee7ca924a5e
Make it work with apache (at least XAMPP).
edogawaconan <me@myconan.net>
parents:
25
diff
changeset
|
15 if (isset($_SERVER["DL_DIR"])) { $dir = $_SERVER["DL_DIR"]; } |
|
30
c482f0db5c28
Turns out "CONTEXT_DOCUMENT_ROOT" isn't enough.
edogawaconan <me@myconan.net>
parents:
28
diff
changeset
|
16 elseif (isset($_SERVER["CONTEXT_DOCUMENT_ROOT"])) { |
|
c482f0db5c28
Turns out "CONTEXT_DOCUMENT_ROOT" isn't enough.
edogawaconan <me@myconan.net>
parents:
28
diff
changeset
|
17 $dir = $_SERVER["CONTEXT_DOCUMENT_ROOT"]; |
|
c482f0db5c28
Turns out "CONTEXT_DOCUMENT_ROOT" isn't enough.
edogawaconan <me@myconan.net>
parents:
28
diff
changeset
|
18 $dir .= substr($uri, strlen($_SERVER["CONTEXT_PREFIX"])); |
|
c482f0db5c28
Turns out "CONTEXT_DOCUMENT_ROOT" isn't enough.
edogawaconan <me@myconan.net>
parents:
28
diff
changeset
|
19 } |
|
26
eee7ca924a5e
Make it work with apache (at least XAMPP).
edogawaconan <me@myconan.net>
parents:
25
diff
changeset
|
20 else { $dir = $_SERVER["DOCUMENT_ROOT"] . $uri; } |
| 4 | 21 |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
22 if (realpath($dir) === false) { |
| 4 | 23 header("HTTP/1.0 404 Not Found"); |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
24 } elseif (substr($uri, -1) !== "/") { |
|
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
25 header("Location: " . $uri . "/"); |
| 4 | 26 } |
| 27 | |
| 28 if (http_response_code() !== 200) { exit; } | |
| 29 | |
| 34 | 30 $dir_handle = opendir($dir); |
| 2 | 31 $files = array(); |
| 32 $dirs = array(); | |
| 4 | 33 while (($file = readdir($dir_handle)) !== false) { |
|
28
ce92f4d41714
Add support for displaying hidden files.
edogawaconan <me@myconan.net>
parents:
27
diff
changeset
|
34 if ($file === "." || $file === "..") { continue; } |
|
ce92f4d41714
Add support for displaying hidden files.
edogawaconan <me@myconan.net>
parents:
27
diff
changeset
|
35 elseif (!(isset($_SERVER["DL_SHOWALL"]) && $_SERVER["DL_SHOWALL"] === "1") && substr($file, 0, 1) === ".") { continue; } |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
36 elseif (is_dir($dir . $file)) { $dirs[] = $file; } |
| 2 | 37 else { $files[] = $file; } |
| 38 } | |
| 39 sort($files); | |
| 40 sort($dirs); | |
| 4 | 41 |
| 42 // BEGIN UTILITY | |
| 43 function h($string) { return htmlspecialchars($string, ENT_QUOTES, "UTF-8"); } | |
| 2 | 44 function a($string) { return preg_replace("#(%2F)+#", "/", rawurlencode($string)); } |
|
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
45 function link_to($target, $title) { return('<a href="' . a($target) . '">' . h($title) . "</a>"); } |
| 3 | 46 |
| 4 | 47 function human_size($size) { |
| 48 $thousand_units = array("ko", "Mo", "Go", "To", "Po"); | |
| 3 | 49 |
| 50 $return_format = "%d %s"; | |
| 51 | |
| 35 | 52 if ($size === 1) { |
| 3 | 53 $return_unit = "octet"; |
| 4 | 54 } elseif ($size < 1000) { |
| 3 | 55 $return_unit = "octets"; |
| 56 } else { | |
| 57 $size /= 1000; | |
| 58 for ($i = 0; $size >= 1000 && $i < count($thousand_units); $i++) { $size /= 1000; } | |
| 59 $return_format = "%.2f %s"; | |
| 60 $return_unit = $thousand_units[$i]; | |
| 61 } | |
| 62 return sprintf($return_format, $size, $return_unit); | |
| 2 | 63 } |
|
43
54c13838f8bb
Add spacing to before/after hidden data part.
nanaya <me@myconan.net>
parents:
42
diff
changeset
|
64 |
|
45
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
65 function hidden_data($data = "", $is_dir = false) { |
|
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
66 return "<i> " . ($is_dir === true ? 0 : 1) . " " . $data . " </i>"; |
|
43
54c13838f8bb
Add spacing to before/after hidden data part.
nanaya <me@myconan.net>
parents:
42
diff
changeset
|
67 } |
| 4 | 68 // END UTILITY |
| 69 | |
| 70 function tree_link() { | |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
71 global $uri; |
| 4 | 72 |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
73 $uri_array = explode("/", trim($uri, "/")); |
| 4 | 74 |
| 75 $tree_path = "/"; | |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
76 $tree_link = link_to($tree_path, "[root]"); |
|
20
caf498a0c602
Hide [root] for aliased directory.
edogawaconan <me@myconan.net>
parents:
19
diff
changeset
|
77 $tree_link .= "/"; |
| 4 | 78 |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
79 foreach ($uri_array as $p) { |
| 4 | 80 if ($p === "") { continue; } |
| 81 $tree_path .= $p . "/"; | |
| 82 $tree_link .= link_to($tree_path, $p) . "/"; | |
| 83 } | |
| 84 | |
| 85 return $tree_link; | |
| 86 } | |
| 3 | 87 |
| 42 | 88 function up_link() { |
| 89 if ($uri !== "/") { | |
| 90 return "<tr><td colspan=3>" . link_to(dirname($uri) . "/", "[up]") . "</td></tr>"; | |
| 91 } | |
| 92 } | |
| 93 | |
| 2 | 94 function file_rows($files, $is_dir) { |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
95 global $dir, $uri; |
| 3 | 96 |
| 2 | 97 $file_rows = ""; |
| 4 | 98 $file_suffix = ""; |
|
45
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
99 $list_file_prefix = hidden_data("", $is_dir); |
| 4 | 100 |
| 2 | 101 if ($is_dir) { |
| 102 $file_suffix = "/"; | |
| 4 | 103 } |
| 3 | 104 |
| 2 | 105 foreach($files as $file) { |
| 36 | 106 $file_stat = @stat($dir . "/". $file); |
| 3 | 107 |
| 108 $file_rows .= "<tr>"; | |
| 42 | 109 $file_rows .= "<td>". $list_file_prefix . link_to($file . $file_suffix, $file . $file_suffix)."</td>"; |
| 3 | 110 |
| 111 $file_rows .= "<td>"; | |
|
45
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
112 $file_rows .= hidden_data($file_stat["size"], $is_dir); |
|
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
113 if ($is_dir) { $file_rows .= "[dir]"; } |
|
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
114 else { $file_rows .= human_size($file_stat['size']); } |
| 3 | 115 $file_rows .= "</td>"; |
| 116 | |
|
45
7de8f524d1e4
Always group by directory no matter what type of sorting.
nanaya <me@myconan.net>
parents:
44
diff
changeset
|
117 $file_rows .= "<td>" . hidden_data("", $is_dir) . h(strftime("%Y-%m-%d %H:%M %Z", $file_stat['mtime'])) . "</td>"; |
| 3 | 118 |
| 2 | 119 $file_rows .= "</tr>"; |
| 120 } | |
| 121 return $file_rows; | |
| 122 } | |
| 0 | 123 ?> |
| 3 | 124 <?php header('Content-Type: text/html; charset=utf-8'); ?> |
| 125 <!doctype html> | |
| 126 <head> | |
| 37 | 127 <meta charset="utf-8"> |
|
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
128 <title>Index of <?php echo h($uri); ?></title> |
| 39 | 129 <meta name="viewport" content="width=device-width, initial-scale=1.0"> |
|
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
130 <link rel="stylesheet" href="//cdnjs.cloudflare.com/ajax/libs/magnific-popup.js/0.9.9/magnific-popup.css"> |
| 3 | 131 <style type="text/css"> |
|
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
132 .mfp-content figure { margin: 0; } |
| 3 | 133 * { box-sizing: border-box; } |
| 134 body { | |
| 135 font-family: Segoe UI, sans-serif; | |
| 136 font-size: 14px; | |
| 137 } | |
| 138 h1 { margin: 5px; } | |
| 139 table { | |
| 140 width: 100%; | |
| 141 } | |
| 142 th:first-child, td:first-child { | |
| 143 width: 100%; | |
| 144 white-space: pre-wrap; | |
| 145 word-wrap: break-word; | |
| 146 word-break: break-all; | |
| 147 } | |
| 148 tr { | |
| 149 position: relative; | |
| 150 } | |
| 151 th, td { | |
| 152 white-space: nowrap; | |
| 153 padding: 2px 5px; | |
| 154 } | |
| 155 | |
| 42 | 156 i { |
| 157 display: none; | |
| 158 } | |
| 159 | |
| 46 | 160 input { |
| 161 width: 100%; | |
| 162 margin: 10px 0px; | |
| 163 } | |
| 164 | |
| 42 | 165 th span { |
| 166 display: block; | |
| 167 text-decoration: underline; | |
| 168 } | |
| 169 th span.desc:after { | |
| 170 content: " ▼"; | |
| 171 } | |
| 172 th span.asc:after { | |
| 173 content: " ▲"; | |
| 174 } | |
| 175 | |
| 3 | 176 @media (min-width: 768px) { |
| 42 | 177 th { |
| 178 background: #ccc; | |
| 179 cursor: pointer; | |
| 180 } | |
| 3 | 181 tr:nth-child(even) { background: #eee; } |
| 182 tr:hover { background: #ddd; } | |
| 183 } | |
| 184 | |
| 185 @media (max-width: 767px) { | |
| 186 table { | |
| 187 border-spacing: 0 10px; | |
| 188 } | |
| 189 th { display: none; } | |
| 190 tr { | |
| 191 background: #eee; | |
| 192 } | |
| 193 td { | |
| 194 display: inline-block; | |
| 195 } | |
| 196 td:first-child { | |
| 197 background: #ddd; | |
| 198 padding: 5px; | |
| 199 } | |
| 200 table a { | |
| 201 font-size: 18px; | |
| 202 display: block; | |
| 203 } | |
| 204 } | |
| 205 </style> | |
| 206 </head> | |
| 46 | 207 <body id="files"> |
| 4 | 208 <h1>Index of <?php echo tree_link(); ?></h1> |
| 3 | 209 |
| 46 | 210 <input placeholder="search (non-recursive)" class="search" /> |
| 211 | |
| 212 <table> | |
| 42 | 213 <thead> |
| 214 <tr> | |
| 215 <th><span class="sort" data-sort="filename">File</span></th> | |
| 216 <th><span class="sort" data-sort="size">Size</span></th> | |
| 217 <th><span class="sort" data-sort="date">Date</span></th> | |
| 218 </tr> | |
| 219 <?php echo up_link(); ?> | |
| 220 </thead> | |
| 221 <tbody class="list"> | |
| 3 | 222 <?php echo file_rows($dirs, true); ?> |
| 223 <?php echo file_rows($files, false); ?> | |
| 224 </tbody> | |
| 225 </table> | |
| 4 | 226 |
| 227 <footer> | |
| 228 <hr> | |
| 229 <em> | |
| 22 | 230 Running <a href="https://bitbucket.org/edogawaconan/dirlist-php">dirlist-php <?php echo DL_VERSION ?></a>. |
| 4 | 231 Powered by PHP <?php echo phpversion(); ?>. |
| 232 </em> | |
| 21 | 233 </footer> |
| 14 | 234 |
|
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
235 <script src="//cdnjs.cloudflare.com/ajax/libs/zepto/1.1.4/zepto.min.js"></script> |
|
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
236 <script src="//cdnjs.cloudflare.com/ajax/libs/magnific-popup.js/0.9.9/jquery.magnific-popup.min.js"></script> |
| 42 | 237 <script src="//cdnjs.cloudflare.com/ajax/libs/list.js/1.1.1/list.min.js"></script> |
|
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
238 |
|
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
239 <script> |
|
41
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
240 $("table td a").each(function() { |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
241 if (!this.href.match(/\.(jpe?g|png|gif|webp)$/i)) return |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
242 this.className = "image" |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
243 this.setAttribute("title", this.innerHTML) |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
244 }) |
|
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
245 |
|
41
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
246 $("table > tbody").magnificPopup({ |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
247 delegate: "a.image", |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
248 type: "image", |
|
e122e4e55e75
No need to wait for document ready since it's already at the bottom of the page.
nanaya <me@myconan.net>
parents:
40
diff
changeset
|
249 gallery: { enabled: true } |
|
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
250 }) |
| 42 | 251 |
| 252 $("tbody td:nth-child(3n + 1)").addClass("filename") | |
| 253 $("tbody td:nth-child(3n + 2)").addClass("size") | |
| 254 $("tbody td:nth-child(3n + 3)").addClass("date") | |
| 255 | |
| 256 ;(function() { | |
| 257 var | |
| 258 options = { | |
| 259 valueNames: ["filename", "size", "date"], | |
| 260 page: <?php echo count($dirs) + count($files); ?> | |
| 261 }, | |
| 262 list = new List("files", options) | |
| 263 })() | |
|
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
264 </script> |
| 3 | 265 </body> |