<% local view, viewlibrary, page_info, session = ... %> <% htmlviewfunctions = require("htmlviewfunctions") %> <% html = require("acf.html") %> <% displaydisk = function(disk, name) io.write("

"..html.html_escape(disk.value).."

\n") io.write('\n') io.write(" \n") io.write(" \n") if tonumber(disk.used) > 0 then io.write(' \n') end if tonumber(disk.used) < 100 then io.write(' \n') end io.write(' \n') io.write(" \n") io.write("

') if ( tonumber(disk.used) > 10) then io.write(html.html_escape(disk.used) .. "%") end io.write('

') if ( 90 > tonumber(disk.used)) then io.write((100-tonumber(disk.used)) .. "%") end io.write('

100%

\n") io.write('\n') io.write(" \n") io.write(' \n') io.write(" \n") io.write("

'..html.html_escape(name)..'

=Used

=Free

\n") end %> <% local header_level = htmlviewfunctions.displaysectionstart(view, page_info) local header_level2 = htmlviewfunctions.incrementheader(header_level) %> <% htmlviewfunctions.displaysectionstart(cfe({label="Floppy capacity"}), page_info, header_level2) %> <% if (view.value.floppy) then for name,floppy in pairs(view.value.floppy.value) do displaydisk(floppy, name) end else %>

No Floppy mounted

<% end %> <% htmlviewfunctions.displaysectionend(header_level2) %> <% htmlviewfunctions.displaysectionstart(cfe({label="Harddrive capacity"}), page_info, header_level2) %> <% if (view.value.hd) then for name,hd in pairs(view.value.hd.value) do displaydisk(hd, name) end else %>

No Harddrive mounted

<% end %> <% htmlviewfunctions.displaysectionend(header_level2) %> <% htmlviewfunctions.displaysectionstart(cfe({label="RAM Disk capacity"}), page_info, header_level2) %> <% if (view.value.ramdisk) then for name,ramdisk in pairs(view.value.ramdisk.value) do displaydisk(ramdisk, name) end else %>

No RAM Disk mounted

<% end %> <% htmlviewfunctions.displaysectionend(header_level2) %> <% if view.value.partitions then %> <% htmlviewfunctions.displaysectionstart(cfe({label="Disk partitions"}), page_info, header_level2) %>

<%= html.html_escape(view.value.partitions.value) %>

<% htmlviewfunctions.displaysectionend(header_level2) %> <% end %> <% htmlviewfunctions.displaysectionend(header_level) %>