[Nagiosplug-checkins] CVS: nagiosplug/plugins-scripts check_rpc.pl,1.6,1.7

[Karl DeBisschop]

Update of /cvsroot/nagiosplug/nagiosplug/plugins-scripts
In directory sc8-pr-cvs1:/tmp/cvs-serv13347/plugins-scripts

Modified Files:
	check_rpc.pl 
Log Message:
indicate new default state in get_rpcinfo, also fix a bunch of indents for consistent format

Index: check_rpc.pl
===================================================================
RCS file: /cvsroot/nagiosplug/nagiosplug/plugins-scripts/check_rpc.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -r1.6 -r1.7
*** check_rpc.pl	17 Jan 2003 05:56:01 -0000	1.6
--- check_rpc.pl	19 Jan 2003 06:34:59 -0000	1.7
***************
*** 52,65 ****
  Getopt::Long::Configure('bundling');
  GetOptions(
!        "V"   => \$opt_V, "version"    => \$opt_V,
! 	   "h"   => \$opt_h, "help"       => \$opt_h,
! 	   "C=s" => \$opt_C, "command=s"  => \$opt_C,
! 	   "p=i" => \$opt_p, "port=i"     => \$opt_p,
! 	   "H=s" => \$opt_H, "hostname=s" => \$opt_H,
! 	   "c=s" => \$opt_c, "progver=s"  => \$opt_c,
! 	   "v+"   => \$verbose, "verbose+"  => \$verbose,
! 	   "u"   => \$opt_u,  "udp"       => \$opt_u,
! 	   "t"   => \$opt_t,  "tcp"       => \$opt_t
! 	   );
  
  # -h means display verbose help screen
--- 52,65 ----
  Getopt::Long::Configure('bundling');
  GetOptions(
! 	"V"   => \$opt_V,   "version"    => \$opt_V,
! 	"h"   => \$opt_h,   "help"       => \$opt_h,
! 	"C=s" => \$opt_C,   "command=s"  => \$opt_C,
! 	"p=i" => \$opt_p,   "port=i"     => \$opt_p,
!  	"H=s" => \$opt_H,   "hostname=s" => \$opt_H,
!  	"c=s" => \$opt_c,   "progver=s"  => \$opt_c,
!  	"v+"  => \$verbose, "verbose+"   => \$verbose,
!  	"u"   => \$opt_u,   "udp"        => \$opt_u,
!  	"t"   => \$opt_t,   "tcp"        => \$opt_t
! );
  
  # -h means display verbose help screen
***************
*** 314,318 ****
      	if ( $line =~ /program $prognum version ([0-9]*) ready and waiting/ ) {
  			$response .= " version $1";
! 			$state = 'OK' unless $state ne 'OK';
  			print "1:$response \n" if $verbose;
      	}
--- 314,318 ----
      	if ( $line =~ /program $prognum version ([0-9]*) ready and waiting/ ) {
  			$response .= " version $1";
! 			$state = 'OK' unless $state ne 'UNKNOWN';
  			print "1:$response \n" if $verbose;
      	}