From d324bea42aad325eef2824be5654682e69b5822e Mon Sep 17 00:00:00 2001
From: phamt <phamt@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 24 May 2011 14:48:59 +0000
Subject: [PATCH] Exit rscan() if given node is not a HCP.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9670 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/zvm.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/xCAT-server/lib/xcat/plugins/zvm.pm b/xCAT-server/lib/xcat/plugins/zvm.pm
index 3701b8ec6..e885bbf74 100644
--- a/xCAT-server/lib/xcat/plugins/zvm.pm
+++ b/xCAT-server/lib/xcat/plugins/zvm.pm
@@ -1330,6 +1330,12 @@ sub scanVM {
 		xCAT::zvmUtils->printLn( $callback, "$node: (Error) Missing node ID" );
 		return;
 	}
+	
+	# Exit if node is not a HCP
+	if ( !( $hcp =~ m/$node./i ) ) {
+		xCAT::zvmUtils->printLn( $callback, "$node: (Error) $node is not a hardware control point" );
+		return;
+	}
 
 	# Print output string
 	# [Node name]: