diff options
Diffstat (limited to 'plugins-scripts/check_disk_smb.pl')
-rwxr-xr-x | plugins-scripts/check_disk_smb.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/plugins-scripts/check_disk_smb.pl b/plugins-scripts/check_disk_smb.pl index 022fa505..ca593d46 100755 --- a/plugins-scripts/check_disk_smb.pl +++ b/plugins-scripts/check_disk_smb.pl | |||
@@ -64,27 +64,27 @@ my $smbclientoptions= $opt_P ? "-p $opt_P " : ""; | |||
64 | 64 | ||
65 | # Options checking | 65 | # Options checking |
66 | 66 | ||
67 | ($opt_H) || ($opt_H = shift) || usage("Host name not specified\n"); | 67 | ($opt_H) || ($opt_H = shift @ARGV) || usage("Host name not specified\n"); |
68 | my $host = $1 if ($opt_H =~ /^([-_.A-Za-z0-9 ]+\$?)$/); | 68 | my $host = $1 if ($opt_H =~ /^([-_.A-Za-z0-9 ]+\$?)$/); |
69 | ($host) || usage("Invalid host: $opt_H\n"); | 69 | ($host) || usage("Invalid host: $opt_H\n"); |
70 | 70 | ||
71 | ($opt_s) || ($opt_s = shift) || usage("Share volume not specified\n"); | 71 | ($opt_s) || ($opt_s = shift @ARGV) || usage("Share volume not specified\n"); |
72 | my $share = $1 if ($opt_s =~ /^([-_.A-Za-z0-9]+\$?)$/); | 72 | my $share = $1 if ($opt_s =~ /^([-_.A-Za-z0-9]+\$?)$/); |
73 | ($share) || usage("Invalid share: $opt_s\n"); | 73 | ($share) || usage("Invalid share: $opt_s\n"); |
74 | 74 | ||
75 | ($opt_u) || ($opt_u = shift) || ($opt_u = "guest"); | 75 | ($opt_u) || ($opt_u = shift @ARGV) || ($opt_u = "guest"); |
76 | my $user = $1 if ($opt_u =~ /^([-_.A-Za-z0-9\\]+)$/); | 76 | my $user = $1 if ($opt_u =~ /^([-_.A-Za-z0-9\\]+)$/); |
77 | ($user) || usage("Invalid user: $opt_u\n"); | 77 | ($user) || usage("Invalid user: $opt_u\n"); |
78 | 78 | ||
79 | ($opt_p) || ($opt_p = shift) || ($opt_p = ""); | 79 | ($opt_p) || ($opt_p = shift @ARGV) || ($opt_p = ""); |
80 | my $pass = $1 if ($opt_p =~ /(.*)/); | 80 | my $pass = $1 if ($opt_p =~ /(.*)/); |
81 | $pass = "-N" if ($opt_p eq ""); | 81 | $pass = "-N" if ($opt_p eq ""); |
82 | 82 | ||
83 | ($opt_w) || ($opt_w = shift) || ($opt_w = 85); | 83 | ($opt_w) || ($opt_w = shift @ARGV) || ($opt_w = 85); |
84 | my $warn = $1 if ($opt_w =~ /^([0-9]{1,2}\%?|100\%?|[0-9]+[kMG])$/); | 84 | my $warn = $1 if ($opt_w =~ /^([0-9]{1,2}\%?|100\%?|[0-9]+[kMG])$/); |
85 | ($warn) || usage("Invalid warning threshold: $opt_w\n"); | 85 | ($warn) || usage("Invalid warning threshold: $opt_w\n"); |
86 | 86 | ||
87 | ($opt_c) || ($opt_c = shift) || ($opt_c = 95); | 87 | ($opt_c) || ($opt_c = shift @ARGV) || ($opt_c = 95); |
88 | my $crit = $1 if ($opt_c =~ /^([0-9]{1,2}\%?|100\%?|[0-9]+[kMG])$/); | 88 | my $crit = $1 if ($opt_c =~ /^([0-9]{1,2}\%?|100\%?|[0-9]+[kMG])$/); |
89 | ($crit) || usage("Invalid critical threshold: $opt_c\n"); | 89 | ($crit) || usage("Invalid critical threshold: $opt_c\n"); |
90 | 90 | ||