[Additional chknet code
tony@tonywhitmore.co.uk**20041018212239] {
addfile ./chknet/settings.php
hunk ./CHANGELOG 1
+Development - 18/10/2004
+========================
+* Added further functionality to chknet
+
hunk ./CHANGELOG 8
+* Added start of ChkNet code
hunk ./TODO 54
-* Change to "Get help with MODULE"
+* Change to "Get help with MODULE" - done with chknet
hunk ./TODO 56
+* Move module settings to inside the module - probably keep table though - DONE with chknet
+* Add default values to ChkNet settings table
hunk ./chknet/intro.php 44
-	function produce_cell($name)
+	function produce_cell($array)
hunk ./chknet/intro.php 47
-		echo "<td align='center' bgcolor='";
+		
hunk ./chknet/intro.php 49
-		$query = "SELECT value FROM settings WHERE function = 'pingpath'";
+		$query = "SELECT function,value FROM chknet_settings";
hunk ./chknet/intro.php 52
-		$row = $result->fetchRow();
-		$pingpath = $row['value'];
-		$query = "SELECT value FROM settings WHERE function = 'pingoptions'";
-		$result = $db->query($query);
-		if (DB::isError($db)) {die($db->getMessage());}
-		$row = $result->fetchRow();
-		$pingoptions = $row['value'];		
+		while ( $row = $result->fetchRow() )
+			{
+			$$row['function'] = $row['value'];
+			}
+
hunk ./chknet/intro.php 58
-		$return = "alive";
-		if ( $return == "alive" )
+		$output = shell_exec($pingpath . ' ' . $pingoptions . ' ' . $array['hostname']);
+		echo "<td align='center' bgcolor='";
+		$output = preg_replace('/\n/', '', $output);
+		if ( $output == $array['hostname'] )
hunk ./chknet/intro.php 63
-			echo "#33FF33";
+			echo $okcolour;
hunk ./chknet/intro.php 67
-			echo "#FF0000";
+			echo $failcolour;
hunk ./chknet/intro.php 70
-		echo $name . "\n";
+		echo $array['name'] . "<br>(" . $array['hostname'] . ")\n";
hunk ./chknet/intro.php 73
+
hunk ./chknet/intro.php 81
-		echo "<table align='center' width='70%' cellspacing='3' cellpadding='3' border='0'>\n";
+		echo "<table align='center' width='90%' cellspacing='3' cellpadding='3' border='0'>\n";
hunk ./chknet/intro.php 90
-				if ( $j = 0 )
+				if ( $j == 0 )
hunk ./chknet/intro.php 98
-				produce_cell($row2['name']);
+				produce_cell($row2);
hunk ./chknet/intro.php 111
-	
hunk ./chknet/intro.php 125
-			that a device on a hostname or IP address has responded to an ICMP request.
+			that a device on a hostname or IP address has responded to an ICMP echo request.
hunk ./chknet/settings.php 1
-
+<?php
+
+/*  Copyright 2003,2004 Tony Whitmore.
+
+    This file is part of School Tools for On-line Resource Management.
+
+    School Tools for On-line Resource Management 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.
+
+    School Tools for On-line Resource Management 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 School Tools for On-line Resource Management; if not, write to the Free Software
+    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+*/
+
+// Page that allows the ChkNet administrator to edit chknet settings.
+
+// Include the standard HTML headers.
+include ("STORM/common/html/htmlheader.inc");
+
+// Include the STORM and login functions files.
+include ("STORM/common/misc/functions.inc");
+include ("STORM/chknet/misc/functions.inc");
+
+// Check for a valid session and access level.
+sessionchk();
+$accesslevel = "3";
+accesschk("login",$accesslevel);
+
+// Include the connection to the database server.
+include ("STORM/common/db/connectadmin.inc");
+
+// Include the navigation options.
+include ("STORM/chknet/html/admin_nav.inc");
+echo "<br>\n";
+
+$query = "SELECT * FROM chknet_settings";
+
+if ( isset($_POST['not_new']) )
+	{
+	// Pull all the current settings from the database
+	$result = $db->query($query);
+	if (DB::isError($db)) {die($db->getMessage());}
+	while ( $row = $result->fetchRow() )
+			{ // for each row in the settings table
+			if ( $row['function'] != "chunksperday" )
+				{ // Don't update the chunksperday setting, but all others
+				$query1 = "UPDATE chknet_settings SET value='" . $_POST[$row['function']] . "' WHERE function='" . $row['function'] . "'";
+	         $result1 = $db->query($query1);
+	         if (DB::isError($db)) {die($db->getMessage());}
+				}
+			}
+	// Closing comment and navbutton
+	echo "<h3>Settings updated!</h3>\n";
+	navbutton("intro.php","OK");    	
+	}
+else
+	{
+	// Start the form that holds the data.
+	echo "<form action='settings.php' method='post'>\n";
+	// Start the table that holds the data table for formatting purposes.
+	echo "<table cellspacing='1' cellpadding='0' align='center' width='50%'>\n
+			<tr class='greybg'><td>\n";
+	// Start the table that holds the data.
+	echo "<table cellspacing='1' cellpadding='3' align='center' width='100%'>\n";
+	// Table title bar
+	echo "<tr class='tablerow'>\n";
+	echo "<td colspan='2' bgcolor='#FFFF99'>\n";
+	echo "<b>System settings for the ChkNet module</b>\n";
+	echo "</td>\n";
+	echo "</tr>\n";
+
+	// Fetch the information from the table
+	$result = $db->query($query);
+	if (DB::isError($db)) {die($db->getMessage());}
+	while ( $row = $result->fetchRow() )
+	      {
+	      extract ($row);
+	      echo "<tr class='tablerow'>\n";
+	      echo "<td bgcolor='#FFFF99'>\n";
+	      echo "<b>";
+	      // Small if loop that presents a nice version of the variable name
+	      if ( $function == "pingpath" )
+	      	{
+	      	echo "Full path to ping executable";
+	      	}
+	      elseif ( $function == "pingoptions" )
+	      	{
+	      	echo "Options to be passed to ping before list of hostname";
+	      	}
+	      elseif ( $function == "refresh" )
+	      	{
+	      	echo "Automatic refresh period for ChkNet status page (in seconds)<br>Default: 60";
+	      	}
+	      elseif ( $function == "okcolour" )
+	      	{
+	      	echo "Colour for alive devices (in HTML hex colour format)<br>Default: #33FF33";
+	      	}
+	      elseif ( $function == "failcolour" )
+	      	{
+	      	echo "Colour for failed devices (in HTML hex colour format)<br>Default: #FF0000";
+	      	}	      		      	
+	      else
+	          {
+	          echo $function;
+	          }
+	      echo "</b>\n";
+	      echo "</td>\n";
+	      echo "<td bgcolor='#FFFF99'>\n";
+	      echo "<input type='text' name='" . $function . "' size='20' maxlength='30' value='" . $value . "'>\n";
+	      echo "</td>\n";
+	      echo "</tr>\n";
+	      }
+	
+	// Close the table
+	echo "</tr>\n";
+	echo "</table>\n";
+
+	// Close the table used for formatting purposes.
+	echo "</td>\n";
+	echo "</tr>\n";
+	echo "</table>\n";
+
+	// Submittal button
+	echo "<br>\n";
+	echo "<input type='hidden' name='not_new' value='yes'>\n";
+	echo "<center><input type='submit' value='Submit Changes'></center>\n";
+	echo "</form>\n";
+	}
+
+?>
hunk ./includes/STORM/chknet/html/admin_nav.inc 54
+	echo "<a href='settings.php' class='ictnavigation'>\n";
+	echo "Edit ChkNet Settings\n";
+	echo "</a>\n";
+	echo "</td>\n";
+
+// Start and end the spacer cell between navigation elements.
+	echo "<td width='5%'></td>\n";
+
+// Start the cell for the navigation element.
+	echo "<td align='center' bgcolor='#33FF33'>\n";
hunk ./includes/STORM/chknet/misc/functions.inc 196
-			$query = "SELECT value FROM settings WHERE function='chknetrefresh'";
+			$query = "SELECT value FROM chknet_settings WHERE function='refresh'";
}