Fix autodetection for extended language identifiers

[oweals/luci.git] / libs / web / luasrc / sauth.lua

diff --git a/libs/web/luasrc/sauth.lua b/libs/web/luasrc/sauth.lua
index 0ac236753eaff905e6cee7d303cb6b327d3de6ea..5d3dc95ca38aad8ccdcd3792d08dc376c6729613 100644 (file)
--- a/libs/web/luasrc/sauth.lua
+++ b/libs/web/luasrc/sauth.lua
@@ -23,7 +23,7 @@ require("luci.config")
 
 luci.config.sauth = luci.config.sauth or {}
 sessionpath = luci.config.sauth.sessionpath
-sessiontime = tonumber(luci.config.sauth.sessiontime)
+sessiontime = tonumber(luci.config.sauth.sessiontime) or 15 * 60
 
 --- Manually clean up expired sessions.
 function clean()
@@ -57,10 +57,16 @@ end
 -- @param id   Session identifier
 -- @return             Session data
 function read(id)
-       if not id or not sane(sessionpath .. "/" .. id) then
+       if not id then
                return
        end
+       if not id:match("^%w+$") then
+               error("Session ID is not sane!")
+       end
        clean()
+       if not sane(sessionpath .. "/" .. id) then
+               return
+       end
        return luci.fs.readfile(sessionpath .. "/" .. id)
 end
 
@@ -82,6 +88,19 @@ function write(id, data)
        if not sane() then
                prepare()
        end
+       if not id:match("^%w+$") then
+               error("Session ID is not sane!")
+       end
        luci.fs.writefile(sessionpath .. "/" .. id, data)
        luci.fs.chmod(sessionpath .. "/" .. id, "a-rwx,u+rw")
+end
+
+
+--- Kills a session
+-- @param id   Session identifier
+function kill(id)
+       if not id:match("^%w+$") then
+               error("Session ID is not sane!")
+       end
+       luci.fs.unlink(sessionpath .. "/" .. id)
 end
\ No newline at end of file