Return to test_session.lua CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / axTLS / www / lua

Annotation of embedaddon/axTLS/www/lua/test_session.lua, revision 1.1.1.1

1.1       misho       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