Junkcode now works.

[ccan] / web / staticjunkcode.php

diff --git a/web/staticjunkcode.php b/web/staticjunkcode.php
new file mode 100644 (file)
index 0000000..bf34215
--- /dev/null
+++ b/web/staticjunkcode.php
@@ -0,0 +1,34 @@
+<?php
+session_start();
+include('logo.html');
+include('menulist.html');
+include('static-configuration');
+?>
+
+<h1> Contents of CCAN <?=$argv[1]?> </h1>
+<p>
+
+<table align="center" width="80%" border="0" cellpadding="3" cellspacing="1">
+<?php 
+$d = dir($argv[1]);
+$files = array();
+while (false !== ($entry = $d->read())) {
+       if ($entry[0] != '.') {
+               array_push($files, $entry);
+       }
+}
+$d->close();
+sort($files);
+
+foreach ($files as $file) {
+       $size = round((filesize($argv[1]."/".$file) + 1023) / 1024);
+       ?>
+       <tr>
+         <td><a href="<?=$argv[2]."/".$file?>"><?=$file?> (<?=$size?>K)</td>
+       </tr>
+       <?php
+}
+?>
+</table>
+<hr>
+</body></html>