diff options
Diffstat (limited to 'health-storage-html.lsp')
-rw-r--r-- | health-storage-html.lsp | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/health-storage-html.lsp b/health-storage-html.lsp index 4e9a0a8..cd9162e 100644 --- a/health-storage-html.lsp +++ b/health-storage-html.lsp @@ -1,6 +1,6 @@ -<? local view = ... ?> +<% local view = ... %> -<? displaydisk = function(disk, name) +<% displaydisk = function(disk, name) io.write("<pre>"..disk.value.."</pre>\n") io.write('<TABLE STYLE="margin:0px;padding:0px;border:0px">\n') io.write(" <TR>\n") @@ -27,39 +27,39 @@ io.write(" <TR>\n") io.write(' <TD WIDTH="100px"><B>'..name..'</B></TD><TD STYLE="background:red;border:2px solid black;" WIDTH="20px"></TD><TD WIDTH="70px"><B>=Used</B></TD><TD STYLE="background:#0c0;border:2px solid black;" WIDTH="20px"></TD><TD><B>=Free</B></TD>\n') io.write(" </TR>\n") io.write("</TABLE>\n") -end ?> +end %> <h1>Storage</h1> <h2>Floppy capacity</h2> -<? if (view.value.floppy) then +<% if (view.value.floppy) then for name,floppy in pairs(view.value.floppy.value) do displaydisk(floppy, name) end -else ?> +else %> No Floppy mounted -<? end ?> +<% end %> <h2>Harddrive capacity</h2> -<? if (view.value.hd) then +<% if (view.value.hd) then for name,hd in pairs(view.value.hd.value) do displaydisk(hd, name) end -else ?> +else %> No Harddrive mounted -<? end ?> +<% end %> <h2>RAM Disk capacity</h2> -<? if (view.value.ramdisk) then +<% if (view.value.ramdisk) then for name,ramdisk in pairs(view.value.ramdisk.value) do displaydisk(ramdisk, name) end -else ?> +else %> No RAM Disk mounted -<? end ?> +<% end %> -<? if view.value.partitions then ?> +<% if view.value.partitions then %> <h2>Disk partitions</h2> -<pre><?= view.value.partitions.value ?></pre> -<? end ?> +<pre><%= view.value.partitions.value %></pre> +<% end %> |