Throw error messages on stderr

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

diff --git a/libs/web/luasrc/dispatcher.lua b/libs/web/luasrc/dispatcher.lua
index d199d41..fe5f656 100644 (file)
--- a/libs/web/luasrc/dispatcher.lua
+++ b/libs/web/luasrc/dispatcher.lua
@@ -108,6 +108,7 @@ function httpdispatch(request)
 
        local stat, err = util.copcall(dispatch, context.request)
        if not stat then
+               luci.util.perror(err)
                error500(err)
        end
 
@@ -440,8 +441,12 @@ end
 --- Create a redirect to another dispatching node.
 -- @param      ...             Virtual path destination
 function alias(...)
-       local req = arg
-       return function()
+       local req = {...}
+       return function(...)
+               for _, r in ipairs({...}) do
+                       req[#req+1] = r
+               end
+
                dispatch(req)
        end
 end
@@ -450,17 +455,23 @@ end
 -- @param      n               Number of path values to replace
 -- @param      ...             Virtual path to replace removed path values with
 function rewrite(n, ...)
-       local req = arg
-       return function()
+       local req = {...}
+       return function(...)
+               local dispatched = util.clone(context.dispatched)
+
                for i=1,n do
-                       table.remove(context.path, 1)
+                       table.remove(dispatched, 1)
                end
 
-               for i,r in ipairs(req) do
-                       table.insert(context.path, i, r)
+               for i, r in ipairs(req) do
+                       table.insert(dispatched, i, r)
                end
 
-               dispatch()
+               for _, r in ipairs({...}) do
+                       dispatched[#dispatched+1] = r
+               end
+
+               dispatch(dispatched)
        end
 end
 
@@ -469,7 +480,13 @@ end
 -- @param      ...             Additional parameters passed to the function
 function call(name, ...)
        local argv = {...}
-       return function() return getfenv()[name](unpack(argv)) end
+       return function(...)
+               if #argv > 0 then 
+                       return getfenv()[name](unpack(argv), ...)
+               else
+                       return getfenv()[name](...)
+               end
+       end
 end
 
 --- Create a template render dispatching target.
@@ -483,7 +500,8 @@ end
 
 --- Create a CBI model dispatching target.
 -- @param      model   CBI model tpo be rendered
-function cbi(model)
+function cbi(model, config)
+       config = config or {}
        return function(...)
                require("luci.cbi")
                require("luci.template")
@@ -494,6 +512,9 @@ function cbi(model)
                local state = nil
 
                for i, res in ipairs(maps) do
+                       if config.autoapply then
+                               res.autoapply = config.autoapply
+                       end
                        local cstate = res:parse()
                        if not state or cstate < state then
                                state = cstate
@@ -501,11 +522,11 @@ function cbi(model)
                end
 
                http.header("X-CBI-State", state or 0)
-               luci.template.render("cbi/header")
+               luci.template.render("cbi/header", {state = state})
                for i, res in ipairs(maps) do
                        res:render()
                end
-               luci.template.render("cbi/footer")
+               luci.template.render("cbi/footer", {state = state, autoapply = config.autoapply})
        end
 end