php/historical/browser.php

<?php

// Navigation for the i-scream reports.
// pjm2@ukc.ac.uk


function getdirArray($dir='./',$sort='asort') {
    global $dir_file_count;
    if ( is_dir($dir) ) {
        $fd = @opendir($dir);
        while ( ($part = @readdir($fd)) == TRUE ) {
            clearstatcache();
            if ($part != "." && $part != "..") {
                $dir_array[] = $part;
            }
        }
        if($fd == TRUE) {
            closedir($fd);
        }
        if (is_array($dir_array)) {
            $sort($dir_array);
            $dir_file_count = count($dir_array);
            Return $dir_array;
        } else {
            Return FALSE;
        }
    } else {
        Return FALSE;
    }
}

?>

<? include("title.inc"); ?>

<hr weight="1" color="#9999ff">

<b>Most recent reports available</b>
<form method="GET" action="">
<?

    $file_array = getdirArray('/home/cut/pjm2/webpages/reports','rsort');
    print "<select size=\"1\" name=\"day\">";
    foreach($file_array as $file_name) {
        if (is_dir($file_name)) {
            $i++;
            print "<option value=\"$file_name\">$file_name</option>";
        }
        if ($i >= 20) {
            break;
        }
    }
    print "</select>";

?>
 <input type="submit" name="submit" value="Go">
</form>

<hr weight="1" color="#9999ff">

<? if ($day) { ?>

    <b>Available reports for <? echo $day ?></b>

    <form method="GET" action="">
     <select size="1" name="machine_name">
      <option selected value="">[select machine]</option>
      <? include("$day/machine_name.inc"); ?>
     </select>

     <select size="1" name="report">
      <option selected value="">[select report]</option>
      <? include("$day/report.inc"); ?>
     </select>

     <input type="hidden" name="day" value="<? echo $day ?>">
     <input type="submit" name="submit" value="Show">
    </form>
    
    <hr weight="1" color="#9999ff">
    
<? } ?>

    </p>


<?
    if ($submit == "Show" && $machine_name && $report) {
        
        include("$day/$machine_name/$report/i-maxmin.txt");
        
        $url = escapeshellcmd("$day/$machine_name/$report/chart.gif");
        if (file_exists($url)) {  ?>
          
            <center><b>[<? echo $machine_name; ?>] - <? echo $report; ?></b></center>
          
            <table border="0" cellpadding="0" cellspacing="0">
             <tr>
              <td align="right" valign="top">
               <font size="2"><? printf("%.1f", $max_value);  ?></font>
              </td>
              <td rowspan="2">
               <img src="<? echo $url; ?>" width="500" height="250">
              </td>
             </tr>
             <tr>
              <td align="right" valign="bottom">
               <font size="2"><? echo $min_value; ?></font>
              </td>
             </tr>
             <tr>
              <td>&nbsp;</td>
              <td><img src="24hour.gif" width="500" height="39"></td>
             </tr>
            </table>
            
            <hr weigth="1" color="#9999ff">
            
            <b>Extra data</b>
            <p>
            <a href="<? echo "$day/$machine_name/$report/i-data.txt" ?>">Raw plot data</a><br>
            <a href="<? echo "$day/$machine_name/$report/i-chart.gif" ?>">GIF chart</a><br>
            <a href="<? echo "$day/$machine_name/$report/i-maxmin.txt" ?>">PHP y-axis limits include</a>
            
        <? }
        else {
            echo "<p>The report could not be found.</p>";
        }
        echo "<hr weight=\"1\" color=\"#9999ff\">";
    }
    
?>

