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.15
Committed: Sun Mar 11 21:46:46 2001 UTC (23 years, 7 months ago) by pjm2
Branch: MAIN
Changes since 1.14: +3 -0 lines
Log Message:
Graphs are now a little more spaced out so that there is no confusion
about which title belongs to which graph.

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    
14     # return an array of subdirectories from a directory.
15     function getdirArray($dir='./',$sort='asort') {
16     global $dir_file_count;
17     if ( is_dir($dir) ) {
18     $fd = @opendir($dir);
19     while ( ($part = @readdir($fd)) == TRUE ) {
20     clearstatcache();
21     if ($part != "." && $part != "..") {
22     $dir_array[] = $part;
23     }
24     }
25     if($fd == TRUE) {
26     closedir($fd);
27     }
28     if (is_array($dir_array)) {
29     $sort($dir_array);
30     $dir_file_count = count($dir_array);
31     Return $dir_array;
32     } else {
33     Return FALSE;
34     }
35     } else {
36     Return FALSE;
37     }
38     }
39    
40 pjm2 1.9 function printLine($title) {
41 pjm2 1.6 echo "<hr color=\"#9999ff\">";
42 pjm2 1.9 echo "<b>$title</b>";
43 pjm2 1.6 }
44    
45 pjm2 1.1
46     function showStat($title, $value, $input) {
47 pjm2 1.7 preg_match("/$value=([^\,]*)[\,\}]/", $input, $matches);
48 pjm2 1.1 $value = $matches[1];
49     if (empty($value)) {
50 pjm2 1.8 $value = "<i><font color=\"#999999\">not sent</font></i>";
51 pjm2 1.1 }
52     ?>
53     <table border="0" width="100%">
54     <tr>
55 pjm2 1.12 <td width="50%" align="right" valign="top"><b><?=$title?></b></td>
56     <td width="50%" align="left" valign="top"><?=$value?></td>
57 pjm2 1.1 </tr>
58     </table>
59     <?
60     }
61    
62    
63     # show a bar-represented value.
64 pjm2 1.13 function showBar($title, $value, $max, $units, $input) {
65 pjm2 1.1
66     include("latest_config.inc.php");
67    
68     preg_match("/$value=([^\,]*)\,/", $input, $matches);
69     $value = $matches[1];
70     if (!is_int($max)) {
71     preg_match("/$max=([^\,]*)\,/", $input, $matches);
72     $max = $matches[1];
73     }
74     if (empty($value) || empty($max)) {
75     return;
76     }
77    
78     $width = intval($max_width * $value / $max);
79    
80     ?>
81 pjm2 1.10 <table border="0" cellpadding="0" cellspacing="0" align="center">
82 pjm2 1.1 <tr>
83 pjm2 1.14 <td colspan="2"><b><?=$title?></b> <font size="2">(<?=$value?><?=$units?>)</font></td>
84 pjm2 1.1 </tr>
85     <tr>
86     <td colspan="2" bgcolor="#eeeeff"><img src="<?=$barImage?>" border="0" height="20" width="<?=$width?>"></td>
87     </tr>
88     <tr>
89     <td colspan="2"><img src="<?=$scaleImage?>" border="0" height="11" width="<?=$max_width?>"></td>
90     </tr>
91     <tr>
92 pjm2 1.13 <td align="left">0<?=$units?></td>
93     <td align="right"><?=$max?><?=$units?></td>
94 pjm2 1.1 </tr>
95 pjm2 1.15 <tr>
96     <td colspan="2">&nbsp;</td>
97     </tr>
98 pjm2 1.1 </table>
99     <?
100     }
101    
102    
103     ?>
104    
105     <? include($titleHTML); ?>
106    
107 pjm2 1.12 <? printLine("Display the latest information received from a host"); ?>
108 pjm2 1.1
109     <form method="<? echo $formMethod ?>" action="<? echo $thisPage ?>">
110     <?
111    
112 pjm2 1.5 $file_array = getdirArray($latestDirectory,'asort');
113 pjm2 1.1 print "<select size=\"1\" name=\"machine\">";
114     if ($machine) { ?>
115     <option selected value="<? echo $machine ?>"><? echo $machine ?></option>
116     <option value="">----------------</option>
117     <? }
118     foreach($file_array as $file_name) {
119 pjm2 1.3 #if (is_dir($file_name)) {
120 pjm2 1.1 print "<option value=\"$file_name\">$file_name</option>";
121 pjm2 1.3 #}
122 pjm2 1.1 }
123     print "</select>";
124    
125     ?>
126     <input type="submit" name="submit" value="Display">
127     </form>
128    
129 pjm2 1.12 <hr weight="1" color="<? echo $lineColor ?>">
130    
131 pjm2 1.1 <? if ($machine) {
132    
133 pjm2 1.12 $last_modified = filemtime("$latestDirectory/$machine/$latestData");
134     clearstatcache();
135     $data_age = time() - $last_modified;
136    
137     $last_modified = strftime("%a %d %b %Y at %T", $last_modified);
138    
139     if ($data_age > $warning_age) {
140     $warning = <<<EOT
141     <br>
142     <font color="red"><b>
143     Warning:
144     </b></font>
145     This realtime report is too old to be considered recent
146     EOT;
147     }
148    
149     echo <<<EOT
150     <table border="0" bgcolor="#000066" cellpadding="3" cellspacing="1" align="center">
151     <tr>
152     <td bgcolor="#000066">
153     &nbsp;
154     </td>
155     <td bgcolor="#ffffcc">
156     <font face="arial,sans-serif" size="2">
157     <b>Recipt date:</b> $last_modified
158     $warning
159     </font>
160     </td>
161     </tr>
162     </table>
163     EOT;
164    
165 pjm2 1.1 # Read the file.
166     #$input = "packet.attributes.machine_name=raptor.ukc.ac.uk,packet.memory.free=10,packet.memory.total=100,";
167 pjm2 1.2 $input = file("$latestDirectory/$machine/$latestData");
168 pjm2 1.1 # All we need is the first line if there is more than one line.
169     $input = $input[0];
170    
171     if (empty($input)) {
172     echo "<br><br>There was an error reading from the latest packet received. Please notify your i-scream server administrator.";
173     }
174     else {
175     # Display the data specified in the display include.
176     include("latest_display.inc.php");
177     }
178 pjm2 1.12
179     printLine("");
180 pjm2 1.9 }
181 pjm2 1.12
182 pjm2 1.1 ?>
183    
184    
185     <? include($bottomHTML); ?>