1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
<% local form, viewtable, page_info = ... %>
<% require("htmlviewfunctions") %>
<H1><%= html.html_escape(form.label) %></H1>
<%
htmlviewfunctions.displayformstart(form, page_info)
-- If editing existing role, disable role
if page_info.action ~= "newrole" then
form.value.role.readonly = true
end
htmlviewfunctions.displayformitem(form.value.role, "role")
-- copied this code from viewfunctions so we can disable the default boxes
local myitem = form.value.permissions
myitem.name = "permissions"
io.write("<DT")
if myitem.errtxt then
myitem.class = "error"
io.write(' class="error"')
end
io.write(">" .. html.html_escape(myitem.label) .. "</DT>\n")
io.write("<DD>")
-- FIXME multiple select doesn't work in haserl, so use series of checkboxes
myitem.class = nil
local tempname = myitem.name
local tempval = myitem.value or {}
local reversedefault = {}
for x,val in ipairs(myitem.default or {}) do
reversedefault[val] = x
end
local reverseval = {}
for x,val in ipairs(tempval) do
reverseval[val] = x
end
local reverseopt = {}
for x,val in ipairs(myitem.option) do
reverseopt[val] = x
myitem.value = val
myitem.checked = reverseval[val]
if reversedefault[val] then myitem.disabled = true else myitem.disabled = nil end
myitem.name = tempname .. "." .. x
io.write(html.form.checkbox(myitem) .. html.html_escape(val) .. "<br>\n")
end
-- Check for values not in options
if myitem.errtxt then
myitem.class = "error"
io.write('<p class="error">\n')
end
for x,val in ipairs(tempval) do
if not reverseopt[val] then
myitem.value = val
myitem.checked = true
io.write(html.form.checkbox(myitem) .. html.html_escape(val) .. "<br>\n")
end
end
if myitem.errtxt then
io.write('</p>\n')
end
myitem.name = tempname
myitem.value = tempval
if myitem.descr then io.write('<P CLASS="descr">' .. string.gsub(html.html_escape(myitem.descr), "\n", "<BR>") .. "</P>\n") end
if myitem.errtxt then io.write('<P CLASS="error">' .. string.gsub(html.html_escape(myitem.errtxt), "\n", "<BR>") .. "</P>\n") end
io.write("</DD>\n")
htmlviewfunctions.displayformend(form)
%>
|