<? include("bottom.inc"); ?>
Revision:	1.11
Committed:	Sun Feb 25 16:21:19 2001 UTC (23 years, 8 months ago) by pjm2
Branch:	MAIN
Changes since 1.10:	+73 -20 lines
Log Message:	The data list now stroes 20 of the most recent dates.
#	User	Rev	Content
1	pjm2	1.1	<?php
2
3	pjm2	1.10	// Navigation for the i-scream reports.
4	pjm2	1.1	// pjm2@ukc.ac.uk
5
6
7			function getdirArray($dir='./',$sort='asort') {
8			global $dir_file_count;
9			if ( is_dir($dir) ) {
10			$fd = @opendir($dir);
11			while ( ($part = @readdir($fd)) == TRUE ) {
12			clearstatcache();
13			if ($part != "." && $part != "..") {
14			$dir_array[] = $part;
15			}
16			}
17			if($fd == TRUE) {
18			closedir($fd);
19			}
20			if (is_array($dir_array)) {
21			$sort($dir_array);
22			$dir_file_count = count($dir_array);
23			Return $dir_array;
24			} else {
25			Return FALSE;
26			}
27			} else {
28			Return FALSE;
29			}
30			}
31
32			?>
33
34	pjm2	1.10	<? include("title.inc"); ?>
35	pjm2	1.6
36	pjm2	1.11	<hr weight="1" color="#9999ff">
37
38			<b>Most recent reports available</b>
39			<form method="GET" action="">
40			<?
41
42			$file_array = getdirArray('/home/cut/pjm2/webpages/reports','rsort');
43			print "<select size=\"1\" name=\"day\">";
44			foreach($file_array as $file_name) {
45			if (is_dir($file_name)) {
46			$i++;
47			print "<option value=\"$file_name\">$file_name</option>";
48			}
49			if ($i >= 20) {
50			break;
51			}
52			}
53			print "</select>";
54
55			?>
56			<input type="submit" name="submit" value="Go">
57			</form>
58
59			<hr weight="1" color="#9999ff">
60
61			<? if ($day) { ?>
62
63			<b>Available reports for <? echo $day ?></b>
64
65	pjm2	1.6	<form method="GET" action="">
66			<select size="1" name="machine_name">
67	pjm2	1.8	<option selected value="">[select machine]</option>
68	pjm2	1.11	<? include("$day/machine_name.inc"); ?>
69	pjm2	1.6	</select>
70
71			<select size="1" name="report">
72	pjm2	1.8	<option selected value="">[select report]</option>
73	pjm2	1.11	<? include("$day/report.inc"); ?>
74	pjm2	1.6	</select>
75	pjm2	1.1
76	pjm2	1.11	<input type="hidden" name="day" value="<? echo $day ?>">
77	pjm2	1.8	<input type="submit" name="submit" value="Show">
78	pjm2	1.6	</form>
79	pjm2	1.11
80			<hr weight="1" color="#9999ff">
81
82			<? } ?>
83	pjm2	1.1
84	pjm2	1.6	</p>
85	pjm2	1.1
86	pjm2	1.2
87			<?
88	pjm2	1.8	if ($submit == "Show" && $machine_name && $report) {
89	pjm2	1.11
90			include("$day/$machine_name/$report/i-maxmin.txt");
91
92	pjm2	1.2	$url = escapeshellcmd("$day/$machine_name/$report/chart.gif");
93	pjm2	1.11	if (file_exists($url)) { ?>
94
95			<center><b>[<? echo $machine_name; ?>] - <? echo $report; ?></b></center>
96
97			<table border="0" cellpadding="0" cellspacing="0">
98			<tr>
99			<td align="right" valign="top">
100			<font size="2"><? printf("%.1f", $max_value); ?></font>
101			</td>
102			<td rowspan="2">
103			<img src="<? echo $url; ?>" width="500" height="250">
104			</td>
105			</tr>
106			<tr>
107			<td align="right" valign="bottom">
108			<font size="2"><? echo $min_value; ?></font>
109			</td>
110			</tr>
111			<tr>
112			<td> </td>
113			<td><img src="24hour.gif" width="500" height="39"></td>
114			</tr>
115			</table>
116
117			<hr weigth="1" color="#9999ff">
118
119			<b>Extra data</b>
120			<p>
121			<a href="<? echo "$day/$machine_name/$report/i-data.txt" ?>">Raw plot data</a><br>
122			<a href="<? echo "$day/$machine_name/$report/i-chart.gif" ?>">GIF chart</a><br>
123			<a href="<? echo "$day/$machine_name/$report/i-maxmin.txt" ?>">PHP y-axis limits include</a>
124
125			<? }
126	pjm2	1.2	else {
127			echo "<p>The report could not be found.</p>";
128			}
129	pjm2	1.11	echo "<hr weight=\"1\" color=\"#9999ff\">";
130	pjm2	1.2	}
131
132	pjm2	1.1	?>
133	pjm2	1.6
134	pjm2	1.10	<? include("bottom.inc"); ?>