12345678910111213141516171819202122232425262728293031323334353637383940414243 |
- cgilua.enablesession ()
- function pt (tab)
- for i, v in pairs (tab) do
- local vv = v
- if type(v) == "table" then
- vv = ""
- for _i, _v in pairs (v) do
- vv = vv..string.format ("%s = %q, ", _i, _v)
- end
- vv = '{'..vv..'}'
- end
- cgilua.put (string.format ("%s = %s<br>\n", tostring (i), tostring (vv)))
- end
- end
- if cgi.field then
- if not cgilua.session.data.field then
- cgilua.session.data.field = {}
- end
- table.insert (cgilua.session.data.field, cgi.field)
- end
- cgilua.htmlheader()
- if cgilua.session then
- cgilua.put "cgi = {<br>\n"
- pt (cgi)
- cgilua.put "}<br>\n"
- cgilua.put "cgilua.session.data = {<br>\n"
- pt (cgilua.session.data)
- cgilua.put "}<br>\n"
- cgilua.put [[<form action="]]
- cgilua.put (cgilua.mkurlpath"test_session.lua")
- cgilua.put [[" method="POST">
- field: <input type="text" name="field" value="]]
- cgilua.put (cgi.field or "")
- cgilua.put [["><br>
- <input type="submit"><br>
- </form>]]
- else
- cgilua.put "Sessions library is not available or not well configured"
- end
|