Rework LuCI build system
[project/luci.git] / libs / luci-lib-nixio / axTLS / www / lua / test_fs.lua
diff --git a/libs/luci-lib-nixio/axTLS/www/lua/test_fs.lua b/libs/luci-lib-nixio/axTLS/www/lua/test_fs.lua
new file mode 100644 (file)
index 0000000..566ed8b
--- /dev/null
@@ -0,0 +1,23 @@
+function link_dir (dir, base)
+       local path = base.."/"..dir
+       local mode = lfs.attributes (path).mode
+       if mode == "directory" then
+               return string.format ('<a href="%s">%s</a>',
+                       cgilua.mkurlpath ("test_fs.lua", { dir = path }),
+                       dir)
+       else
+               return dir
+       end
+end
+
+cgilua.htmlheader ()
+cgilua.put ("<h1>Testing Filesystem library</h1>\n")
+cgilua.put ("<table>\n")
+cgilua.put ("<tr><td colspan=2>Testing <b>dir</b></td></tr>\n")
+local i = 0
+local dir = cgi.dir or "."
+for file in lfs.dir (dir) do
+       i = i+1
+       cgilua.put ("<tr><td>"..i.."</td><td>"..link_dir(file, dir).."</td></tr>\n")
+end
+cgilua.put ("</table>\n")