libs/nixio/axTLS/www/lua/test_session.lua

   1 cgilua.enablesession ()
   2
   3 function pt (tab)
   4         for i, v in pairs (tab) do
   5                 local vv = v
   6                 if type(v) == "table" then
   7                         vv = ""
   8                         for _i, _v in pairs (v) do
   9                                 vv = vv..string.format ("%s = %q, ", _i, _v)
  10                         end
  11                         vv = '{'..vv..'}'
  12                 end
  13                 cgilua.put (string.format ("%s = %s<br>\n", tostring (i), tostring (vv)))
  14         end
  15 end
  16
  17
  18 if cgi.field then
  19         if not cgilua.session.data.field then
  20                 cgilua.session.data.field = {}
  21         end
  22         table.insert (cgilua.session.data.field, cgi.field)
  23 end
  24 cgilua.htmlheader()
  25 if cgilua.session then
  26         cgilua.put "cgi = {<br>\n"
  27         pt (cgi)
  28         cgilua.put "}<br>\n"
  29         cgilua.put "cgilua.session.data = {<br>\n"
  30         pt (cgilua.session.data)
  31         cgilua.put "}<br>\n"
  32
  33         cgilua.put [[<form action="]]
  34         cgilua.put (cgilua.mkurlpath"test_session.lua")
  35         cgilua.put [[" method="POST">
  36   field: <input type="text" name="field" value="]]
  37         cgilua.put (cgi.field or "")
  38         cgilua.put [["><br>
  39   <input type="submit"><br>
  40 </form>]]
  41 else
  42         cgilua.put "Sessions library is not available or not well configured"
  43 end