From 52e47c0fdc14b558db3bd9935b5f618ea8d04e1a Mon Sep 17 00:00:00 2001
From: wanghuaz <wanghuaz@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 23 Mar 2010 04:42:47 +0000
Subject: [PATCH] Remove all the old entries for rscan -u option

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5554 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/PPCdb.pm | 48 ++++++++++++++++++-----------------------
 1 file changed, 21 insertions(+), 27 deletions(-)

diff --git a/perl-xCAT/xCAT/PPCdb.pm b/perl-xCAT/xCAT/PPCdb.pm
index d67265a0a..23153832d 100644
--- a/perl-xCAT/xCAT/PPCdb.pm
+++ b/perl-xCAT/xCAT/PPCdb.pm
@@ -247,22 +247,19 @@ sub update_ppc {
             if ( $vpdent->{mtm} eq $model && $vpdent->{serial} eq $serial && $vpdent->{side} eq $side )
             {
                 $predefined_node = $vpdent->{node};
-                last;
+                if ( $predefined_node =~ /-B$/ ) {
+                    $name = $name . "-B";
+                }
+
+                if ( update_node_attribs($hwtype, $type, $name, $id, $model, $serial, $side,
+                                    $server, $pprofile, $parent, $ips,
+                                    \%db, $predefined_node, \@ppclist))
+                {
+                    push @update_list, $value;
+                }
             }
         }
 
-        next if ( !$predefined_node);
-        
-        if ( $predefined_node =~ /-B$/ ) {
-            $name = $name . "-B";
-        }
-
-        if ( update_node_attribs($hwtype, $type, $name, $id, $model, $serial, $side, 
-                            $server, $pprofile, $parent, $ips, 
-                            \%db, $predefined_node, \@ppclist))
-        {
-            push @update_list, $value;
-        }
     }
 
     my @newppclist = $db{ppc}->getAllNodeAttribs(['node','hcp','id',
@@ -291,23 +288,20 @@ sub update_ppc {
             if ( $vpdent->{mtm} eq $model && $vpdent->{serial} eq $serial && $vpdent->{side} eq $side )
             {
                 $predefined_node = $vpdent->{node};
-                last;
+                if ( $predefined_node =~ /-A$/ ) {
+                    $name = $name . "-A";
+                } elsif ( $predefined_node =~ /-B$/ ) {
+                    $name = $name . "-B";
+                }   
+                if (update_node_attribs($hwtype, $type, $name, $id, $model, $serial, $side,
+                                    $server, $pprofile, $parent, $ips, 
+                                    \%db, $predefined_node, \@newppclist))
+                {
+                    push @update_list, $value;
+                }
             }
         }
 
-        next if ( !$predefined_node);
-        
-        if ( $predefined_node =~ /-A$/ ) {
-            $name = $name . "-A";
-        } elsif ( $predefined_node =~ /-B$/ ) {
-            $name = $name . "-B";
-        }
-        if (update_node_attribs($hwtype, $type, $name, $id, $model, $serial, $side,
-                            $server, $pprofile, $parent, $ips, 
-                            \%db, $predefined_node, \@newppclist))
-        {
-            push @update_list, $value;
-        }
     }
 
     ###################################