Added "-f" flag to getmacs (force LPAR shutdown)

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1737 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
sakolish 2008-06-23 16:41:15 +00:00
parent e10d86ad45
commit 9172f4f82a

View File

@ -41,7 +41,7 @@ sub parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version C=s G=s S=s d))) {
if ( !GetOptions( \%opt,qw(h|help V|Verbose v|version C=s G=s S=s d f))) {
return( usage() );
}
####################################
@ -182,6 +182,12 @@ sub ivm_getmacs {
$cmd.= " -v -x";
}
#######################################
# Force LPAR shutdown
#######################################
if ( exists( $opt->{f} )) {
$cmd.= " -i";
}
#######################################
# Network specified (-D ping test)
#######################################
if ( exists( $opt->{S} )) {