Mercurial > dirlist-php
annotate index.php @ 34:f761177dc1d4
Remove error suppression.
author | edogawaconan <me@myconan.net> |
---|---|
date | Tue, 04 Nov 2014 10:55:32 +0900 |
parents | dc464717e028 |
children | 21132c7b6aaa |
rev | line source |
---|---|
0 | 1 <?php |
33 | 2 define('DL_VERSION', '2.0.1'); |
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 | |
52 if ($size <= 1) { | |
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 } |
4 | 64 // END UTILITY |
65 | |
66 function tree_link() { | |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
67 global $uri; |
4 | 68 |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
69 $uri_array = explode("/", trim($uri, "/")); |
4 | 70 |
71 $tree_path = "/"; | |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
72 $tree_link = link_to($tree_path, "[root]"); |
20
caf498a0c602
Hide [root] for aliased directory.
edogawaconan <me@myconan.net>
parents:
19
diff
changeset
|
73 $tree_link .= "/"; |
4 | 74 |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
75 foreach ($uri_array as $p) { |
4 | 76 if ($p === "") { continue; } |
77 $tree_path .= $p . "/"; | |
78 $tree_link .= link_to($tree_path, $p) . "/"; | |
79 } | |
80 | |
81 return $tree_link; | |
82 } | |
3 | 83 |
2 | 84 function file_rows($files, $is_dir) { |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
85 global $dir, $uri; |
3 | 86 |
2 | 87 $file_rows = ""; |
4 | 88 $file_suffix = ""; |
89 | |
2 | 90 if ($is_dir) { |
91 $file_suffix = "/"; | |
4 | 92 |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
93 if ($uri !== "/") { |
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
94 $file_rows .= "<tr><td colspan=3>" . link_to(dirname($uri) . "/", "[up]") . "</td></tr>"; |
2 | 95 } |
4 | 96 } |
3 | 97 |
2 | 98 foreach($files as $file) { |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
99 $file_stat = stat($dir . "/". $file); |
3 | 100 |
101 $file_rows .= "<tr>"; | |
4 | 102 $file_rows .= "<td>".link_to($file . $file_suffix, $file . $file_suffix)."</td>"; |
3 | 103 |
104 $file_rows .= "<td>"; | |
2 | 105 if ($is_dir) { $file_rows .= "[dir]"; } |
4 | 106 else { $file_rows .= human_size($file_stat['size']); } |
3 | 107 $file_rows .= "</td>"; |
108 | |
109 $file_rows .= "<td>".h(strftime("%Y-%m-%d %H:%M %Z", $file_stat['mtime']))."</td>"; | |
110 | |
2 | 111 $file_rows .= "</tr>"; |
112 } | |
113 return $file_rows; | |
114 } | |
0 | 115 ?> |
3 | 116 <?php header('Content-Type: text/html; charset=utf-8'); ?> |
117 <!doctype html> | |
118 <head> | |
119 <meta http-equiv="Content-Type" content="text/html;charset=UTF-8"> | |
23
949398173ecb
Much simpler setup with $request_filename.
edogawaconan <me@myconan.net>
parents:
22
diff
changeset
|
120 <title>Index of <?php echo h($uri); ?></title> |
3 | 121 <meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=0"> |
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
122 <link rel="stylesheet" href="//cdnjs.cloudflare.com/ajax/libs/magnific-popup.js/0.9.9/magnific-popup.css"> |
3 | 123 <style type="text/css"> |
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
124 .mfp-content figure { margin: 0; } |
3 | 125 * { box-sizing: border-box; } |
126 body { | |
127 font-family: Segoe UI, sans-serif; | |
128 font-size: 14px; | |
129 } | |
130 h1 { margin: 5px; } | |
131 table { | |
132 width: 100%; | |
133 } | |
134 th:first-child, td:first-child { | |
135 width: 100%; | |
136 white-space: pre-wrap; | |
137 word-wrap: break-word; | |
138 word-break: break-all; | |
139 } | |
140 tr { | |
141 position: relative; | |
142 } | |
143 th, td { | |
144 white-space: nowrap; | |
145 padding: 2px 5px; | |
146 } | |
147 | |
148 @media (min-width: 768px) { | |
149 th { background: #ccc; } | |
150 tr:nth-child(even) { background: #eee; } | |
151 tr:hover { background: #ddd; } | |
152 } | |
153 | |
154 @media (max-width: 767px) { | |
155 table { | |
156 border-spacing: 0 10px; | |
157 } | |
158 th { display: none; } | |
159 tr { | |
160 background: #eee; | |
161 } | |
162 td { | |
163 display: inline-block; | |
164 } | |
165 td:first-child { | |
166 background: #ddd; | |
167 padding: 5px; | |
168 } | |
169 table a { | |
170 font-size: 18px; | |
171 display: block; | |
172 } | |
173 } | |
174 </style> | |
175 </head> | |
176 <body> | |
4 | 177 <h1>Index of <?php echo tree_link(); ?></h1> |
3 | 178 |
179 <table> | |
180 <thead><tr> | |
181 <th>File</th> | |
182 <th>Size</th> | |
183 <th>Date</th> | |
184 </tr></thead> | |
185 <tbody> | |
186 <?php echo file_rows($dirs, true); ?> | |
187 <?php echo file_rows($files, false); ?> | |
188 </tbody> | |
189 </table> | |
4 | 190 |
191 <footer> | |
192 <hr> | |
193 <em> | |
22 | 194 Running <a href="https://bitbucket.org/edogawaconan/dirlist-php">dirlist-php <?php echo DL_VERSION ?></a>. |
4 | 195 Powered by PHP <?php echo phpversion(); ?>. |
196 </em> | |
21 | 197 </footer> |
14 | 198 |
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
199 <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
|
200 |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
201 <script src="//cdnjs.cloudflare.com/ajax/libs/magnific-popup.js/0.9.9/jquery.magnific-popup.min.js"></script> |
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
202 |
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
203 <script> |
32
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
204 $(document).ready(function() { |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
205 $("table > tbody > tr > td > a").each(function() { |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
206 if (!this.href.match(/\.(jpe?g|png|gif|webp)$/i)) return |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
207 this.className = "image" |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
208 this.setAttribute("title", this.innerHTML) |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
209 }) |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
210 |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
211 $("table > tbody").magnificPopup({ |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
212 delegate: "a.image", |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
213 type: "image", |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
214 gallery: { enabled: true } |
986aec12eb7f
Use magnific popup instead of lightbox.
edogawaconan <me@myconan.net>
parents:
30
diff
changeset
|
215 }) |
17
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
216 }) |
8b222e3ffe25
Set lightbox attributes through javascript instead of php.
edogawaconan <me@myconan.net>
parents:
16
diff
changeset
|
217 </script> |
3 | 218 </body> |