From 8f2acc5719d498c75db0aaf730006fc24a94fbdb Mon Sep 17 00:00:00 2001
From: phamt <phamt@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 9 Jul 2012 13:46:18 +0000
Subject: [PATCH] git-svn-id:
 https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13256
 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

---
 xCAT-server/lib/xcat/plugins/zvm.pm | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/zvm.pm b/xCAT-server/lib/xcat/plugins/zvm.pm
index 3cc3147db..6b64afaeb 100644
--- a/xCAT-server/lib/xcat/plugins/zvm.pm
+++ b/xCAT-server/lib/xcat/plugins/zvm.pm
@@ -1579,6 +1579,16 @@ sub inventoryVM {
 
     # Get inputs
     my ( $callback, $node, $args ) = @_;
+    
+    # Output string
+    my $str = "";
+    
+    # Check if node is pingable
+    if (`nodestat $node | egrep -i "noping"`) {
+    	$str = "$node: (Error) Host is unreachable";
+        xCAT::zvmUtils->printLn( $callback, "$str" );
+        return;
+    }
 
     # Get node properties from 'zvm' table
     my @propNames = ( 'hcp', 'userid' );
@@ -1598,10 +1608,7 @@ sub inventoryVM {
         return;
     }
     # Capitalize user ID
-    $userId =~ tr/a-z/A-Z/;
-
-    # Output string
-    my $str = "";
+    $userId =~ tr/a-z/A-Z/;   
 
     # Load VMCP module
     xCAT::zvmCPUtils->loadVmcp($node);