From e0b7bd24427cdc3b98a35c2105063d42a05dbab7 Mon Sep 17 00:00:00 2001
From: Mika Havela <mika.havela@gmail.com>
Date: Sat, 22 Dec 2007 11:25:29 +0000
Subject: Added graphic-bars to show usage/free on some values

git-svn-id: svn://svn.alpinelinux.org/acf/alpine-baselayout/trunk@448 ab2d0c66-481e-0410-8bed-d214d4d58bed
---
 health-storage-html.lsp | 41 +++++++++++++++++++++++++++++++++++++----
 1 file changed, 37 insertions(+), 4 deletions(-)

(limited to 'health-storage-html.lsp')

diff --git a/health-storage-html.lsp b/health-storage-html.lsp
index ed20c64..693822a 100644
--- a/health-storage-html.lsp
+++ b/health-storage-html.lsp
@@ -5,10 +5,43 @@
 <h2>Storage</h2>
 
 <h3>Floppy capacity</h3>
-<pre><?= view.storage.floppycapacity ?></pre>
+<pre><?= view.storage.floppycapacity.value ?></pre>
 
-<h3>HD capacity</h3>
-<pre><?= view.storage.hdcapacity ?></pre>
+<? if (view.storage.floppycapacity.used) then ?>
+<TABLE STYLE="margin:0px;padding:0px;border:0px">
+	<TR>
+		<TD>0%</TD><TD WIDTH="<?= view.storage.floppycapacity.used ?>%" STYLE="background:red;"><CENTER><?= view.storage.floppycapacity.used ?>%</CENTER></TD><TD WIDTH="<?= (100-view.storage.floppycapacity.used) ?>%" STYLE="background:green;"><CENTER><?= (100-view.storage.floppycapacity.used) ?>%</CENTER></TD><TD>100%</TD>
+	</TR>
+</TABLE>
+<TABLE STYLE="margin:0px;padding:0px;border:0px">
+	<TR>
+		<TD WIDTH="100px"><B><?= view.storage.floppycapacity.used_label ?></B></TD><TD STYLE="background:red;" WIDTH="20px"></TD><TD WIDTH="70px"><B>=Used</B></TD><TD STYLE="background:green;" WIDTH="20px"></TD><TD><B>=Free</B></TD>
+	</TR>
+</TABLE>
+<? end ?>
 
-<h3>HD Partitions</h3>
+<h3>Disk capacity</h3>
+<pre><?= view.storage.hdcapacity.value ?></pre>
+
+<? if (view.storage.hdcapacity.used) then ?>
+<TABLE STYLE="margin:0px;padding:0px;border:0px">
+	<TR>
+		<TD>0%</TD><TD WIDTH="<?= view.storage.hdcapacity.used ?>%" STYLE="background:red;"><CENTER><?= view.storage.hdcapacity.used ?>%</CENTER></TD><TD WIDTH="<?= (100-view.storage.hdcapacity.used) ?>%" STYLE="background:green;"><CENTER><?= (100-view.storage.hdcapacity.used) ?>%</CENTER></TD><TD>100%</TD>
+	</TR>
+</TABLE>
+<TABLE STYLE="margin:0px;padding:0px;border:0px">
+	<TR>
+		<TD WIDTH="100px"><B><?= view.storage.hdcapacity.used_label ?></B></TD><TD STYLE="background:red;" WIDTH="20px"></TD><TD WIDTH="70px"><B>=Used</B></TD><TD STYLE="background:green;" WIDTH="20px"></TD><TD><B>=Free</B></TD>
+	</TR>
+</TABLE>
+<? end ?>
+
+<h3>Disk partitions</h3>
 <pre><?= view.storage.partitions ?></pre>
+
+<?
+--[[ DEBUG INFORMATION
+require("debugs")
+io.write(debugs.variables(view))
+--]]
+?>
-- 
cgit v1.2.3