lib/libhttp
1
0
Fork 0
mirror of https://github.com/lammertb/libhttp.git synced 2026-01-03 16:02:30 +03:00
Code Activity

Lua environment inventory test should print 'connect' function too

Browse Source
This commit is contained in:
bel
2014-01-05 21:06:05 +01:00
parent 17bab418b3
commit cefffe0858
2 changed files with 65 additions and 52 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
test/page2.lp
View File

@@ -9,48 +9,55 @@
The following features are available:
<ul>
<?
-- function in one Lua tag should still be available in the next one
function test(tab, name)
-- functions defubed in one Lua tag should still be available in the next one
function print_if_available(tab, name)
if tab then
mg.write("<li>" .. name .. "</li>\n")
end
end
function recurse(tab)
mg.write("<ul>\n")
for k,v in pairs(tab) do
for k,v in pairs(tab) do
if type(v) == "table" then
mg.write("<li>" .. tostring(k) .. ":</li>\n")
recurse(v)
else
mg.write("<li>" .. tostring(k) .. " = " .. tostring(v) .. "</li>\n")
mg.write("<li>" .. tostring(k) .. " = " .. tostring(v) .. "</li>\n")
end
end
mg.write("</ul>\n")
end
?>
<?
-- Print Lua version and available libraries
mg.write("<li>" .. _VERSION .. " with the following standard libraries</li>\n")
mg.write("<ul>")
libs = {"string", "math", "table", "io", "os", "bit32", "package", "coroutine", "debug"};
for _,n in ipairs(libs) do
test(_G[n], n);
print_if_available(_G[n], n);
end
mg.write("</ul>\n")
test(sqlite3, "sqlite3 binding")
test(lfs,"lua file system")
print_if_available(sqlite3, "sqlite3 binding")
print_if_available(lfs,"lua file system")
-- Print mg library
libname = "mg"
test(_G[libname], libname .. " library")
print_if_available(_G[libname], libname .. " library")
recurse(_G[libname])
-- Print connect function
print_if_available(connect, "connect function")
?>
</ul></p>
<p> Today is <? mg.write(os.date("%A")) ?>
<p>
<?
-- for k,v in pairs(_G) do mg.write(k, '\n') end
-- for k,v in pairs(_G) do mg.write(k, '\n') end
if lfs then
if lfs then
mg.write("Files in " .. lfs.currentdir())
mg.write("\n<ul>\n")
for f in lfs.dir(".") do

88
test/page2.lua
View File

@@ -9,54 +9,60 @@ mg.write([[<html><body>
The following features are available:
<ul>
]])
-- function in one Lua tag should still be available in the next one
function test(tab, name)
if tab then
mg.write("<li>" .. name .. "</li>\n")
end
end
function recurse(tab)
mg.write("<ul>\n")
for k,v in pairs(tab) do
if type(v) == "table" then
mg.write("<li>" .. tostring(k) .. ":</li>\n")
recurse(v)
else
mg.write("<li>" .. tostring(k) .. " = " .. tostring(v) .. "</li>\n")
end
end
mg.write("</ul>\n")
end
mg.write("<li>" .. _VERSION .. " with the following standard libraries</li>\n")
function print_if_available(tab, name)
if tab then
mg.write("<li>" .. name .. "</li>\n")
end
end
function recurse(tab)
mg.write("<ul>\n")
libs = {"string", "math", "table", "io", "os", "bit32", "package", "coroutine", "debug"};
for _,n in ipairs(libs) do
test(_G[n], n);
for k,v in pairs(tab) do
if type(v) == "table" then
mg.write("<li>" .. tostring(k) .. ":</li>\n")
recurse(v)
else
mg.write("<li>" .. tostring(k) .. " = " .. tostring(v) .. "</li>\n")
end
end
mg.write("</ul>\n")
test(sqlite3, "sqlite3 binding")
test(lfs,"lua file system")
libname = "mg"
test(_G[libname], libname .. " library")
recurse(_G[libname])
end
mg.write("</ul></p>\n");
mg.write("<p> Today is " .. os.date("%A") .. "</p>\n");
-- Print Lua version and available libraries
mg.write("<li>" .. _VERSION .. " with the following standard libraries</li>\n")
mg.write("<ul>\n")
libs = {"string", "math", "table", "io", "os", "bit32", "package", "coroutine", "debug"};
for _,n in ipairs(libs) do
print_if_available(_G[n], n);
end
mg.write("</ul>\n")
print_if_available(sqlite3, "sqlite3 binding")
print_if_available(lfs, "lua file system")
mg.write("<p>\n");
if lfs then
mg.write("Files in " .. lfs.currentdir())
mg.write("\n<ul>\n")
for f in lfs.dir(".") do
mg.write("<li>" .. f .. "</li>\n")
local at = lfs.attributes(f);
recurse(at)
end
mg.write("</ul>\n")
-- Print mg library
libname = "mg"
print_if_available(_G[libname], libname .. " library")
recurse(_G[libname])
-- Print connect function
print_if_available(connect, "connect function")
mg.write("</ul></p>\n");
mg.write("<p> Today is " .. os.date("%A") .. "</p>\n");
mg.write("<p>\n");
if lfs then
mg.write("Files in " .. lfs.currentdir())
mg.write("\n<ul>\n")
for f in lfs.dir(".") do
mg.write("<li>" .. f .. "</li>\n")
local at = lfs.attributes(f);
recurse(at)
end
mg.write("</ul>\n")
end
mg.write([[
</p>