arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fixed device address to be lower case because autoyast is case-sensitive.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@15175 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
phamt 2013-02-14 15:17:15 +00:00
parent a4000ce977
commit 6c8f3298fa
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
xCAT-server/lib/xcat/plugins/zvm.pm
View File

@ -685,9 +685,9 @@ sub removeVM {
@luns = split("\n", `ssh $::SUDOER\@$hcp "$::SUDO cat $::ZFCPPOOL/$_" | egrep -i $node`);
foreach (@luns) {
# Update entry: status,wwpn,lun,size,owner,channel,tag
# Update entry: status,wwpn,lun,size,range,owner,channel,tag
my @info = split(',', $_);
$update = "free,$info[1],$info[2],$info[3],,,";
$update = "free,$info[1],$info[2],$info[3],$info[4],,";
$expression = "'s#" . $_ . "#" .$update . "#i'";
$out = `ssh $::SUDOER\@$hcp "$::SUDO sed --in-place -e $expression $::ZFCPPOOL/$pool.conf"`;
}
@ -4869,7 +4869,7 @@ sub nodeSet {
@tmp = split(',', $_);
my $wwpn = $tmp[1];
my $lun = $tmp[2];
my $device = $tmp[6];
my $device = lc($tmp[6]);
my $tag = $tmp[7];
# If multiple WWPNs or device channels are specified (multipathing), just take the 1st one
@ -5086,7 +5086,7 @@ END
@tmp = split(',', $_);
my $wwpn = $tmp[1];
my $lun = $tmp[2];
my $device = $tmp[6];
my $device = lc($tmp[6]);
my $tag = $tmp[7];
# If multiple WWPNs or device channels are specified (multipathing), just take the 1st one