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

fix for IPv6 link local address subroutine

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6254 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
ligc 2010-05-27 07:40:10 +00:00
parent 2bcc16b884
commit 1c68c2a98c
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
perl-xCAT/xCAT/NetworkUtils.pm
View File

@ -261,12 +261,15 @@ sub linklocaladdr {
}
my ($m4, $m5) = ("ff","fe");
my $bit = (int $m1) & 2;
if ($bit) {
$m1 = $m1 - 2;
} else {
$m1 = $m1 + 2;
}
#my $bit = (int $m1) & 2;
#if ($bit) {
# $m1 = $m1 - 2;
#} else {
# $m1 = $m1 + 2;
#}
$m1 = hex($m1);
$m1 = $m1 ^ 2;
$m1 = sprintf("%x", $m1);
$m1 = $m1 . $m2;
$m3 = $m3 . $m4;