diff options
Diffstat (limited to 'plugins-scripts')
-rwxr-xr-x | plugins-scripts/check_rpc.pl | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/plugins-scripts/check_rpc.pl b/plugins-scripts/check_rpc.pl index b9ca279..783fa47 100755 --- a/plugins-scripts/check_rpc.pl +++ b/plugins-scripts/check_rpc.pl | |||
@@ -51,16 +51,16 @@ $proto[10007]='u'; | |||
51 | use Getopt::Long; | 51 | use Getopt::Long; |
52 | Getopt::Long::Configure('bundling'); | 52 | Getopt::Long::Configure('bundling'); |
53 | GetOptions( | 53 | GetOptions( |
54 | "V" => \$opt_V, "version" => \$opt_V, | 54 | "V" => \$opt_V, "version" => \$opt_V, |
55 | "h" => \$opt_h, "help" => \$opt_h, | 55 | "h" => \$opt_h, "help" => \$opt_h, |
56 | "C=s" => \$opt_C, "command=s" => \$opt_C, | 56 | "C=s" => \$opt_C, "command=s" => \$opt_C, |
57 | "p=i" => \$opt_p, "port=i" => \$opt_p, | 57 | "p=i" => \$opt_p, "port=i" => \$opt_p, |
58 | "H=s" => \$opt_H, "hostname=s" => \$opt_H, | 58 | "H=s" => \$opt_H, "hostname=s" => \$opt_H, |
59 | "c=s" => \$opt_c, "progver=s" => \$opt_c, | 59 | "c=s" => \$opt_c, "progver=s" => \$opt_c, |
60 | "v+" => \$verbose, "verbose+" => \$verbose, | 60 | "v+" => \$verbose, "verbose+" => \$verbose, |
61 | "u" => \$opt_u, "udp" => \$opt_u, | 61 | "u" => \$opt_u, "udp" => \$opt_u, |
62 | "t" => \$opt_t, "tcp" => \$opt_t | 62 | "t" => \$opt_t, "tcp" => \$opt_t |
63 | ); | 63 | ); |
64 | 64 | ||
65 | # -h means display verbose help screen | 65 | # -h means display verbose help screen |
66 | if ($opt_h) { print_help(); exit $ERRORS{'OK'}; } | 66 | if ($opt_h) { print_help(); exit $ERRORS{'OK'}; } |
@@ -313,7 +313,7 @@ sub get_rpcinfo { | |||
313 | 313 | ||
314 | if ( $line =~ /program $prognum version ([0-9]*) ready and waiting/ ) { | 314 | if ( $line =~ /program $prognum version ([0-9]*) ready and waiting/ ) { |
315 | $response .= " version $1"; | 315 | $response .= " version $1"; |
316 | $state = 'OK' unless $state ne 'OK'; | 316 | $state = 'OK' unless $state ne 'UNKNOWN'; |
317 | print "1:$response \n" if $verbose; | 317 | print "1:$response \n" if $verbose; |
318 | } | 318 | } |
319 | 319 | ||