System information

Keith - I am thinking that in sub thresholdResponse, NMIS should keep
the level at 'normal' or 'level=1' for response times, rather than
increment for the core and distribution node types ??
Code is..
if ( $role eq "core" ) { $level + 2; }
elsif ( $role eq "distribution" ) { $level + 1; }
I suggest maybe it should be this, same as all the other thresholds.
if ( $level == 1 ) { $level = 1; }
elsif ( $role eq "core" ) { $level = $level + 2; }
elsif ( $role eq "distribution" ) { $level = $level + 1; }
Eric
DONE
Keith, IMHO a minor improvement would be to strip newlines from the
logmessage subroutine so that any (SNMP) error messages are formatted
appropriately in the log...
NMIS.pm
sub logMessage {
my $string = shift;
open(DATA, ">>$NMIS::config{nmis_log}") or warn returnTime."
logMessage, Couldn't not open log file $NMIS::config{nmis_log}. $!\n";
for ($string) { s/\n+//g; } #remove all embedded newlines
print DATA &returnDateStamp.",$string\n";
close(DATA);
} # end logMessage
DONE
NMIS - Network Management Information System http://www.sins.com.au/nmis/
36 of 43 15/04/2002 3:59 PM