From 1c0ff107897e242ff754e8a2a2994741dd5f38b6 Mon Sep 17 00:00:00 2001
From: huweihua <huweihua@cn.ibm.com>
Date: Wed, 19 Nov 2014 03:23:19 -0500
Subject: [PATCH] fix defect4397: sysclone analysize genesis fs name failed in
 rh7.0

---
 xCAT-server/lib/xcat/plugins/anaconda.pm | 17 +++++++++++++++--
 1 file changed, 15 insertions(+), 2 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/anaconda.pm b/xCAT-server/lib/xcat/plugins/anaconda.pm
index 316bee41d..ce84709ee 100644
--- a/xCAT-server/lib/xcat/plugins/anaconda.pm
+++ b/xCAT-server/lib/xcat/plugins/anaconda.pm
@@ -1879,6 +1879,7 @@ sub mksysclone
         }
       
         # copy kernel and initrd from image dir to /tftpboot
+=pod
         my $kernpath;
         my $initrdpath;
         my $ramdisk_size = 200000;
@@ -1889,6 +1890,14 @@ sub mksysclone
             and -r "$tftpdir/xcat/genesis.fs.$arch.lzma"
             and $initrdpath = "$tftpdir/xcat/genesis.fs.$arch.lzma"
         )
+=cut
+        my $ramdisk_size = 200000;
+        my $kernpath=`ls -l $tftpdir/xcat/|grep "genesis.kernel.$arch"|awk '{print \$9}'`;
+        chomp($kernpath);
+        my $initrdpath=`ls -l $tftpdir/xcat/|grep "genesis.fs.$arch"| awk '{print \$9}'`;
+        chomp($initrdpath);
+
+        if($kernpath ne '' and $initrdpath ne '')
         {
             #We have a shot...
             my $ent    = $rents{$node}->[0];
@@ -1985,10 +1994,14 @@ sub mksysclone
             #        $kcmdline .= " ";
             #        $kcmdline .= $addkcmd->{'addkcmdline'};
             #}
+
             my $k;
             my $i;
-            $k = "xcat/genesis.kernel.$arch";
-            $i = "xcat/genesis.fs.$arch.lzma";
+            #$k = "xcat/genesis.kernel.$arch";
+            #$i = "xcat/genesis.fs.$arch.lzma";
+
+             $k = "xcat/$kernpath";
+             $i = "xcat/$initrdpath";
 
             $bptab->setNodeAttribs(
                 $node,