php/latest/latest.php

<?php

# Navigation for the i-scream reports.
# pjm2@ukc.ac.uk
#
# CONFIGURABLE CONSTANTS: -

include("latest_config.inc.php");

#
# END CONFIGURATION


# return an array of subdirectories from a directory.
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;
    }
}

function printLine($title) {
    echo "<hr color=\"#9999ff\">";
    echo "<b>$title</b>";
}


function showStat($title, $value, $input) {
    preg_match("/$value=([^\,]*)[\,\}]/", $input, $matches);
    $value = $matches[1];
    if (empty($value)) {
        $value = "<i><font color=\"#999999\">not sent</font></i>";
    }
    ?>
        <table border="0" width="100%">
          <tr>
            <td width="50%" align="right" valign="top"><b><?=$title?></b></td>
            <td width="50%" align="left" valign="top"><?=$value?></td>
          </tr>
        </table>
    <?
}


# show a bar-represented value.
function showBar($title, $value, $max, $units, $input) {

    include("latest_config.inc.php");

    preg_match("/$value=([^\,]*)\,/", $input, $matches);
    $value = $matches[1];
    if (!is_int($max)) {
        preg_match("/$max=([^\,]*)\,/", $input, $matches);
        $max = $matches[1];
    }
    if (empty($value) || empty($max)) {
        return;
    }

    $width = intval($max_width * $value / $max);

    ?>
        <table border="0" cellpadding="0" cellspacing="0" align="center">
          <tr>
            <td colspan="2"><b><?=$title?></b> <font size="2">(<?=$value?><?=$units?>)</font></td>
          </tr>
          <tr>
            <td colspan="2" bgcolor="#eeeeff"><img src="<?=$barImage?>" border="0" height="20" width="<?=$width?>"></td>
          </tr>
          <tr>
            <td colspan="2"><img src="<?=$scaleImage?>" border="0" height="11" width="<?=$max_width?>"></td>
          </tr>
          <tr>
            <td align="left">0<?=$units?></td>
            <td align="right"><?=$max?><?=$units?></td>
          </tr>
          <tr>
            <td colspan="2">&nbsp;</td>
          </tr>
        </table>
    <?
}


?>

<? include($titleHTML); ?>

<? printLine("Display the latest information received from a host"); ?>

<form method="<? echo $formMethod ?>" action="<? echo $thisPage ?>">
<?

    $file_array = getdirArray($latestDirectory,'asort');
    print "<select size=\"1\" name=\"machine\">";
    if ($machine) { ?>
        <option selected value="<? echo $machine ?>"><? echo $machine ?></option>
        <option value="">----------------</option>
    <? }
    foreach($file_array as $file_name) {
        #if (is_dir($file_name)) {
            print "<option value=\"$file_name\">$file_name</option>";
        #}
    }
    print "</select>";

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

<? if ($machine) {

       $last_modified = filemtime("$latestDirectory/$machine/$latestData");
       clearstatcache();
       $data_age = time() - $last_modified;

       $last_modified = strftime("%a %d %b %Y at %T", $last_modified);

       if ($data_age > $warning_age) {
           $warning = <<<EOT
               <br>
               <font color="red"><b>
                   Warning:
               </b></font>
                   This realtime report is too old to be considered recent
EOT;
       }

echo <<<EOT
       <table border="0" bgcolor="#000066" cellpadding="3" cellspacing="1">
         <tr>
           <td bgcolor="#000066">
             &nbsp;
           </td>
           <td bgcolor="#ffffcc">
             <font face="arial,sans-serif" size="2">
               <b>Recipt date:</b> $last_modified
               $warning
             </font>
           </td>
         </tr>
       </table>
EOT;

       # Read the file.
       #$input = "packet.attributes.machine_name=raptor.ukc.ac.uk,packet.memory.free=10,packet.memory.total=100,";
       $input = file("$latestDirectory/$machine/$latestData");
       # All we need is the first line if there is more than one line.
       $input = $input[0];

       if (empty($input)) {
           echo "<br><br>There was an error reading from the latest packet received.  Please notify your i-scream server administrator.";
       }
       else {
           # Display the data specified in the display include.
           include("latest_display.inc.php");
       }
   }

?>

<? printLine(""); ?>

<? include($bottomHTML); ?>
Revision:	1.16
Committed:	Sun Mar 11 21:56:23 2001 UTC (23 years, 8 months ago) by pjm2
Branch:	MAIN
Changes since 1.15:	+2 -5 lines
Log Message:	Minor changes
#	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"> </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			<? if ($machine) {
130
131	pjm2	1.12	$last_modified = filemtime("$latestDirectory/$machine/$latestData");
132			clearstatcache();
133			$data_age = time() - $last_modified;
134
135			$last_modified = strftime("%a %d %b %Y at %T", $last_modified);
136
137			if ($data_age > $warning_age) {
138			$warning = <<<EOT
139			<br>
140			<font color="red"><b>
141			Warning:
142			</b></font>
143			This realtime report is too old to be considered recent
144			EOT;
145			}
146
147			echo <<<EOT
148	pjm2	1.16	<table border="0" bgcolor="#000066" cellpadding="3" cellspacing="1">
149	pjm2	1.12	<tr>
150			<td bgcolor="#000066">
151
152			</td>
153			<td bgcolor="#ffffcc">
154			<font face="arial,sans-serif" size="2">
155			<b>Recipt date:</b> $last_modified
156			$warning
157			</font>
158			</td>
159			</tr>
160			</table>
161			EOT;
162
163	pjm2	1.1	# Read the file.
164			#$input = "packet.attributes.machine_name=raptor.ukc.ac.uk,packet.memory.free=10,packet.memory.total=100,";
165	pjm2	1.2	$input = file("$latestDirectory/$machine/$latestData");
166	pjm2	1.1	# All we need is the first line if there is more than one line.
167			$input = $input[0];
168
169			if (empty($input)) {
170			echo "<br><br>There was an error reading from the latest packet received. Please notify your i-scream server administrator.";
171			}
172			else {
173			# Display the data specified in the display include.
174			include("latest_display.inc.php");
175			}
176	pjm2	1.9	}
177	pjm2	1.12
178	pjm2	1.1	?>
179
180	pjm2	1.16	<? printLine(""); ?>
181	pjm2	1.1
182			<? include($bottomHTML); ?>