From bf2eb9d4734db3c623bb50f4fec2879b239d4f96 Mon Sep 17 00:00:00 2001 From: "mcafee%netscape.com" Date: Thu, 13 Dec 2001 04:53:03 +0000 Subject: [PATCH] Adding form UI for days=n argument git-svn-id: svn://10.0.0.236/trunk@110415 18797224-902f-48f8-a5cc-f745e15eee43 --- mozilla/webtools/graph/query.cgi | 47 ++++++++++++++++++++++++++++++-- 1 file changed, 45 insertions(+), 2 deletions(-) diff --git a/mozilla/webtools/graph/query.cgi b/mozilla/webtools/graph/query.cgi index 77b84f56484..c9f98a1fbd0 100755 --- a/mozilla/webtools/graph/query.cgi +++ b/mozilla/webtools/graph/query.cgi @@ -11,6 +11,16 @@ my $TBOX = lc($req->param('tbox')); my $AUTOSCALE = lc($req->param('autoscale')); my $DAYS = lc($req->param('days')); +# +# Testing only: +# +#$TESTNAME = "testname"; +#$UNITS = "units"; +#$TBOX = "tbox"; +#$AUTOSCALE = 1; +#$DAYS = 1; + + sub make_filenames_list { my ($dir) = @_; @@ -81,21 +91,54 @@ sub show_graph { print "$TBOX $TESTNAME
\n"; + print "\n"; + + print "\n"; + print "\n"; + + print "\n"; + + print "\n"; + + print "\n"; + print "
\n"; + # Scale Y-axis my $neg_autoscale = !$AUTOSCALE; if($AUTOSCALE) { print "Y-axis: (zoom|"; print "100%"; - print ")"; + print ") \n"; } else { print "Y-axis: ("; print "zoom"; - print "|100%)"; + print "|100%) \n"; } + print "\n"; + # Days, Time-axis + print "
\n"; + print ""; + print ""; + print ""; + + print "Days:"; + if($DAYS) { + print "(all data|"; + print "\n"; + print ")"; + } else { + print "(all data|"; + print "\n"; + print ")"; + } + print "
\n"; + print "
\n"; print "
\n"; # graph print "\"$TBOX"; + + print "\n"; } if(!$TESTNAME) {