summaryrefslogtreecommitdiffstats
path: root/fetchmail-expert-html.lsp
blob: e46fdb27e45c0b627581c2ce22279cf52415b624 (plain)
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
<? local form = ... 
require("viewfunctions")
?>
<?
--[[ DEBUG INFORMATION
io.write("<H1>DEBUGGING</H1><span style='color:red'><H2>DEBUG INFO: CFE</H2>")
io.write(html.cfe_unpack(form))
io.write("</span>")
--]]
?>

<H1>SYSTEM INFO</H1>
<DL>
<? 
local myform = form.status 
local tags = { "status", "version", "autostart", }
displayinfo(myform,tags,"viewonly")
?>
</DL>

<H1>CONFIGURATION</H1>
<? local myform = form.config ?>
<form action="<?= form.option.script .. "/" .. form.option.prefix ..
		form.option.controller .. "/" .. form.option.action ?>" method="POST">

<H2>EXPERT CONFIGURATION</H2>
<H3>FILE DETAILS</H3>
<? 
local tags = { "filename", "filesize", "mtime", "sumerrors" }
displayinfo(myform,tags,"viewonly")
?>

<H3>FILE CONTENT</H3>
<? 
io.write(html.form[form.config.filecontent.type](form.config.filecontent))
?>

<H2>SAVE AND APPLY ABOVE SETTINGS</H2>
<? 
local tags = { "cmdsave", }
displayinfo(myform,tags)
?>

<?
-- Management buttons
local myform = form.management
local tags = { "start", "stop", "restart" }
if (myform) then
	io.write("<H1>MANAGEMENT</H1>\n<DL>")
	displaymanagement(myform,tags)
	io.write("</DL>")
end
?>
</form>