:

:

local function submenu(prefix, node)

if not node.nodes or node.hidden then

return false

end

local index = {}

local count = 0

for k, n in pairs(node.nodes) do

if n.title and n.target then

table.insert(index, {name=k, order=n.order or 100})

count = count + 1

end

end

table.sort(index, function(a, b) return a.order

if count > 0 then

%>

• ">

for j, v in pairs(index) do

if #v.name > 0 then

local nnode = node.nodes[v.name]

local href = controller .. prefix .. v.name .. "/"

href = (nnode.query) and href .. luci.http.build_querystring(nnode.query) or href

if nnode.nodes then

for k1, n1 in pairs(nnode.nodes) do

href = "#"

end

end

%>

class="active" href="">

submenu(prefix .. v.name .. "/", nnode)

%>

end

end

%>

end

end

3： model 业务处理和页面生成简介

我认为model 的业务处理和 html 生成，是 luci 框架的精华，但是想用好它，最终扩展定义自己的页面也是最难的，但是一旦定义好了，后面的工作就会轻松高效简介统一，不失为一种好的解决方案。但是它又有缺点，就是写页面虽然统一，但是不够灵活。

下面以 SimpleForm为例，讲解一下。

具体文件 */luci/model/cbi/passwd.lua

f = SimpleForm("password", translate("a_s_changepw"), translate("a_s_changepw1"))  --调用SimpleForm 页面  当然还是 I18N 从中捣乱，看上去没那么直观，不理他 pw1=f:field(Value,"pw1",translate("password")) --

SimpleForm 里面加一个 field   至于 SimpleForm  和 fiemd 是什么，一会去看 SimpleForm 页面去 pw1.rmempty=false -- 把 SimpleForm的 rmempty 为不显示  后面就不做注释了 应该看得懂了

pw2 = f:field(Value, "pw2", translate("confirmation"))

pw2.rmempty = false

function pw2.validate(self, value, section)

return pw1:formvalue(section) == value and value

end

function f.handle(self, state, data)

if   state == FORM_VALID   then     --这个就是业务处理了  你懂得  呵呵

local stat = luci.sys.user.setpasswd("admin", data.pw1) == 0  -- root --> admin

if stat then

f.message = translate("a_s_changepw_changed")

else

f.errmessage = translate("unknownerror")

end

data.pw1 = nil

data.pw2 = nil

end

return true

end

return f

说明:( simpleForm  位于 view/cbi   下面，可以研究一下，各个元素是如何定义的 )

现在在给一个小例子：

以.*/luci/model /cbi/admin_system/version_manage.lua 为例，介绍一下 luci 中 web 页面 lua 代码

6 local h = loadfile("/usr/local/luci/help.lua")

7 if h then

8     h()

9 end

10 local help_txt = help_info and  help_info.version

加载帮助帮助文件help.lua, 关于 loadfile() 的用法可以查看 lua 的手册 ( 我还没完全弄明白，先用了 ) help_txt 是一个全局变量 12 appadmin_path = "/usr/local/appadmin/bin/"

定义一个全局变量，其实跟功能跟宏一样，定义appadmin 的绝对路径

14 versionlist = {}

15

16 function getline (s)

.........

32 end

33

34 function get_versionlist()

.........

68 end

69

70 versionlist = get_versionlist()

定义一个全局变量和两个函数，并初始化此变量

接下来就是和最终展现的Web 页面直接相关的代码了，大部分都是对 luci 封装好的一些 html 控件(代码)的使用和扩展。 luci  封装好的 html 控件 类可以在以下文件查看：./host/usr/lib/lua/luci/cbi.lua

71 m = SimpleForm("version", translate("版本管理 "))

72 m.submit = false

73 m.reset = false

74 m.help = help_txt and true or false

75 m.helptxt = help_txt or ""

使用了一个SimpleForm 的控件， SimpleForm 实际上对应一个 html 表单，是整个页面最大的 " 容器 " ，本页面内的绝大部分控件都处于 SimpleForm 内 ，是它的子控件 。我知道的可以做> 页面最大 " 容器 " 的控件还有一个 Map, 但它需要 ./host/etc/config/ 目录下的一个配置文件，我没有使用。 submit reset是 luci 默认就封装好的一个属性，分别控制 html 表单的 " 提交 "" 重置 " 按钮 ;help helptxt 是我扩充的表单属性，分别控制 web 页面的 "帮助 " 功能和帮助内容。关于控件属 性的意义、实现和扩充可以按以下步骤进行：

在文件./host/usr/lib/lua/luci/cbi.lua 中查找控件名 SimpleForm,  然后可以找到以下行 664     self.template = "cbi/simpleform" 这 表明SimpleForm 的 html 模版文件为 ./host/usr/lib/lua/luci/view/cbi /simpleform.htm ，通过研究 simpleform.htm 文件内容可以知道各属性的 功能以及模版中使用lua 代码的方法，然后可以按类似的方法添加自定义的 属性。 77 s = m:section(Table, versionlist) 新建了一个section,section 内定义了一个表格类， versionlist 是与其相关的变量( lua 的所有变量都可归类于 table 类型 ) 与Table 关联的 table 变量应该是这种结构的：

t = {

row1 = {column1 = "xxx", column2 = "xxx", .... },

row2 = {column1 = "xxx", column2 = "xxx", .... },

row3 = {column1 = "xxx", column2 = "xxx", .... },

row4 = {column1 = "xxx", column2 = "xxx", .... },

}

然后定义Table 的列控件

79 enable = s:option(DummyValue, "_enabled", translate("软件状态 "))

83 appid  = s:option(DummyValue, "_appid", translate("软件版本 "))

84 appname = s:option(DummyValue, "_appname", translate("软件名称 "))

DummyValue是只读的文本框，只输出不输入。 Value 是单行文本框，可输出也可输入。 Flag 是一个 checkbox,值为 "1" 时被选中，为 "0" 时未选中。 ListValue是列表框 ... 具体的用法可 以看./host/usr/lib/lua/luci /model/cbi/ 下的文件( find ./host/usr/lib/lua/luci/model/cbi/ -name "*.lua" |xargs grep "ListValue")

对于table 内普通的字符串类的值，只需要把列控件的 id (括号内第二个值，如 "_appid" )定义为 table 内对应的变量名(比如 column1 ) 对于非变通字符串类的值，或者为字符串但需要进行一定的处理然后再显示的值，可以按以下方法显示：定义该控件的cfgvalue 函数属性

127     newinfo = up_s:option(TextValue, "_newifo", translate("新版本信息 "))

128     newinfo.readonly = true

129     newinfo.rows = 11

130     newinfo.cfgvalue = function(self, section)

131         local t = string.gsub(info, "Archive:[^/n]*", "")

132         return t

133     end

定义cfgvalue 后， luci 的处理函数会调用此函数为此控件赋值，(传入的 section 参数值为 row1/row2/row3等，当处理到 row 几时值就为 row 几 ) 对于DummyValue 等只输出不输入的类，还有一种赋值方法： 控件实例名(如 enable).value = xxx 对于有输入的控件Value 等，  .value 方法赋值在处理输入里会有一些问题，有什么问题以及如何解决可以做实验试试  , 也许是我使用方法不对造 成的

对有输入控件的处理有两种方法： 1 定义控件的 .write 属性 这种方法对处理比较独立的输入(与其它控件输入关系不大)比较适用

88 up_s = m:section(SimpleSection)

89 up_version = up_s:option(Button, "_up_version", translate("上传新版本 "))

90 up_version.onlybutton = true

91 up_version.align = "right"

92 up_version.inputstyle = "save"

93 up_version.write = function(self, section)

94     luci.http.redirect(luci.dispatcher.build_url("admin", "system", "version_manage", "upload"))

95 end

ps:只有当 Value 的 rmempty == false 时， Value 输入为空也会触发 write 函数 ,  需要对 rmemtpy 显示赋值为false ( xx.rmempty = false)

4： view 下面的 html 简介

这个是最好理解的  例：passwd.htm

local c = require("luci.model.uci").cursor():changes()

if c and next(c) then

-%>

end

if not reboot then

-%>

/admin/system/reboot?reboot=1">

加载公用的头部和尾部