Don't support Power4 HMCs (Regatta and under) - Line #682

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@513 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

perl-xCAT-2.0/xCAT/PPCcli.pm

@@ -676,6 +676,14 @@ sub lshmc {
     my @values;
     my $vpd = join( ",", @$result );
 
+    #####################################
+    # Power4 (and below) HMCs unsupported
+    #####################################
+    if ( $vpd =~ /\*RM V(\d+)/ ) {
+        if ( $1 <= 5 ) {
+            return( [RC_ERROR,"Command not supported on V$1 HMC"] );
+        }
+    }
     #####################################
     # Type-Model may be in the formats:
     #  "eserver xSeries 336 -[7310CR3]-"