php/latest/latest.php

<?php

#
# i-scream central monitoring system
# http://www.i-scream.org
# Copyright (C) 2000-2002 i-scream
# 
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
#

# CONFIGURABLE CONSTANTS: -

include("latest_config.inc.php");

#
# END CONFIGURATION

include("iutils.inc.php");

if ($formMethod == "GET") {
    $machine = isset($_GET['machine']) ? $_GET['machine'] : "";
}


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


function showUptime($title, $value, $input, $graph="") {
    $report = $value;

    $value = getPregMatch($value, $input);
    if (!isset($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">
             <? if (preg_match("/^[0-9]+\.?[0-9]*$/", $value)) {
                    linkToHistory($graph);
                } ?>
              <?=uptime($value)?> (<?=$value?> seconds)</td>
          </tr>
        </table>
    <?
}


function showStat($title, $value, $input, $graph="") {

    $report = $value;

    $value = getPregMatch($value, $input);
    if (!isset($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">
             <? if (preg_match("/^[0-9]+\.?[0-9]*$/", $value)) {
                    linkToHistory($graph);
                } ?> 
              <?=$value?></td>
          </tr>
        </table>
    <?
}


function linkToHistory($graph) {
    global $machine;
    if(!empty($graph)) {
        echo <<<EOT
        <a href="graphs.php?machine_name=$machine&graph=$graph&submit=Show"><img src="minichart.gif" alt="View historical graphs of this data" width="20" height="20" border="0"></a>
EOT;
    }
}


# convert bytes to MB
function b2Mb($bytes) {
    $mb = $bytes / (1024*1024);
    return (int) $mb;
}


# Convert seconds uptime to something readable
function uptime($until) {
    $day = date('z', $until);
    $hour = date('G', $until);
    if ($hour == 0) { # everything's an hour ahead, so roll back
        $hour = 23;
        $day = $day - 1;
    } else {
        $hour = $hour - 1;
    }
    $minute = date('i', $until);
    $return = "";
    if ($day) {
        $return = "$return$day";
        if ($day == 1) {
            $return = "$return Day ";
        } else {
            $return = "$return Days ";
        }
    }
    if ($hour) {
        $return = "$return$hour";
        if ($hour == 1) {
            $return = "$return Hour ";
        } else {
            $return = "$return Hours ";
        }
    }
    $return = "$return$minute";
    if ($minute == 1) {
        $return = "$return Min";
    } else {
        $return = "$return Mins";
    }
    return $return;
}


# show all disk information.
function showDisks($diskRoot, $units, $input) {
    include("latest_config.inc.php");

    $i = 0;
    while(1) {
        $name = getPregMatch("$diskRoot.p$i.attributes.name", $input);
        $mount = getPregMatch("$diskRoot.p$i.attributes.mount", $input);
        if ($name || $mount) {
            $used = "$diskRoot.p$i.attributes.used";
            $total = "$diskRoot.p$i.attributes.total";
            $graph = preg_replace("/_/", "$hex_underscore", $mount);
            $graph = preg_replace("/\//", "$hex_slash", $graph);
            $totalinodes = getPregMatch("$diskRoot.p$i.attributes.totalinodes", $input);
            $freeinodes = getPregMatch("$diskRoot.p$i.attributes.freeinodes", $input);
            showBar("$name ($mount)<br>space used", $used, $total, $units, $input, "disk-$graph");
            showBar("inodes used", (float) $freeinodes, (float) $totalinodes, " inodes", $input, "", "swap");
            showStat("FS Type", "$diskRoot.p$i.attributes.fstype", $input);
            print "          <br><br>\n";
        }
        else {
            break;
        }
        $i++;
    }
}


# show all disk IO information.
function showDiskIO($diskRoot, $input) {
    include("latest_config.inc.php");
 
    $i = 0;
    while(1) {
        $name = getPregMatch("$diskRoot.p$i.attributes.name", $input);
        if ($name) {
            print "<br><center><b>(Disk $name)</b></center>";
            showStat("Read bytes (per sec)", "$diskRoot.p$i.attributes.rbytes", $input, "diskio-$name");
            showStat("Write bytes (per sec)", "$diskRoot.p$i.attributes.wbytes", $input, "diskio-$name");
            print "          <br>\n";
        }
        else {
            break;
        }
        $i++;
    }
}


# show all network information.
function showNet($netRoot, $input) {
    include("latest_config.inc.php");

    $i = 0;
    while(1) {
        $name = getPregMatch("$netRoot.p$i.attributes.name", $input);
        if ($name) {
            print "<br><center><b>(Network Interface $name)</b></center>";
            showStat("Received bytes (per sec)", "$netRoot.p$i.attributes.rx", $input, "net-$name");
            showStat("Transfered bytes (per sec)", "$netRoot.p$i.attributes.tx", $input, "net-$name");
            print "          <br>\n";
        }
        else {
            break;
        }
        $i++;
    }
}


# show all mail queue information
function showMailQ($mailqRoot, $input) {
    include("latest_config.inc.php");

    $i = 0;
    while(1) {
        $name = getPregMatch("$mailqRoot.p$i.attributes.name", $input);
        if ($name) {
            print "<br><center><b>($name)</b></center>";
            $name = preg_replace("/\s+/", "", $name);
            showStat("Messages in queue", "$mailqRoot.p$i.attributes.size", $input, "mailq-$name");
            print "          <br>\n";
        }
        else {
            break;
        }
        $i++;
    }
}


# Return a preg_match result.
function getPregMatch($value, $input) {
    preg_match("/$value=([^\,\}]*)[\,\}]/", $input, $matches);
    if(!isset($matches[1])) {
        return;
    }
    return $matches[1];
}


# show a bar-represented value.
function showBar($title, $value, $max, $units, $input, $graph="", $arrange='normal') {

    include("latest_config.inc.php");

    $report = $value;
    if (!is_int($value)) {
        $value = getPregMatch($value, $input);
    }
    if (!is_int($max)) {
        $max = getPregMatch($max, $input);
    }
    if (!isset($value) || !isset($max)) {
        return;
    }

    if ($arrange == 'swap') {
        $value = $max - $value;
    }

    if ($units == 'MB') {
        $value = b2Mb ($value);
        $max = b2Mb ($max);
    }

    if(empty($max)) {
        $width = 1;
    }
    else {
        $width = intval($max_width * $value / $max);
        if ($width < 1) {
            $width = 1;
        }
    }

    ?>
        <table border="0" cellpadding="0" cellspacing="0" align="center">
          <tr>
            <td colspan="2"><? linkToHistory($graph); ?> <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>
        </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 = date("l jS F Y - g:ia", $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;
       }
       else {
           $warning = "";
       }

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>Receipt date:</b> $last_modified
               $warning
             </font>
           </td>
         </tr>
       </table>
EOT;

       # Read the file.
       if (file_exists("$latestDirectory/$machine/$latestData")) {
           $input = file("$latestDirectory/$machine/$latestData");
           # All we need is the first line if there is more than one line.
           $input = $input[0];
       }

       if (!isset($input)) {
           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.";
       }
       else {
           # Display the data specified in the display include.
           include("latest_display.inc.php");
       }
   }

?>

<? printLine(""); ?>

<? include($bottomHTML); ?>
Revision:	1.49
Committed:	Wed May 4 14:14:25 2005 UTC (19 years ago) by tdb
Branch:	MAIN
Changes since 1.48:	+25 -4 lines
Log Message:	Fix a few bugs in the uptime reporting. Mostly reported by skel.
#	User	Rev	Content
1	pjm2	1.1	<?php
2
3	tdb	1.37	#
4			# i-scream central monitoring system
5	tdb	1.45	# http://www.i-scream.org
6	tdb	1.37	# Copyright (C) 2000-2002 i-scream
7			#
8			# This program is free software; you can redistribute it and/or
9			# modify it under the terms of the GNU General Public License
10			# as published by the Free Software Foundation; either version 2
11			# of the License, or (at your option) any later version.
12			#
13			# This program is distributed in the hope that it will be useful,
14			# but WITHOUT ANY WARRANTY; without even the implied warranty of
15			# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16			# GNU General Public License for more details.
17			#
18			# You should have received a copy of the GNU General Public License
19			# along with this program; if not, write to the Free Software
20			# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21			#
22
23	pjm2	1.1	# CONFIGURABLE CONSTANTS: -
24
25			include("latest_config.inc.php");
26
27			#
28			# END CONFIGURATION
29
30	pjm2	1.18	include("iutils.inc.php");
31	pjm2	1.1
32	tdb	1.46	if ($formMethod == "GET") {
33	tdb	1.47	$machine = isset($_GET['machine']) ? $_GET['machine'] : "";
34	tdb	1.46	}
35
36
37	pjm2	1.9	function printLine($title) {
38	pjm2	1.19	echo "<hr style=\"color:#9999ff;\">";
39	pjm2	1.9	echo "<b>$title</b>";
40	pjm2	1.6	}
41
42	pjm2	1.1
43	tdb	1.46	function showUptime($title, $value, $input, $graph="") {
44			$report = $value;
45
46			$value = getPregMatch($value, $input);
47			if (!isset($value)) {
48			$value = "<i><font color=\"#999999\">not sent</font></i>";
49			}
50			?>
51			<table border="0" width="100%">
52			<tr>
53			<td width="50%" align="right" valign="top">
54			<b><?=$title?></b>
55			</td>
56			<td width="50%" align="left" valign="top">
57			<? if (preg_match("/^[0-9]+\.?[0-9]*$/", $value)) {
58			linkToHistory($graph);
59			} ?>
60			<?=uptime($value)?> (<?=$value?> seconds)</td>
61			</tr>
62			</table>
63			<?
64			}
65
66
67	tdb	1.42	function showStat($title, $value, $input, $graph="") {
68	pjm2	1.24
69			$report = $value;
70
71	pjm2	1.28	$value = getPregMatch($value, $input);
72	tdb	1.38	if (!isset($value)) {
73	pjm2	1.8	$value = "<i><font color=\"#999999\">not sent</font></i>";
74	pjm2	1.1	}
75			?>
76			<table border="0" width="100%">
77			<tr>
78	pjm2	1.24	<td width="50%" align="right" valign="top">
79			<b><?=$title?></b>
80			</td>
81			<td width="50%" align="left" valign="top">
82			<? if (preg_match("/^[0-9]+\.?[0-9]*$/", $value)) {
83	tdb	1.42	linkToHistory($graph);
84	pjm2	1.24	} ?>
85			<?=$value?></td>
86	pjm2	1.1	</tr>
87			</table>
88			<?
89			}
90
91
92	tdb	1.42	function linkToHistory($graph) {
93	pjm2	1.20	global $machine;
94	tdb	1.42	if(!empty($graph)) {
95			echo <<<EOT
96			<a href="graphs.php?machine_name=$machine&graph=$graph&submit=Show"><img src="minichart.gif" alt="View historical graphs of this data" width="20" height="20" border="0"></a>
97	pjm2	1.20	EOT;
98	tdb	1.42	}
99	pjm2	1.20	}
100
101
102	tdb	1.46	# convert bytes to MB
103			function b2Mb($bytes) {
104			$mb = $bytes / (1024*1024);
105			return (int) $mb;
106			}
107
108
109			# Convert seconds uptime to something readable
110			function uptime($until) {
111			$day = date('z', $until);
112			$hour = date('G', $until);
113	tdb	1.49	if ($hour == 0) { # everything's an hour ahead, so roll back
114			$hour = 23;
115			$day = $day - 1;
116			} else {
117			$hour = $hour - 1;
118			}
119	tdb	1.46	$minute = date('i', $until);
120			$return = "";
121			if ($day) {
122	tdb	1.49	$return = "$return$day";
123			if ($day == 1) {
124			$return = "$return Day ";
125			} else {
126			$return = "$return Days ";
127			}
128	tdb	1.46	}
129			if ($hour) {
130	tdb	1.49	$return = "$return$hour";
131			if ($hour == 1) {
132			$return = "$return Hour ";
133			} else {
134			$return = "$return Hours ";
135			}
136			}
137			$return = "$return$minute";
138			if ($minute == 1) {
139			$return = "$return Min";
140			} else {
141			$return = "$return Mins";
142	tdb	1.46	}
143	tdb	1.49	return $return;
144	tdb	1.46	}
145
146
147	pjm2	1.28	# show all disk information.
148			function showDisks($diskRoot, $units, $input) {
149			include("latest_config.inc.php");
150
151			$i = 0;
152			while(1) {
153			$name = getPregMatch("$diskRoot.p$i.attributes.name", $input);
154	pjm2	1.31	$mount = getPregMatch("$diskRoot.p$i.attributes.mount", $input);
155			if ($name \|\| $mount) {
156			$used = "$diskRoot.p$i.attributes.used";
157	tdb	1.44	$total = "$diskRoot.p$i.attributes.total";
158	tdb	1.42	$graph = preg_replace("/_/", "$hex_underscore", $mount);
159			$graph = preg_replace("/\//", "$hex_slash", $graph);
160	tdb	1.43	$totalinodes = getPregMatch("$diskRoot.p$i.attributes.totalinodes", $input);
161			$freeinodes = getPregMatch("$diskRoot.p$i.attributes.freeinodes", $input);
162	tdb	1.44	showBar("$name ($mount)<br>space used", $used, $total, $units, $input, "disk-$graph");
163	tdb	1.46	showBar("inodes used", (float) $freeinodes, (float) $totalinodes, " inodes", $input, "", "swap");
164			showStat("FS Type", "$diskRoot.p$i.attributes.fstype", $input);
165	tdb	1.43	print " <br><br>\n";
166	pjm2	1.28	}
167	pjm2	1.30	else {
168			break;
169			}
170	pjm2	1.28	$i++;
171			}
172			}
173	tdb	1.44
174
175			# show all disk IO information.
176			function showDiskIO($diskRoot, $input) {
177			include("latest_config.inc.php");
178
179			$i = 0;
180			while(1) {
181			$name = getPregMatch("$diskRoot.p$i.attributes.name", $input);
182			if ($name) {
183			print "<br><center><b>(Disk $name)</b></center>";
184			showStat("Read bytes (per sec)", "$diskRoot.p$i.attributes.rbytes", $input, "diskio-$name");
185			showStat("Write bytes (per sec)", "$diskRoot.p$i.attributes.wbytes", $input, "diskio-$name");
186			print " <br>\n";
187			}
188			else {
189			break;
190			}
191			$i++;
192			}
193			}
194
195
196			# show all network information.
197			function showNet($netRoot, $input) {
198			include("latest_config.inc.php");
199	tdb	1.47
200	tdb	1.44	$i = 0;
201			while(1) {
202			$name = getPregMatch("$netRoot.p$i.attributes.name", $input);
203			if ($name) {
204			print "<br><center><b>(Network Interface $name)</b></center>";
205			showStat("Received bytes (per sec)", "$netRoot.p$i.attributes.rx", $input, "net-$name");
206			showStat("Transfered bytes (per sec)", "$netRoot.p$i.attributes.tx", $input, "net-$name");
207			print " <br>\n";
208			}
209			else {
210			break;
211			}
212			$i++;
213			}
214			}
215
216	tdb	1.47
217	tdb	1.46	# show all mail queue information
218			function showMailQ($mailqRoot, $input) {
219			include("latest_config.inc.php");
220
221			$i = 0;
222			while(1) {
223			$name = getPregMatch("$mailqRoot.p$i.attributes.name", $input);
224			if ($name) {
225			print "<br><center><b>($name)</b></center>";
226			$name = preg_replace("/\s+/", "", $name);
227			showStat("Messages in queue", "$mailqRoot.p$i.attributes.size", $input, "mailq-$name");
228			print " <br>\n";
229			}
230			else {
231			break;
232			}
233			$i++;
234			}
235			}
236	pjm2	1.28
237	tdb	1.47
238	pjm2	1.28	# Return a preg_match result.
239			function getPregMatch($value, $input) {
240	pjm2	1.29	preg_match("/$value=([^\,\}]*)[\,\}]/", $input, $matches);
241	tdb	1.48	if(!isset($matches[1])) {
242			return;
243			}
244	pjm2	1.28	return $matches[1];
245			}
246
247
248	pjm2	1.1	# show a bar-represented value.
249	tdb	1.42	function showBar($title, $value, $max, $units, $input, $graph="", $arrange='normal') {
250	pjm2	1.1
251			include("latest_config.inc.php");
252
253	pjm2	1.22	$report = $value;
254	tdb	1.43	if (!is_int($value)) {
255			$value = getPregMatch($value, $input);
256			}
257	pjm2	1.1	if (!is_int($max)) {
258	pjm2	1.28	$max = getPregMatch($max, $input);
259	pjm2	1.1	}
260	tdb	1.40	if (!isset($value) \|\| !isset($max)) {
261	pjm2	1.1	return;
262			}
263
264	pjm2	1.26	if ($arrange == 'swap') {
265	pjm2	1.27	$value = $max - $value;
266	tdb	1.46	}
267
268			if ($units == 'MB') {
269			$value = b2Mb ($value);
270			$max = b2Mb ($max);
271	pjm2	1.26	}
272	pjm2	1.27
273	tdb	1.40	if(empty($max)) {
274	pjm2	1.35	$width = 1;
275	tdb	1.40	}
276			else {
277			$width = intval($max_width * $value / $max);
278			if ($width < 1) {
279			$width = 1;
280			}
281	pjm2	1.35	}
282
283	pjm2	1.1	?>
284	pjm2	1.10	<table border="0" cellpadding="0" cellspacing="0" align="center">
285	pjm2	1.1	<tr>
286	tdb	1.42	<td colspan="2"><? linkToHistory($graph); ?> <b><?=$title?></b> <font size="2">(<?=$value?><?=$units?>)</font></td>
287	pjm2	1.1	</tr>
288			<tr>
289			<td colspan="2" bgcolor="#eeeeff"><img src="<?=$barImage?>" border="0" height="20" width="<?=$width?>"></td>
290			</tr>
291			<tr>
292			<td colspan="2"><img src="<?=$scaleImage?>" border="0" height="11" width="<?=$max_width?>"></td>
293			</tr>
294			<tr>
295	pjm2	1.13	<td align="left">0<?=$units?></td>
296			<td align="right"><?=$max?><?=$units?></td>
297	pjm2	1.15	</tr>
298	pjm2	1.1	</table>
299			<?
300			}
301
302
303			?>
304
305			<? include($titleHTML); ?>
306
307	pjm2	1.12	<? printLine("Display the latest information received from a host"); ?>
308	pjm2	1.1
309			<form method="<? echo $formMethod ?>" action="<? echo $thisPage ?>">
310			<?
311
312	pjm2	1.5	$file_array = getdirArray($latestDirectory,'asort');
313	pjm2	1.1	print "<select size=\"1\" name=\"machine\">";
314			if ($machine) { ?>
315			<option selected value="<? echo $machine ?>"><? echo $machine ?></option>
316			<option value="">----------------</option>
317			<? }
318			foreach($file_array as $file_name) {
319	pjm2	1.3	#if (is_dir($file_name)) {
320	pjm2	1.1	print "<option value=\"$file_name\">$file_name</option>";
321	pjm2	1.3	#}
322	pjm2	1.1	}
323			print "</select>";
324
325			?>
326			<input type="submit" name="submit" value="Display">
327			</form>
328
329			<? if ($machine) {
330
331	pjm2	1.12	$last_modified = filemtime("$latestDirectory/$machine/$latestData");
332			clearstatcache();
333			$data_age = time() - $last_modified;
334
335	pjm2	1.36	$last_modified = date("l jS F Y - g:ia", $last_modified);
336	pjm2	1.12
337			if ($data_age > $warning_age) {
338			$warning = <<<EOT
339			<br>
340			<font color="red"><b>
341			Warning:
342			</b></font>
343			This realtime report is too old to be considered recent
344			EOT;
345	tdb	1.47	}
346			else {
347			$warning = "";
348	pjm2	1.12	}
349
350			echo <<<EOT
351	pjm2	1.16	<table border="0" bgcolor="#000066" cellpadding="3" cellspacing="1">
352	pjm2	1.12	<tr>
353			<td bgcolor="#000066">
354
355			</td>
356			<td bgcolor="#ffffcc">
357			<font face="arial,sans-serif" size="2">
358	pjm2	1.24	<b>Receipt date:</b> $last_modified
359	pjm2	1.12	$warning
360			</font>
361			</td>
362			</tr>
363			</table>
364			EOT;
365
366	pjm2	1.1	# Read the file.
367	pjm2	1.25	if (file_exists("$latestDirectory/$machine/$latestData")) {
368			$input = file("$latestDirectory/$machine/$latestData");
369			# All we need is the first line if there is more than one line.
370			$input = $input[0];
371			}
372	pjm2	1.1
373	tdb	1.38	if (!isset($input)) {
374	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.";
375	pjm2	1.1	}
376			else {
377			# Display the data specified in the display include.
378			include("latest_display.inc.php");
379			}
380	pjm2	1.9	}
381	pjm2	1.12
382	pjm2	1.1	?>
383
384	pjm2	1.16	<? printLine(""); ?>
385	pjm2	1.1
386			<? include($bottomHTML); ?>