From cd4d392d8fb709c41f7fae567643e996ace08ca5 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 18 Apr 2008 16:39:59 +0000
Subject: [PATCH] Added "-f" flag to rnetboot (lpar_netboot)

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

diff --git a/perl-xCAT-2.0/xCAT/PPCcli.pm b/perl-xCAT-2.0/xCAT/PPCcli.pm
index ab23490b3..b2227dfee 100644
--- a/perl-xCAT-2.0/xCAT/PPCcli.pm
+++ b/perl-xCAT-2.0/xCAT/PPCcli.pm
@@ -590,6 +590,12 @@ sub lpar_netboot {
         $cmd.= " -c";
     }
     #####################################
+    # Force LPAR shutdown
+    #####################################
+    if ( exists( $opt->{f} )) {
+        $cmd.= " -i";
+    }
+    #####################################
     # Get MAC-address or network boot
     #####################################
     $mac = $opt->{m};
@@ -841,3 +847,4 @@ sub power_cmd {
 1;
 
 
+