<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns="http://www.w3.org/TR/REC-html40"> <head> <meta http-equiv=Content-Type content="text/html; charset=us-ascii"> <meta name=Generator content="Microsoft Word 11 (filtered medium)"> <style>  </style> </head> <body lang=EN-US link=blue vlink=purple> <div class=Section1> Hello:<o:p></o:p> Not sure if these are the correct forums through which to ask questions, but I couldn’t find where else to post to.<o:p></o:p> <o:p> </o:p> Nagios 1.2 on Fedora 3<o:p></o:p> <o:p> </o:p> I’m in the throes of trying to create an in-house script that parses a file for a given number. It then uses this number to determine if the return should be OK, WARNING or CRITICAL. When command line run, the issued PRINT line displays the correct result given the parameters given. When brought into Nagios, the “Status Information” portion of the service item is correct, but the actual “Status” entry never changes from OK, despite the plugin reporting “Critical”.<o:p></o:p> <o:p> </o:p> The perl script is:<o:p></o:p> <o:p> </o:p> #!/usr/bin/perl -w<o:p></o:p> <o:p> </o:p> use strict;<o:p></o:p> use warnings;<o:p></o:p> use Getopt::Long;<o:p></o:p> <o:p> </o:p> use constant STATS_FILE_PATH => '/home/kapow/crawler/etc/crawl-server.stat';<o:p></o:p> <o:p> </o:p> my @return_codes = qw( OK WARNING CRITICAL UNKNOWN );<o:p></o:p> <o:p> </o:p> <o:p> </o:p> my ($warning, $critical) = get_cmd_params();<o:p></o:p> my $threads = 0;<o:p></o:p> my $status = 0;<o:p></o:p> my $msg = '';<o:p></o:p> <o:p> </o:p> if( open( STAT, STATS_FILE_PATH ) ) {<o:p></o:p> <o:p> </o:p> foreach ( <STAT> ) {<o:p></o:p> next unless /^threads=(\d+)/;<o:p></o:p> $threads = $1;<o:p></o:p> }<o:p></o:p> close( STAT );<o:p></o:p> $status = ( $threads > $warning ) ? 0 :<o:p></o:p> ( $threads > $critical ) ? 1 : 2;<o:p></o:p> $msg = "crawl-server currently has $threads threads";<o:p></o:p> } else {<o:p></o:p> $status = 3;<o:p></o:p> $msg = 'unable to open crawl-server stats file';<o:p></o:p> }<o:p></o:p> <o:p> </o:p> <o:p> </o:p> print( "threads $return_codes[$status] - $msg ",<o:p></o:p> "|threads=$threads;$warning;$critical;$status\n" );<o:p></o:p> <o:p> </o:p> <o:p> </o:p> <o:p> </o:p> ######################################################################<o:p></o:p> sub get_cmd_params {<o:p></o:p> <o:p> </o:p> my ($warning, $critical) = (0,0);<o:p></o:p> <o:p> </o:p> my $result = GetOptions( 'w=i' => \$warning,<o:p></o:p> 'c=i' => \$critical );<o:p></o:p> <o:p> </o:p> die "Usage: get_crawler_stats -w <threads> -c <threads>\n"<o:p></o:p> if($warning <= 0 || $critical <= 0);<o:p></o:p> <o:p> </o:p> return ($warning, $critical);<o:p></o:p> }<o:p></o:p> <o:p> </o:p> <o:p> </o:p> <o:p> </o:p> When run on command line, the result is:<o:p></o:p> [root@warlords etc]# /usr/local/nagios/libexec/check_nrpe -H crawl1 -c check_threads -a 70 60<o:p></o:p> threads WARNING - crawl-server currently has 64 threads |threads=64;70;60;0<o:p></o:p> <o:p> </o:p> (to compare, the check_users, which does work correctly all the way through is:) <o:p></o:p> [root@warlords libexec]# ./check_users -w 1 -c 6<o:p></o:p> USERS WARNING - 5 users currently logged in |users=5;1;6;0<o:p></o:p> <o:p> </o:p> <o:p> </o:p> Any help on this would be immensely appreciated. If this is not the correct forum to direct my questions to, could you please point me in the right direction?<o:p></o:p> <o:p> </o:p> Thanks much!<o:p></o:p> <o:p> </o:p> Frank Reta<o:p></o:p> Information Technology Janitor - <a href="http://www.simplyhired.com/">Simply Hired</a>, Inc.<o:p></o:p> <a href="http://www.SimplyHired.com">http://www.SimplyHired.com</a><o:p></o:p> (650) 254-9000x130<o:p></o:p> <a href="frank@simplyhired.com">frank@simplyhired.com</a><o:p></o:p> <o:p> </o:p> </div> </body> </html>