ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/i-scream/projects/cms/source/reports/php/latest/latest.php
Revision: 1.35
Committed: Wed Mar 21 18:55:54 2001 UTC (23 years, 2 months ago) by pjm2
Branch: MAIN
Changes since 1.34: +4 -0 lines
Log Message:
Some browsers do not correctly render images if their size is set to
zero.  If one of the graph bar images has a zero width, then it will be
set to 1.

File Contents

# User Rev Content
1 pjm2 1.1 <?php
2    
3     # Navigation for the i-scream reports.
4     # pjm2@ukc.ac.uk
5     #
6     # CONFIGURABLE CONSTANTS: -
7    
8     include("latest_config.inc.php");
9    
10     #
11     # END CONFIGURATION
12    
13 pjm2 1.18 include("iutils.inc.php");
14 pjm2 1.1
15 pjm2 1.9 function printLine($title) {
16 pjm2 1.19 echo "<hr style=\"color:#9999ff;\">";
17 pjm2 1.9 echo "<b>$title</b>";
18 pjm2 1.6 }
19    
20 pjm2 1.1
21     function showStat($title, $value, $input) {
22 pjm2 1.24
23     $report = $value;
24    
25 pjm2 1.28 $value = getPregMatch($value, $input);
26 pjm2 1.1 if (empty($value)) {
27 pjm2 1.8 $value = "<i><font color=\"#999999\">not sent</font></i>";
28 pjm2 1.1 }
29     ?>
30     <table border="0" width="100%">
31     <tr>
32 pjm2 1.24 <td width="50%" align="right" valign="top">
33     <b><?=$title?></b>
34     </td>
35     <td width="50%" align="left" valign="top">
36     <? if (preg_match("/^[0-9]+\.?[0-9]*$/", $value)) {
37     linkToHistory($report);
38     } ?>
39     <?=$value?></td>
40 pjm2 1.1 </tr>
41     </table>
42     <?
43     }
44    
45    
46 pjm2 1.20 function linkToHistory($report) {
47     global $machine;
48     $yesterday = date("Y-m-d", time() - 86400);
49     echo <<<EOT
50 pjm2 1.23 <a href="browser.php?machine_name=$machine&report=$report&day=$yesterday&submit=Show"><img src="minichart.gif" alt="View yesterday's 24-hour chart" width="20" height="20" border="0"></a>
51 pjm2 1.20 EOT;
52     }
53    
54    
55 pjm2 1.28 # show all disk information.
56     function showDisks($diskRoot, $units, $input) {
57     include("latest_config.inc.php");
58    
59     $i = 0;
60     while(1) {
61     $name = getPregMatch("$diskRoot.p$i.attributes.name", $input);
62 pjm2 1.31 $mount = getPregMatch("$diskRoot.p$i.attributes.mount", $input);
63     if ($name || $mount) {
64     $used = "$diskRoot.p$i.attributes.used";
65     $kbytes = "$diskRoot.p$i.attributes.kbytes";
66 pjm2 1.34 showBar("$name<br>($mount)", $used, $kbytes, $units, $input);
67 pjm2 1.28 }
68 pjm2 1.30 else {
69     break;
70     }
71 pjm2 1.28 $i++;
72     }
73     }
74    
75     # Return a preg_match result.
76     function getPregMatch($value, $input) {
77 pjm2 1.29 preg_match("/$value=([^\,\}]*)[\,\}]/", $input, $matches);
78 pjm2 1.28 return $matches[1];
79     }
80    
81    
82 pjm2 1.1 # show a bar-represented value.
83 pjm2 1.26 function showBar($title, $value, $max, $units, $input, $arrange='normal') {
84 pjm2 1.1
85     include("latest_config.inc.php");
86    
87 pjm2 1.22 $report = $value;
88    
89 pjm2 1.28 $value = getPregMatch($value, $input);
90 pjm2 1.1 if (!is_int($max)) {
91 pjm2 1.28 $max = getPregMatch($max, $input);
92 pjm2 1.1 }
93     if (empty($value) || empty($max)) {
94     return;
95     }
96    
97 pjm2 1.26 if ($arrange == 'swap') {
98 pjm2 1.27 $value = $max - $value;
99 pjm2 1.26 }
100 pjm2 1.27
101     $width = intval($max_width * $value / $max);
102 pjm2 1.1
103 pjm2 1.35 if ($width < 1) {
104     $width = 1;
105     }
106    
107 pjm2 1.1 ?>
108 pjm2 1.10 <table border="0" cellpadding="0" cellspacing="0" align="center">
109 pjm2 1.1 <tr>
110 pjm2 1.23 <td colspan="2"><? linkToHistory($report); ?> <b><?=$title?></b> <font size="2">(<?=$value?><?=$units?>)</font></td>
111 pjm2 1.1 </tr>
112     <tr>
113     <td colspan="2" bgcolor="#eeeeff"><img src="<?=$barImage?>" border="0" height="20" width="<?=$width?>"></td>
114     </tr>
115     <tr>
116     <td colspan="2"><img src="<?=$scaleImage?>" border="0" height="11" width="<?=$max_width?>"></td>
117     </tr>
118     <tr>
119 pjm2 1.13 <td align="left">0<?=$units?></td>
120     <td align="right"><?=$max?><?=$units?></td>
121 pjm2 1.1 </tr>
122 pjm2 1.15 <tr>
123     <td colspan="2">&nbsp;</td>
124     </tr>
125 pjm2 1.1 </table>
126     <?
127     }
128    
129    
130     ?>
131    
132     <? include($titleHTML); ?>
133    
134 pjm2 1.12 <? printLine("Display the latest information received from a host"); ?>
135 pjm2 1.1
136     <form method="<? echo $formMethod ?>" action="<? echo $thisPage ?>">
137     <?
138    
139 pjm2 1.5 $file_array = getdirArray($latestDirectory,'asort');
140 pjm2 1.1 print "<select size=\"1\" name=\"machine\">";
141     if ($machine) { ?>
142     <option selected value="<? echo $machine ?>"><? echo $machine ?></option>
143     <option value="">----------------</option>
144     <? }
145     foreach($file_array as $file_name) {
146 pjm2 1.3 #if (is_dir($file_name)) {
147 pjm2 1.1 print "<option value=\"$file_name\">$file_name</option>";
148 pjm2 1.3 #}
149 pjm2 1.1 }
150     print "</select>";
151    
152     ?>
153     <input type="submit" name="submit" value="Display">
154     </form>
155    
156     <? if ($machine) {
157    
158 pjm2 1.12 $last_modified = filemtime("$latestDirectory/$machine/$latestData");
159     clearstatcache();
160     $data_age = time() - $last_modified;
161    
162 pjm2 1.17 $last_modified = date("l jS F - g:ia", $last_modified);
163 pjm2 1.12
164     if ($data_age > $warning_age) {
165     $warning = <<<EOT
166     <br>
167     <font color="red"><b>
168     Warning:
169     </b></font>
170     This realtime report is too old to be considered recent
171     EOT;
172     }
173    
174     echo <<<EOT
175 pjm2 1.16 <table border="0" bgcolor="#000066" cellpadding="3" cellspacing="1">
176 pjm2 1.12 <tr>
177     <td bgcolor="#000066">
178     &nbsp;
179     </td>
180     <td bgcolor="#ffffcc">
181     <font face="arial,sans-serif" size="2">
182 pjm2 1.24 <b>Receipt date:</b> $last_modified
183 pjm2 1.12 $warning
184     </font>
185     </td>
186     </tr>
187     </table>
188     EOT;
189    
190 pjm2 1.1 # Read the file.
191 pjm2 1.25 if (file_exists("$latestDirectory/$machine/$latestData")) {
192     $input = file("$latestDirectory/$machine/$latestData");
193     # All we need is the first line if there is more than one line.
194     $input = $input[0];
195     }
196 pjm2 1.1
197     if (empty($input)) {
198 pjm2 1.25 echo "<br><br>There are currently no latest details about <b>$machine</b>. Please notify your i-scream server administrator if you believe this to be incorrect.";
199 pjm2 1.1 }
200     else {
201     # Display the data specified in the display include.
202     include("latest_display.inc.php");
203     }
204 pjm2 1.9 }
205 pjm2 1.12
206 pjm2 1.1 ?>
207    
208 pjm2 1.16 <? printLine(""); ?>
209 pjm2 1.1
210     <? include($bottomHTML); ?>