summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 7a930f7)
raw | patch | inline | side by side (parent: 7a930f7)
author | M. Sean Finney <seanius@users.sourceforge.net> | |
Sat, 16 Apr 2005 06:09:47 +0000 (06:09 +0000) | ||
committer | M. Sean Finney <seanius@users.sourceforge.net> | |
Sat, 16 Apr 2005 06:09:47 +0000 (06:09 +0000) |
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@1163 f882894a-f735-0410-b71e-b25c423dba1c
plugins-scripts/check_disk_smb.pl | patch | blob | history |
index 3358f6a139d19c657b39a852cf9d5c58c7c2625e..02b7150028c2ad44ce612b38d6e4ffbf19139d05 100755 (executable)
my $user = $1 if ($opt_u =~ /^([-_.A-Za-z0-9\\]+)$/);
($user) || usage("Invalid user: $opt_u\n");
-($opt_p) || ($opt_p = shift) || ($opt_p = "guest");
+($opt_p) || ($opt_p = shift) || ($opt_p = "");
my $pass = $1 if ($opt_p =~ /(.*)/);
($opt_w) || ($opt_w = shift) || ($opt_w = 85);
# Execute an "ls" on the share using smbclient program
# get the results into $res
if (defined($workgroup)) {
- $res = qx/$smbclient \/\/$host\/$share $pass -W $workgroup -U $user $smbclientoptions -c ls/;
+ $res = qx/$smbclient \/\/$host\/$share -W $workgroup -U $user%$pass $smbclientoptions -c ls/;
} else {
print "$smbclient " . "\/\/$host\/$share" ." $pass -U $user $smbclientoptions -c ls\n" if ($verbose);
- $res = qx/$smbclient \/\/$host\/$share $pass -U $user $smbclientoptions -c ls/;
+ $res = qx/$smbclient \/\/$host\/$share -U $user%$pass $smbclientoptions -c ls/;
}
#Turn off alarm
alarm(0);