5 The request dispatcher and module dispatcher generators
11 Copyright 2008 Steven Barth <steven@midlink.org>
13 Licensed under the Apache License, Version 2.0 (the "License");
14 you may not use this file except in compliance with the License.
15 You may obtain a copy of the License at
17 http://www.apache.org/licenses/LICENSE-2.0
19 Unless required by applicable law or agreed to in writing, software
20 distributed under the License is distributed on an "AS IS" BASIS,
21 WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
22 See the License for the specific language governing permissions and
23 limitations under the License.
26 module("luci.dispatcher", package.seeall)
31 -- Local dispatch database
32 local tree = {nodes={}}
38 local indexcache = "/tmp/.luciindex"
40 -- Global request object
43 -- Active dispatched node
52 function build_url(...)
53 return luci.http.dispatcher() .. "/" .. table.concat(arg, "/")
56 -- Sends a 404 error code and renders the "error404" template if available
57 function error404(message)
58 luci.http.status(404, "Not Found")
59 message = message or "Not Found"
61 require("luci.template")
62 if not pcall(luci.template.render, "error404") then
63 luci.http.prepare_content("text/plain")
69 -- Sends a 500 error code and renders the "error500" template if available
70 function error500(message)
71 luci.http.status(500, "Internal Server Error")
73 require("luci.template")
74 if not pcall(luci.template.render, "error500", {message=message}) then
75 luci.http.prepare_content("text/plain")
81 -- Creates a request object for dispatching
82 function httpdispatch()
83 local pathinfo = luci.http.env.PATH_INFO or ""
86 for s in pathinfo:gmatch("([%w_]+)") do
87 table.insert(request, s)
93 -- Dispatches a request
95 if not built_tree then
102 for i, s in ipairs(request) do
108 for k, v in pairs(c) do
115 require("luci.i18n").loadc(track.i18n)
118 if track.setgroup then
119 luci.sys.process.setgroup(track.setgroup)
122 if track.setuser then
123 luci.sys.process.setuser(track.setuser)
126 -- Init template engine
127 local tpl = require("luci.template")
128 tpl.viewns.translate = function(...) return require("luci.i18n").translate(...) end
129 tpl.viewns.controller = luci.http.dispatcher()
130 tpl.viewns.uploadctrl = luci.http.dispatcher_upload()
131 tpl.viewns.media = luci.config.main.mediaurlbase
132 tpl.viewns.resource = luci.config.main.resourcebase
134 -- Load default translation
135 require("luci.i18n").loadc("default")
138 if c and type(c.target) == "function" then
141 stat, err = pcall(c.target)
150 -- Generates the dispatching tree
151 function createindex()
153 local path = luci.sys.libpath() .. "/controller/"
156 if pcall(require, "fastindex") then
157 createindex_fastindex(path, suff)
159 createindex_plain(path, suff)
165 -- Uses fastindex to create the dispatching tree
166 function createindex_fastindex(path, suffix)
167 local fi = fastindex.new("index")
168 fi.add(path .. "*" .. suffix)
169 fi.add(path .. "*/*" .. suffix)
172 for k, v in pairs(fi.indexes) do
177 -- Calls the index function of all available controllers
178 function createindex_plain(path, suffix)
179 local cachetime = nil
181 local controllers = luci.util.combine(
182 luci.fs.glob(path .. "*" .. suffix) or {},
183 luci.fs.glob(path .. "*/*" .. suffix) or {}
187 cachetime = luci.fs.mtime(indexcache)
189 if not cachetime then
190 luci.fs.mkdir(indexcache)
191 luci.fs.chmod(indexcache, "a=,u=rwx")
195 if not cachetime then
196 for i,c in ipairs(controllers) do
197 c = "luci.controller." .. c:sub(#path+1, #c-#suffix):gsub("/", ".")
198 stat, mod = pcall(require, c)
200 if stat and mod and type(mod.index) == "function" then
204 luci.fs.writefile(indexcache .. "/" .. c, string.dump(mod.index))
209 for i,c in ipairs(luci.fs.dir(indexcache)) do
210 if c:sub(1) ~= "." then
211 index[c] = loadfile(indexcache .. "/" .. c)
217 -- Creates the dispatching tree from the index
218 function createtree()
219 if not built_index then
223 for k, v in pairs(index) do
224 luci.util.updfenv(v, _M)
226 local stat, mod = pcall(require, k)
228 luci.util.updfenv(v, mod)
237 -- Shortcut for creating a dispatching node
238 function entry(path, target, title, order, add)
246 for k,v in pairs(add) do
253 -- Fetch a dispatching node
257 if arg[1] and type(arg[1]) == "table" then
261 for k,v in ipairs(arg) do
262 if not c.nodes[v] then
263 c.nodes[v] = {nodes={}}
281 function template(name)
282 require("luci.template")
283 return function() luci.template.render(name) end
288 require("luci.template")
291 local stat, res = pcall(luci.cbi.load, model)
297 local stat, err = pcall(res.parse, res)
303 luci.template.render("cbi/header")
305 luci.template.render("cbi/footer")