* Fixed caching mechanism

[project/luci.git] / libs / web / luasrc / dispatcher.lua

diff --git a/libs/web/luasrc/dispatcher.lua b/libs/web/luasrc/dispatcher.lua
index 175f0dc..6a6bceb 100644 (file)
--- a/libs/web/luasrc/dispatcher.lua
+++ b/libs/web/luasrc/dispatcher.lua
@@ -34,6 +34,9 @@ local tree = {nodes={}}
 -- Index table
 local index = {}
 
+-- Indexdump
+local indexcache = "/tmp/.luciindex"
+
 -- Global request object
 request = {}
 
@@ -173,17 +176,40 @@ end
 
 -- Calls the index function of all available controllers
 function createindex_plain(path, suffix)
+       local cachetime = nil 
+       
        local controllers = luci.util.combine(
                luci.fs.glob(path .. "*" .. suffix) or {},
                luci.fs.glob(path .. "*/*" .. suffix) or {}
        )
+       
+       if indexcache then
+               cachetime = luci.fs.mtime(indexcache)
+               
+               if not cachetime then
+                       luci.fs.mkdir(indexcache)
+                       luci.fs.chmod(indexcache, "a=,u=rwx")
+               end
+       end
 
-       for i,c in ipairs(controllers) do
-               c = "luci.controller." .. c:sub(#path+1, #c-#suffix):gsub("/", ".")
-               stat, mod = pcall(require, c)
-
-               if stat and mod and type(mod.index) == "function" then
-                       index[c] = mod.index
+       if not cachetime then
+               for i,c in ipairs(controllers) do
+                       c = "luci.controller." .. c:sub(#path+1, #c-#suffix):gsub("/", ".")
+                       stat, mod = pcall(require, c)
+       
+                       if stat and mod and type(mod.index) == "function" then
+                               index[c] = mod.index
+                               
+                               if indexcache then
+                                       luci.fs.writefile(indexcache .. "/" .. c, string.dump(mod.index))
+                               end
+                       end
+               end
+       else
+               for i,c in ipairs(luci.fs.dir(indexcache)) do
+                       if c:sub(1) ~= "." then
+                               index[c] = loadfile(indexcache .. "/" .. c)
+                       end
                end
        end
 end