Annotation of embedaddon/axTLS/www/lua/test_session.lua, revision 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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>