From 692fa0bfb6c22c72a2fc8bf6a204af19586f0e2e Mon Sep 17 00:00:00 2001 From: "mcafee%netscape.com" Date: Sun, 16 Dec 2001 00:06:51 +0000 Subject: [PATCH] Added graph size UI. Made lead UI smaller font=-1. git-svn-id: svn://10.0.0.236/trunk@110557 18797224-902f-48f8-a5cc-f745e15eee43 --- mozilla/webtools/graph/query.cgi | 83 +++++++++++++++++++++++++------- 1 file changed, 65 insertions(+), 18 deletions(-) diff --git a/mozilla/webtools/graph/query.cgi b/mozilla/webtools/graph/query.cgi index cb77e48e847..8512e9df71a 100755 --- a/mozilla/webtools/graph/query.cgi +++ b/mozilla/webtools/graph/query.cgi @@ -10,6 +10,7 @@ my $TESTNAME = lc($req->param('testname')); my $UNITS = lc($req->param('units')); my $TBOX = lc($req->param('tbox')); my $AUTOSCALE = lc($req->param('autoscale')); +my $SIZE = lc($req->param('size')); my $DAYS = lc($req->param('days')); my $LTYPE = lc($req->param('ltype')); my $POINTS = lc($req->param('points')); @@ -57,7 +58,7 @@ sub print_testnames { my $machines_string = join(" ", @machines); foreach (@machines) { - print "
  • $_\n"; + print "
  • $_\n"; } print ""; @@ -81,7 +82,7 @@ sub print_machines { my $machines_string = join(" ", @machines); foreach (@machines) { - print "
  • $_\n"; + print "
  • $_\n"; } print ""; @@ -95,35 +96,39 @@ sub show_graph { print "\n"; - print "\n"; + print "
    \n"; print "\n"; # Scale Y-axis - print "\n"; # Days, Time-axis - print "\n"; # Line style (lines|steps) - print "\n"; # Points (on|off) - print "\n"; print "\n"; @@ -168,19 +178,25 @@ sub show_graph { print "
    \n"; # graph - print "\"$TBOX"; + print "\"$TBOX"; print "
    \n"; print "
    \n"; + + print "
    \n"; + print "\n"; + print "\n"; if($AUTOSCALE) { print "Y-axis: (zoom|"; - print "100%"; + print "100%"; print ") \n"; } else { print "Y-axis: ("; - print "zoom"; + print "zoom"; print "|100%) \n"; } + print "\n"; print "\n"; - print "
    \n"; + print "
    		\n"; + print "\n"; + print "\n"; print ""; print ""; print ""; + print ""; print ""; print ""; print ""; print "Days:"; if($DAYS) { - print "(all data|"; + print "(all data|"; print ""; print ")\n"; } else { @@ -131,36 +136,41 @@ sub show_graph { print ""; print ")\n"; } + print "\n"; print "\n"; print "\n"; + print "\n"; + print "\n"; print "Style:"; if($LTYPE eq "steps") { print "("; - print "lines"; + print "lines"; print "|steps"; print ")"; } else { print "(lines|"; - print "steps"; + print "steps"; print ")"; } + print "\n"; print "\n"; + print "\n"; + print "\n"; print "Points:"; if($POINTS) { print "(on|"; - print "off"; + print "off"; print ")\n"; } else { print "("; - print "on"; + print "on"; print "|off)\n"; } + print "\n"; print "
    \n"; + print "\n"; + + print "\n"; + + print "\n"; + + print "\n"; + + print "\n"; + print "
    \n"; + # Other machines print ""; print "
  • \n"; - print "Other machines running the $TESTNAME test"; + print "Other machines running the $TESTNAME test"; print "
    • \n"; print "
  • \n"; - print "Other tests that $TBOX is running"; + print "Other tests that $TBOX is running"; print "
    • \n"; print "
  • \n"; @@ -189,6 +205,37 @@ sub show_graph { print ""; + print "
    		• \n"; + + # Graph size + print "\n"; + print "
    \n"; + print "\n"; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + print ""; + + print "Graph size:"; + if($SIZE) { + print "\n"; + } else { + print "\n"; + } + + print "\n"; + print "
    \n"; + print "
    \n"; print "\n"; }