From 529c8178923278eb34cb1f07eb6f695f0624f177 Mon Sep 17 00:00:00 2001
From: wanghuaz <wanghuaz@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 20 Apr 2009 05:03:07 +0000
Subject: [PATCH] Fixed defect 2771631: getmacs writes lpar name instead of
 node name to mac table

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3221 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/PPCboot.pm | 18 +++++++++---------
 perl-xCAT/xCAT/PPCmac.pm  | 18 +++++++++---------
 2 files changed, 18 insertions(+), 18 deletions(-)

diff --git a/perl-xCAT/xCAT/PPCboot.pm b/perl-xCAT/xCAT/PPCboot.pm
index 2bc1036a8..0177c028e 100644
--- a/perl-xCAT/xCAT/PPCboot.pm
+++ b/perl-xCAT/xCAT/PPCboot.pm
@@ -61,9 +61,9 @@ sub parse_args {
 
 
 ##########################################################################
-# IVM rnetboot 
+# Netboot the lpar 
 ##########################################################################
-sub ivm_rnetboot {
+sub do_rnetboot {
 
     my $request = shift;
     my $d       = shift;
@@ -243,14 +243,14 @@ sub rnetboot {
     #########################################
     # Manually perform boot. 
     #########################################
-    $result = ivm_rnetboot( $request, $d, $exp, $name, $node, \%opt );
+    $result = do_rnetboot( $request, $d, $exp, $name, $node, \%opt );
     $Rc = shift(@$result);
 
     ##################################
     # Form string from array results
     ##################################
     if ( exists($request->{verbose}) ) {
-        return( [[$name,join( '', @$result ),$Rc]] );
+        return( [[$node,join( '', @$result ),$Rc]] );
     }
     ##################################
     # Return error
@@ -268,9 +268,9 @@ sub rnetboot {
     ##################################
     if ( $Rc != SUCCESS ) {
         if ( @$result[0] =~ /lpar_netboot: (.*)/ ) {
-            return( [[$name,$1,$Rc]] );
+            return( [[$node,$1,$Rc]] );
         }
-        return( [[$name,join( '', @$result ),$Rc]] );
+        return( [[$node,join( '', @$result ),$Rc]] );
     }
     ##################################
     # Split array into string
@@ -293,7 +293,7 @@ sub rnetboot {
     #
     #####################################
     if ( $data =~ /Finished/) {
-        return( [[$name,"Success",$Rc]] );
+        return( [[$node,"Success",$Rc]] );
     }
     #####################################
     # Can still be error w/ Rc=0:
@@ -308,9 +308,9 @@ sub rnetboot {
     #
     #####################################
     if ( $data =~ /lpar_netboot: (.*)/ ) {
-        return( [[$name,$1,RC_ERROR]] );
+        return( [[$node,$1,RC_ERROR]] );
     }
-    return( [[$name,$data,RC_ERROR]] );
+    return( [[$node,$data,RC_ERROR]] );
 }
  
 
diff --git a/perl-xCAT/xCAT/PPCmac.pm b/perl-xCAT/xCAT/PPCmac.pm
index b36da8db1..c28af7b76 100644
--- a/perl-xCAT/xCAT/PPCmac.pm
+++ b/perl-xCAT/xCAT/PPCmac.pm
@@ -210,9 +210,9 @@ sub validate_ip {
 
 
 ##########################################################################
-# IVM get LPAR MAC addresses
+# Get LPAR MAC addresses
 ##########################################################################
-sub ivm_getmacs {
+sub do_getmacs {
 
     my $request  = shift;
     my $d        = shift;
@@ -372,7 +372,7 @@ sub getmacs {
     #########################################
     # Manually collect MAC addresses.
     #########################################
-    $result = ivm_getmacs( $request, $d, $exp, $name, $node );
+    $result = do_getmacs( $request, $d, $exp, $name, $node );
     $Rc = shift(@$result);
    
     ##################################
@@ -381,19 +381,19 @@ sub getmacs {
     if ( exists($request->{verbose}) ) {
         if ( $Rc == SUCCESS ) {
             if ( !exists( $opt->{d} )) { 
-                writemac( $name, $result );
+                writemac( $node, $result );
             }
         }
-        return( [[$name,join( '', @$result ),$Rc]] );
+        return( [[$node,join( '', @$result ),$Rc]] );
     }
     ##################################
     # Return error
     ##################################
     if ( $Rc != SUCCESS ) {
         if ( @$result[0] =~ /lpar_netboot: (.*)/ ) {
-            return( [[$name,$1,$Rc]] );
+            return( [[$node,$1,$Rc]] );
         }
-        return( [[$name,join( '', @$result ),$Rc]] );
+        return( [[$node,join( '', @$result ),$Rc]] );
     }
     #####################################
     # lpar_netboot returns:
@@ -422,9 +422,9 @@ sub getmacs {
     # Write first valid adapter MAC to database
     #####################################
     if ( !exists( $opt->{d} )) {
-        writemac( $name, $result );
+        writemac( $node, $result );
     }
-    return( [[$name,$data,$Rc]] );
+    return( [[$node,$data,$Rc]] );
 }