From 1549dc1506b7e1dadf8700400479544ef9a09944 Mon Sep 17 00:00:00 2001
From: jjhua <jjhua@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 11 May 2011 10:18:43 +0000
Subject: [PATCH] rflash supports for CEC and frame

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

diff --git a/perl-xCAT/xCAT/PPCrflash.pm b/perl-xCAT/xCAT/PPCrflash.pm
index 414572929..3628f8c93 100644
--- a/perl-xCAT/xCAT/PPCrflash.pm
+++ b/perl-xCAT/xCAT/PPCrflash.pm
@@ -633,18 +633,18 @@ sub rflash {
             print TMP "$stanza\n";
         } else {
             while(my ($name, $d) = each(%$h)) {
-                if ( @$d[4] !~ /^(fsp|bpa|lpar)$/ ) {
-                       push @value, [$name,"Information only available for LPAR/CEC/BPA",RC_ERROR];
+                if ( @$d[4] !~ /^(fsp|bpa|lpar|cec|frame)$/ ) {
+                       push @value, [$name,"Information only available for LPAR/CEC/BPA/Frame",RC_ERROR];
                        next;
                 }
             
                 ###############
                 #If $name is a Lpar, the flag will be changed from "lpar" to "fsp"
                 #######################
-                if ( @$d[4] =~ /^lpar$/ ) {
+                if ( @$d[4] =~ /^lpar$/ || @$d[4] =~ /^cec$/ ) {
                                 @$d[4] = "fsp";
                                 $lflag = 1;
-                    push (@value, [$hmc,"$name is a Lpar on MTMS $mtms", 1]);
+                    #push (@value, [$hmc,"$name is a Lpar on MTMS $mtms", 1]);
                 }
                 if( @$d[4] eq "fsp" ) {
                     $component = "system";
@@ -807,8 +807,8 @@ sub rflash {
     #  The above code isn't supported.
     
     my $cmd_hmc = "csmlicutil $tmp_file";
-    #my $cmd_hmc = "ls";
-    print "before runxcmd, current_userid = $current_userid\n";
+    #my $cmd_hmc = "ls -al";
+    print "before runxcmd, current_userid = $current_userid; DSH_TO_USERID=$user \n";
     my $res = xCAT::Utils->runxcmd(  {
                                      command => ['xdsh'],
                                      node    => [$hmc],